Gegevens toevoegen aan werkblad o.b.v. ingevoerde naam en weeknummer

Status
Niet open voor verdere reacties.
Bedankt voor je hulp! Bij nader inzien wil ik toch alle data op een sheet hebben.

Dit doe ik met onderstaande VBA code:

Code:
Sub kopie()
Sheets("Formulier").Range("K1:V1").Copy Sheets("Data").Range("A" & Rows.Count).End(xlUp).Offset(1)
Range("A1").Select
End Sub

Nu wil ik dat de alles als waarde geplakt wordt, dus geen formules.

Hoe kan ik dit het beste aanpakken?
 
Laatst bewerkt:
Code:
Sub kopie()
Sheets("Data").Range("A" & Rows.Count).End(xlUp).Offset(1).resize(,12).value = Sheets("Formulier").Range("K1:V1").value
Range("A1").Select
End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan