kopier celler
Jeg sidder og roder med at lave en makro der kopier/ laver en serie til højre, med det antal der bliver indtastet, men hvordan får jeg udskiftet C1 med brugerdataSub fyld_til_føjre()
'
' fyld_til_højre Makro
'
' Genvejstast:Ctrl+q
'
Dim brugerdata As String
brugerdata = InputBox("hvor mange celler")
Selection.AutoFill Destination:=ActiveCell.Range("A1:C1"), Type:=xlFillDefault
ActiveCell.Range("A1:C1").Select
End Sub
