Overføre data fra et ark til et andet!

hvis du i ark2 har postnr i kolonne A
og postnr i ark1 i kol. A og sælger kode i kolonne B

=LOPSLAG(A2;Ark1!A2:B100;2;FALSK)

Kan ikke få det til at virke!

Det jeg vil er at, excel ser på postnumrene i kolonne A i ark 2, og derefter går ind og søger i postnumrene i kolonne A i ark 1, får at se om postnummeret eksisterer. Hvis postnummeret eksisterer, skal excel overføre sælgerkoden, der hører til postnummeret til en kolonne i ark 2.

prøv at beskrive hvor du har hvad - hvilke kolonner

og hvor mange rækker du har

Formlen skal indsættes i Ark2 i række 2 i en ledig kolonne
derefter kan den kopieres ned så langt som du har postnumre i arket
hvis postnr ikke findes, returneres et #I/T dette kan evt.løses
ved at udvide formel med en Hvis-betingelse
formel er her ændret så den kikker i 1000 rækker
men forudsætter du har sælgerkode i kolonne B, ellers skal den rettes til

=LOPSLAG(A2;Ark1!$A$2:$B$1000;2;FALSK)

I Ark1 har jeg i kolonne A Postnumre i sorteret rækkefølge. I de følgende kolonner har jeg By, Distrikt, Sælgerkode og til sidst E-mail.

I Ark2 har jeg i kolonne A Firmanavn, og derefter Adresse, Postnummer, By, telefon og til sidst CVR-nummer.
Det jeg gerne vil er så at, Excel på baggrund af postnumrene i kolonne C i Ark2, går ind i kolonne A i Ark1 og ser om postnummeret eksisterer. Hvis postnummeret eksisterer skal Excel overføre sælgerkoden i kolonne D i Ark1, som hører til et givent postnummer, til kolonne G i Ark2.

I Ark1 har jeg 1154 rækker + kolonneoverskriften.
I Ark2 har jeg 805 rækker + kolonneoverskriften.

excelent har beskrevet det for dig. Du skal bare ændre i hans formel.
Indsæt i G2 i Ark2 og kopier ned.
=LOPSLAG(C2;Ark1!$A$2:$D$2000;4;FALSK)

Kan man efter at sælgerkoderne er blevet kopieret over i ark2, få excel til automatisk at kopiere de forskellige addresser over i nogle seperate ark, så hvert ark kun indeholder addresser med med en bestemt sælgerkode?

har du fået formlen til at virke ?

mht. dit andet spørgsmål- kom med et eks. det kommer jo an på så meget

et eks.
du har sælgerkode i kolonne A
i kolonne B indsætter du følgende formel
=INDEKS(Ark1!B2:B2000;SAMMENLIGN(A2;Ark1!D2:D2000))

denne korrigerede kan kopieres ned så langt du har sælgerkoder

=INDEKS(Ark1!$B$2:$B$2000;SAMMENLIGN(F2;Ark1!$D$2:$D$2000))

ups. det var sådan

=INDEKS(Ark1!$B$2:$B$2000;SAMMENLIGN(A2;Ark1!$D$2:$D$2000))

Jeg vil gerne have at alle adresserne for de enkelte sælgere, samles i et ark for hver sælger, f.eks. skal alle adresser med sælgerkoden LHM samles i et ark der hedder LHM osv.

hvor mange ark har du af den type og hvad hedder de

Kikker på en VBA løsning, idet formlen ikke er anvendelig når
sælgerkoden ikke er unikke

Ark1 hedder Postnumre, søgning. Ark2 hedder slagtere, og derefter har jeg ark der hedder JJO, JOL, KGH, LHM og RRI

Er de ikke unikke, når heg kun har de 5 sælgerkoder JJO, JOL, KGH, LHM og RRI

nej hvis der er flere sælgere har samme sælgerkode så er de ikke unikke

i hvilken kolonne vil du have adresserne

Der er ikke flere sælgere med samme kode, der er kun 5 sælgere i alt, og de har en kode hver. Mvh. til adresserne skal de bare sættes ind i første kolonne. Adresserne består dog er flere kolonner - Firmanavn, Adresse, Postnummer, By, telefon, CVRnr og sælgerkode.

indsæt koden i et alm. modul og kør
herefter indsættes følgende i respektive sælgerark
(A)Firmanavn,(B)Adresse,(C)Postnr,(D)By,(E)Tlf..,(F)CVR,(G)Kode

Sub Sælger()
Dim t, r, ark
Sheets("Slagtere").Activate
For t = 2 To Cells(65500, 1).End(xlUp).Row
ark = Cells(t, "G")
r = Sheets(ark).Cells(65500, 1).End(xlUp).Row + 1
Range("A" & t & ":G" & t).Copy Sheets(ark).Cells(r, 1)
Next
End Sub

Koden forudsætter du har fået overført sælgerkode til Stagtere i kolonne G
hvis ikke kan du anvende følgende formel
=LOPSLAG(C2;'Postnumre, søgning'!$A$2:$D$2000;4;FALSK)

formlen indsættes i ark Slagtere celle G2 og kopieres ned

Jeg har fået det med at få sælgerkoden over i slagterarket til at virke, nu vil jeg gerne bare have at de adresser, der hører til den enkelte sælger automatisk føres over i et seperate ark, så hver sælger har hver sit ark med adresser på slagtere

går ud fra du har oprettet sælgerarkene,
og du har sælgerkode i kolonne G i Slagterarket
i såfald kan Sub Sælger() overføre adresserne mv. til disse

Jeg forstår ikke hlet, hvad du mener. Er Sub sælger en formel, og hvor skal den sættes ind henne.

i arket tast ALT+F11
i menuen Insert vælg Module
indsæt koden i vindue til højre
retur til arket
tast ALT+F8
vælg kør makro

Når man vælger kør makro kommer der et vindue op med beskeden runtime error '9' subscript out of range, og når man går ind i Visual Basic er følgende række markeret med gul - r = Sheets(ark).Cells(65500, 1).End(xlUp).Row + 1.

For lige at opsummere igen, er målet at kopiere kolonnerne fra arket: Slagtere, hvor kolonnerne hedder - Firmanavn, Adresse, Postnummer, By, Telefon, CVRnr og Sælgerkode over i 5 individuelle sælgerark.

De respektive sælgerark, skal bare være helt tomme eller hva? Eller skal jeg indsætte kolonneetiketterne?

Jeg har selv fundet fejlen, jeg tror det var fordi der var huller i dataene, at den kom op med en fejlmeddelelse.

Tusind tak for hjælpen excelent, ha en god jul.

Giv et svar så jeg kan give dig de fortjente point.

ok velbekom