Macro code voor knop indrukken

[JW at Work]

Beste mensen,

ik wil graag weten hoe ik de knop 'Nieuw' direct kan laten uitvoeren wanneer ik op een
knop druk met de volgende macro:

ik heb de volgende code reeds aangemaakt:

Sub urenregformulier()
'
' urenregformulier Macro

ActiveSheet.ShowDataForm
End Sub

Kan iemand mij hiermee helpen?
Misschien weet je de code zodat er direct op de knop 'nieuw' wordt gedrukt zonder dat de gebruiker dat dus hoeft te doen?

Hartelijk dank!

Greetz, JW

 

[That Guy]

dus je wilt dat als de sub 'urenregformulier()' wordt uigevoerd, de knop 'nieuw' wordt ingedrukt?

Zoiets...

cmdNieuw_click()

:thumb:


*waar cmdNieuw de naam van de knop is.

 

[JW at Work]

Hey,

Bedankt voor de reactie, alleen het werkt helaas nog niet.

Ik heb in de 1e rij een aantal labels (in A1, A2, A3 c.q. Naam, Adres, etc.) en een knop aangemaakt in het werkblad. Wanneer ik op die knop druk wordt de volgende Macro uitgevoerd:

Sub urenregformulier()
'
' urenregformulier Macro

ActiveSheet.ShowDataForm
End Sub

Dat werkt wel. Dan verschijnt er een pop-up venster waar ik 'nieuwe' gegevens kan invullen (die worden dan onder elkaar onder de labels weergegeven).
Als ik direct nieuwe gegevens invoer worden bestaande labels overschreven..
Ik moet dus eerst op de knop 'Nieuw' drukken zodat een bestaand label niet wordt overschreven. Dat gebeurd dus regelmatig met de huidige klantgegevens. :shocked:

Welke Code kan ik hiervoor plaatsen zodat het werkt? En kan ik die in dezelfde module gebruiken onder de bestaande Code (ActiveSheet.ShowDataForm)?

Hopelijk kan iemand mij helpen?