Avatar billede tvc Seniormester
04. oktober 2016 - 21:49 Der er 20 kommentarer og
1 løsning

VBA copy-paste

Hej

Jeg forsøger at kopierer fra et ark til et andet ved hjælp af nedenstående i en linje. Er der en der kan fortælle mig hvad der er galt i den (den fejler)?

Ark03.Range("A3:B3").End(xlDown).Copy Ark05.Range("A2").PasteSpecial(xlPasteValues)
Avatar billede excelent Ekspert
04. oktober 2016 - 22:15 #1
Ark03.Range(Cells(3, "A"), Cells(3, "B").End(xlDown)).Copy: Ark05.Range("A2").PasteSpecial xlPasteValues
Avatar billede tvc Seniormester
04. oktober 2016 - 22:31 #2
Den fejler fortsat :-|
Avatar billede tvc Seniormester
04. oktober 2016 - 22:33 #3
Denne del virker:
Ark03.Range(Cells(3, "A"), Cells(3, "B").End(xlDown)).Copy
Avatar billede jkrons Professor
04. oktober 2016 - 22:48 #4
Prøv at selecte det ark, du paser i før du indsætter.
Avatar billede tvc Seniormester
04. oktober 2016 - 22:51 #5
Den fejler også når jeg står i ark05 :-|
Avatar billede store-morten Ekspert
04. oktober 2016 - 23:25 #6
Sheets("Ark03").Range(Cells(3, "A"), Cells(3, "B").End(xlDown)).Copy: Sheets("Ark05").Range("A2").PasteSpecial xlPasteValues
Avatar billede tvc Seniormester
04. oktober 2016 - 23:51 #7
Ark03 og Ark05 er de rigtige arknavne (ikke dem man kan se og rette i fanerne. Den fejler desværre fortsat.
Avatar billede store-morten Ekspert
05. oktober 2016 - 05:15 #8
Og der er ikke et 0 for meget :-)
Hos mig har jeg Ark1, Ark2... osv.
Avatar billede tvc Seniormester
05. oktober 2016 - 10:30 #9
Nej det er indsat for at få rækkefølgen korrekt :-) så det skal være der.

Det mærkelige er, at jeg kan indspille makroen mennefterfølgende vil den ikke køre uden at den fejler.
Avatar billede supertekst Ekspert
05. oktober 2016 - 11:22 #10
Har du mulighed for at sende / uploade filen?
Hvis sendes - så via www.supertekst-it.dk | Kontakt  - så svarer jeg så du kan sende en kopi af filen.
Avatar billede store-morten Ekspert
05. oktober 2016 - 11:33 #11
Sheets(3).Range(Cells(3, "A"), Cells(3, "B").End(xlDown)).Copy: Sheets(5).Range("A2").PasteSpecial xlPasteValues
Avatar billede jkrons Professor
05. oktober 2016 - 12:00 #12
Hvad er det præcis, du ønsker kopieret, hvorfra og hvortil? Måske kan det gøres på en anden måde.
Avatar billede store-morten Ekspert
05. oktober 2016 - 12:05 #13
#11
Sheets(3): Er række følgen på arken, dur så ikke, hvis de flyttes rundt
Avatar billede excelent Ekspert
05. oktober 2016 - 17:54 #14
Må vi lige se den kode makro optageren laver
Avatar billede tvc Seniormester
05. oktober 2016 - 19:44 #15
Range("A2:B2").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.ClearContents
    Range("A2").Select
    ActiveWindow.ScrollWorkbookTabs Sheets:=-1
    Sheets("Indlæsning balance").Select
    Range("A3:B3").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    Sheets("Mapping").Select
    Range("A2").Select
    ActiveSheet.Paste
    Range("A2").Select
    Sheets("Indlæsning balance").Select
    Application.CutCopyMode = False
    Range("A3").Select
    Sheets("Mapping").Select
Avatar billede store-morten Ekspert
05. oktober 2016 - 20:09 #16
Hvordan er du så kommet frem til: Ark03 og Ark05 ?
Avatar billede tvc Seniormester
05. oktober 2016 - 21:08 #17
Det er det samlede navn, der står i VBAproject Ark03 (Indledende balance)
Avatar billede tvc Seniormester
05. oktober 2016 - 21:09 #18
Hvis det kan løses med arknavnene Indlæsning balance og Mapping er det også helt fint.
Avatar billede tvc Seniormester
05. oktober 2016 - 21:10 #19
Kan man gøre den ovenstående makroindspilning kort til en enkelt eller to linjer?
Avatar billede store-morten Ekspert
05. oktober 2016 - 22:01 #20
Er overstående kode fra makroindspilning?
Avatar billede tvc Seniormester
07. oktober 2016 - 12:56 #21
Ja det er fra makroindspillingen uden korrektioner.
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