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)
Annonceindlæg tema
Cloud & AI
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
04. oktober 2016 - 22:15
#1
Ark03.Range(Cells(3, "A"), Cells(3, "B").End(xlDown)).Copy: Ark05.Range("A2").PasteSpecial xlPasteValues
tvc
Seniormester
04. oktober 2016 - 22:31
#2
Den fejler fortsat :-|
tvc
Seniormester
04. oktober 2016 - 22:33
#3
Denne del virker: Ark03.Range(Cells(3, "A"), Cells(3, "B").End(xlDown)).Copy
04. oktober 2016 - 22:48
#4
Prøv at selecte det ark, du paser i før du indsætter.
tvc
Seniormester
04. oktober 2016 - 22:51
#5
Den fejler også når jeg står i ark05 :-|
04. oktober 2016 - 23:25
#6
Sheets("Ark03").Range(Cells(3, "A"), Cells(3, "B").End(xlDown)).Copy: Sheets("Ark05").Range("A2").PasteSpecial xlPasteValues
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.
05. oktober 2016 - 05:15
#8
Og der er ikke et 0 for meget :-) Hos mig har jeg Ark1, Ark2... osv.
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.
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.
05. oktober 2016 - 11:33
#11
Sheets(3).Range(Cells(3, "A"), Cells(3, "B").End(xlDown)).Copy: Sheets(5).Range("A2").PasteSpecial xlPasteValues
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.
05. oktober 2016 - 12:05
#13
#11 Sheets(3): Er række følgen på arken, dur så ikke, hvis de flyttes rundt
05. oktober 2016 - 17:54
#14
Må vi lige se den kode makro optageren laver
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
05. oktober 2016 - 20:09
#16
Hvordan er du så kommet frem til: Ark03 og Ark05 ?
tvc
Seniormester
05. oktober 2016 - 21:08
#17
Det er det samlede navn, der står i VBAproject Ark03 (Indledende balance)
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.
tvc
Seniormester
05. oktober 2016 - 21:10
#19
Kan man gøre den ovenstående makroindspilning kort til en enkelt eller to linjer?
05. oktober 2016 - 22:01
#20
Er overstående kode fra makroindspilning?
tvc
Seniormester
07. oktober 2016 - 12:56
#21
Ja det er fra makroindspillingen uden korrektioner.
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig