Avatar billede lovo Nybegynder
06. april 2011 - 08:04 Der er 13 kommentarer

Overførsler af data fra en excelark til en anden

Hej

Jeg vil høre om der er nogen der kan hjælpe med følgende:

Jeg har en excelark med nedenstående data:

række 1    w  x  q
række 3    w  y  a
række 10  j  q  w
række 12  x  r  q

Data der skal kopieres fra er altid fra samme kolonner. Desværre varieres rækkerne. Feks.skal datta kopieres fra række 1,3,10,12 mm.

Spørgsmålet er hvordan jeg kan kopiere disse udvalgte data fra en excelark til en anden ( på en fiks måde).

På forhånd tak for hjælpen

mvh

Lovo
Avatar billede finb Ekspert
06. april 2011 - 09:32 #1
1.
Hold ctrl nede,
klik på de ønskede række-etiketter (grå til venstre)

2.
ctrl + C

3.
Gå over i destinationsarket,
ctrl + V

mvh finb
Avatar billede lovo Nybegynder
06. april 2011 - 09:47 #2
Tak for dit svar, desværre er det lidt mere kompliceret :-(.


Jeg skal kun have kopieret kolonne A,C,F og L.

Da jeg har over 200 rækker der skal kopiere fra vil jeg gerne i dette tilfælde undgå komandoen =kopier celle. Det vil jo tage rigtig lang tid.

I kolonne A har jeg nummering fra 1 til 189. Ud fra disse nr. skal jeg have kopieret kolonnerne A;C;F og L.Igen hvor i kolonne A, der er et tal, varierer. Spørgsmålet er om der er en fiks måde man kan kopiere på??????

På forhånd tak for hjælpen


mvh lovo
Avatar billede kabbak Professor
06. april 2011 - 22:26 #3
kender du tallene på forhånd, altså hvilke numre der skal kopieres
Avatar billede lovo Nybegynder
07. april 2011 - 08:58 #4
ja. I kolonne A har jeg en stigende nummering fra 1 til 189
Avatar billede kabbak Professor
07. april 2011 - 19:22 #5
er det altid de samme numre ??
Avatar billede lovo Nybegynder
07. april 2011 - 21:32 #6
ja
Avatar billede kabbak Professor
07. april 2011 - 21:52 #7
et eksempel, denne tager bestemte rækker og kopierer over i ark2

Public Sub kopi()
Dim RK As Variant, I As Long
    RK = Array(1, 3, 10, 12)' sæt selv flere rækkenumre ind
   
    For I = 0 To UBound(RK)
        Rows(RK(I)).Copy Sheets("Ark2").Cells(Sheets("Ark2").Rows.Count, 1).End(xlUp).Offset(1, 0)
    Next
End Sub
Avatar billede lovo Nybegynder
08. april 2011 - 14:05 #8
hej igen

Jeg kender kolonnerne der skal kopieres fra. Rækker nr. kender jeg ikke, bortset fra at i den første kolonne. Altså kolonne A er de rækker jeg gerne vil kopieres fra går nr' fra 1 til 189.
Avatar billede kabbak Professor
08. april 2011 - 16:48 #9
vil det sige at hvis det nummer der står i A kolonnen er mellem 1 og 189, så skal de kopieres.

Hvor mange rækker er der data  i alt ??
Avatar billede kabbak Professor
08. april 2011 - 17:09 #10
så kan du bruge Data > Filter > avanceret filter til at flytte data med , hvis der er overskrifter på kolonnerne.
Avatar billede lovo Nybegynder
11. april 2011 - 09:09 #11
Hej Igen

Kunne jeg sende min fil til dig. Desværre har jeg rigtig svært ved at genskabe dit svar.

På frohånd tak for hjælpen

lovo
Avatar billede kabbak Professor
11. april 2011 - 16:44 #12
kabbak snabela vip dot cybercity dot dk
Avatar billede kabbak Professor
16. april 2011 - 20:25 #13
sender du noget ??
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