Avatar billede bering2 Nybegynder
25. august 2004 - 09:47 Der er 7 kommentarer

Avanceret kopiering med VBA

Hej

Jeg har brug for at kunne kopiere mellem 2 ark i en excelfil, hvilket kan illustreres på følgende måde:

Ark1 indeholder værdierne dato og navn i to felter:
A1: "02-02-2004" B1: "Jens"

Ark2 indeholder en liste med datoer:
A1: 01-02-2004
A2: 02-02-2004
A3: 03-02-2004

Nu vil jeg gerne have "Jens" kopieret til felt B2 i ark2 - og havde der stået "01-02-2004" i ark1, skulle det selvfølgelig kopieres til B1 - og det hele skulle gerne ske med en VBA knap!

Er det overhovedet muligt?

Mvh. Lars
Avatar billede x-lars Novice
25. august 2004 - 10:09 #1
Ark2!B1 = lopslag(Ark2!A1;Ark1!a1:b3;2;falsk)

Kopier nedad til b3.
Avatar billede x-lars Novice
25. august 2004 - 10:12 #2
Der er 4 parametre til opslaget
1. Ark2!A1 - hvad skal slås op - her datoen
2. Hvilkens tabel skal der slås op i - her Ark1 fra a1 til b3
3. Hvilken kolonne findes den relevante opslagsværdi i? - her kolonne 2 = B
4. Falsk eller sand - her falsk - kun svar, hvis den ønskede værdi faktisk findes i tabellen.
Avatar billede kabbak Professor
25. august 2004 - 11:31 #3
Public Sub findDato()
  rw = Sheets("Ark2").Range("A65536").End(xlUp).Row
  For i = 1 To rw
  If Sheets("Ark2").Cells(i, 1) = Sheets("Ark1").Range("A1") Then
  Sheets("Ark2").Cells(i, 2) = Sheets("Ark1").Range("B1")
End If
Next
End Sub
Avatar billede bering2 Nybegynder
25. august 2004 - 16:20 #4
Hej Kabbak
Dit forslag virker lige efter ønsket
Super!!
Avatar billede kabbak Professor
25. august 2004 - 16:21 #5
Så får du et svar. ;-))
Avatar billede kabbak Professor
25. januar 2006 - 22:20 #6
marker mit navn og tryk accepter
Avatar billede kabbak Professor
04. maj 2008 - 23:42 #7
lukketid
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester