Klistra in på optimalt sätt - VBA - Forum Excel, VBA, VSTO, Exceltips, Excelhjälp

2020-11-19 20:10

Medlem sedan: 2020-11-19

1 inlägg

Hej,

Det funkar att kopiera på nedan vis. Men varför kan jag inte klistra in dem vid E2 enligt nedan på annat blad?

Sheets("Blad1").Range("A19:F19").Copy

Sheets("Blad2").Range("E2").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

2020-11-20 07:14

Medlem sedan: 2015-08-26

1209 inlägg

Hej Tobbe

Koden är det inget fel på, den ska fungera. Vad får du för fel? Går det att göra samma operation manuellt?

Har du ett blad som heter Blad2? Får du felet "index är utanför intervall", så beror detta på att blad2 inte finns.

Du kan förenkla koden till:

Sheets("Blad1").Range("A19:F19").Copy

Sheets("Blad2").Range("E2").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone

Sida 1 av 1