Ik heb een macro verkregen hier op het forum proberen te ontcijferen... lukt me maar niet.
...
Sheets("Leden").Select
For Each cl In Range("C21:C" & Cells(Rows.Count, 1).End(xlUp).Row)
If cl.Value = "X" Then
Union(cl.Offset(, 1).Resize(, 3), cl.Offset(, 4)).Copy [Leden_aanwezig!E65536].End(xlUp).Offset(1)
Nu zou ik alleen de waarden willen overhevelen en niet de layout van de bron, maar de layout van het bestemmingsblad willen handhaven.
Heeft er iemand een verklaring wat onderstaande zaken juist willen betekenen ?
Union(cl.Offset(, 1)
Resize(, 3)
cl.Offset(, 4)
...
Sheets("Leden").Select
For Each cl In Range("C21:C" & Cells(Rows.Count, 1).End(xlUp).Row)
If cl.Value = "X" Then
Union(cl.Offset(, 1).Resize(, 3), cl.Offset(, 4)).Copy [Leden_aanwezig!E65536].End(xlUp).Offset(1)
Nu zou ik alleen de waarden willen overhevelen en niet de layout van de bron, maar de layout van het bestemmingsblad willen handhaven.
Heeft er iemand een verklaring wat onderstaande zaken juist willen betekenen ?
Union(cl.Offset(, 1)
Resize(, 3)
cl.Offset(, 4)