Run marco in worksheet

[Geminite]

Beste helpers,

Ik ben bezig om mijn formulier meer dummyproef te maken en automatisch een mail te sturen zodra men vanaf de userform op de opslaan knop drukken (commandbutton).

Aangezien mails versturen binnen een macro nog niet voorelkaar krijg gebruik ik de plug-in van Ron de Bruin (RDBMailOutlook). Op zich geweldige plugin, maar de button send email word niet aangestuurd door een macro en neem aan dat "Private Sub RDB_Outlook_Click()" de onderliggende macro is.

Wat ik heb gedaan:.. In Module1 heb ik een nieuwe sub aangemaakt die ik door middel van Run oproep.

Sub mailer()
Application.ScreenUpdating = False
Sheets("gegevens").Visible = xlSheetVisible
Sheets("RDBMailOutlook").Visible = xlSheetVisible

Run "RDB_Outlook_Click"

Sheets("gegevens").Visible = xlVeryHidden
Sheets("RDBMailOutlook").Visible = xlVeryHidden
Application.ScreenUpdating = True
MsgBox ("mail verstuurd. We zullen uw vraag zo snel mogelijk beantwoorden")
End Sub

Wat ik heb geprobeerd:

Run "RDB_Outlook_Click"
Call "RDB_Outlook_Click"
Sheets("RDB_Outlook").Call "RDB_Outlook_Click"
Application.Run "RDB_Outlook_Click"

Mijn vragen: Is het uberhaubt mogelijk om opdrachten uit de "sheet" aan te sturen vanuit een module ? Indien ja wat heb ik verkeerd gedaan ?
Iemand suggesties voor een tutorial voor mail sturen binnen Excell (http://www.rondebruin.nl/ blijf ik doorheen snuffelen)

Alvast bedankt voor de hulp.

 

[Ginger]

Geminite, Je kan een macro aan knop op je sheet verbinden door met rechts op de knop te klikken en dan in het popup menu te kiezen voor Assign Macro (macro verbinden ?). Omdat er 'private' voor de macro staat, wordt deze regel niet zichtbaar in het venster dat daarna verschijnt. Haal dus ff die private voor je 'sub' weg.
Het aanroepen van een codeblok vanuit een ander code blok doe je inderdaad via Call (hoeft trouwens niet, maar vind ik netter staan). Dat had je BIJNA goed. Je moet alleen de dubbele quotes verwijderen anders ziet VBA dit als een textstring en niet als een sub of functie.

Groet, Leo

 

[Geminite]

Het werkt nu, top. bedankt.

Nu nog ff zoeken voor een goeie tutorial om ze zelf te maken