Knippen/plakken/rij toevoegen in een macro?

[DCHR]

Hoi,

Ben bezig met een formulier. Heb een tabel, met een rij waar mensen iets in kunnen vullen. In dit geval, werkervaring. Rijtje is zo opgebouwd dat er datums werkgevers etc worden gegeven. Echter, kan iemand dus meerdere werkgevers heeft gehad.

Ik zou dus een button willen maken waardoor er een nieuwe rij gegenereerd wordt indien men op de button klikt.

Wanneer ik een macro aan het opnemen ben, dan werkt de rechter muisknop niet meer, dus ik kan geen extra rij toevoegen en die vullen door de invulgegeven te knippen en te plakken.

Ik hoop dat iemand snapt welk probleem ik tegen aan loop en dat iemand me hiermee kan helpen.

Groet,

DC

 

[snb]

Plaats je formulier hier. Praat wat gemakkelijker.

 

[EdWel]

Hoi DCHR,

Maak ergens op je werkblad een CommandButton en plak onderstaande code in de programmacode van dat werkblad.

Private Sub CommandButton1_Click()
   ActiveCell.Offset(1, 0).EntireRow.Insert Shift:=xlDown
End Sub

En voila, een regeltje erbij.

Groet, Ed