afzonderlijke cellen kopiëren naar ander werkblad

[sylvester-ponte]

zo iets?

Workbooks("Overzicht.xls").Worksheets("Overzicht"). _
  Range("C60000").End(xlUp).Offset(1, 0) = _
   Workbooks("Bestelling.xls").Worksheets("Bestelling"). _
    Range("C4")
Workbooks("Overzicht.xls").Worksheets("Overzicht"). _
  Range("D60000").End(xlUp).Offset(1, 0) = _
   Workbooks("Bestelling.xls").Worksheets("Bestelling"). _
    Range("D5")
Workbooks("Overzicht.xls").Worksheets("Overzicht"). _
  Range("F60000").End(xlUp).Offset(1, 0) = _
   Workbooks("Bestelling.xls").Worksheets("Bestelling"). _
    Range("F4")

als beide bestanden geopend zijn


groet sylvester

 

[nonono]

Inderdaad, zo iets. Perfect!
Weer het e.e.a. erbij geleerd. Bij andere kopieerakties tussen geopende bestanden ging het goed met Windows ….. Sheets.
Dit is de oplossing!!! Bedankt :d :d

Groet Nono