Alléé, weer iets bijgeleerd
Dit was sarcastisch bedoeld
Ik ben geen specialist, maar ZO dom ben ik nu ook weer niet
. Was een vergissing omdat mij oogjes na middernacht bijna dichtvielen.
Mijn code was voor simpele mensen zoals ik:
Private Sub CommandButton1_Click()
Dim rij As Long
With Worksheets("Blad1")
rij = .Cells(Cells.Rows.Count, 3).End(xlUp).Row + 1
.Range("C3:N3").Copy
.Range("C" & rij).Select
ActiveSheet.Paste
End With
End Sub
!! OLD SCHOOL !! Ik weet ook dat je veel kan vereenvoudigen, dat je niet moet
Dimensioneren in een Private Sub enzovoort.
Maar dan moet je aan TS ook uitleggen waarom, en opmerkingen zetten bij de code
'iets waar wij als helpers eigenlijk een gewoonte van zouden moeten makenAls TS maar geholpen is
Groetjes,
SoftAid