Hallo,
ich möchte folgendes realisieren:
Vorbedingung: in meiner Quelldatei ist in Zelle A1 der Wert "X3"
das funktioniert:
Dim SpalteMonat As Range
Set SpalteMonat = Range("A1")
....
Workbooks.Open ("'Pfad meiner Zieldatei")
Range("SpalteMonat").Select
Selection.Paste
.......
Das mit " Range("SpalteMonat").Select " habe ich mir zu einfach gedacht. Was ich wollte ist, dass in Zelle X3 meiner Zieldatei hineinkopiert wurde.
der Vorteil wäre gewesen, dass ich den Zielbereich jeweils nur in der Zelle A1 der Quelldatei hätte angeben müssen
hat ja jemand was das funktioniert?
|