Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema RefEdit
BildScreenshot zu RefEdit RefEdit-Seite mit Beispielarbeitsmappe aufrufen

Makro größeren bereich kopieren mit .value | Herbers Excel-Forum


Betrifft: Makro größeren bereich kopieren mit .value von: alex
Geschrieben am: 24.11.2009 20:57:51

hallo zusammen,
ich habe ein eher kleiners Problem.
Wie muß ich den folgenden Code umschreiben, damit ich einen größeren Range mittels .Value kopieren kann?

Sub test()
.
.
With Workbooks.Open(vorlage & "Vorlage_Master_EMA.xls").sheets("KT")

Range("b18:b1018").Value = ThisWorkbook.Sheets("MB HB Konverter").Range("n2:n1000")

end with

End Sub
vielen Dank im Vorraus

Gruß alex

  

Betrifft: AW: Makro größeren bereich kopieren mit .value von: Josef Ehrensberger
Geschrieben am: 24.11.2009 21:17:13

Hallo Alex,

ungetestet.

Sub test()
  Dim objWb As Workbook
  
  Set objWb = Workbooks.Open(vorlage & "Vorlage_Master_EMA.xls")
  
  ThisWorkbook.Sheets("MB HB Konverter").Range("n2:n1000").Copy
  objWb.Sheets("KT").Range("b18").PasteSpecial xlValues
  
  Set objWb = Nothing
End Sub



Gruß Sepp



  

Betrifft: AW: Makro größeren bereich kopieren mit .value von: alex
Geschrieben am: 24.11.2009 22:49:25

dank dir
hat funktioniert


Beiträge aus den Excel-Beispielen zum Thema "Makro größeren bereich kopieren mit .value"