Code van macro toekennen aan button

[DCHR]

Hoi,

Het lukt me maar niet om een vba code van een makro die ik gemaakt heb aan een button toe te kennen.

een voorbeeld, als ik eventjes snel een makro maak van het document opslaan en uitprinten krijg ik de volgende code:

Sub printenenopslaan()
'
' printenenopslaan Macro
' Macro opgenomen op 5-6-2007 door DCHR
'
ActiveDocument.SaveAs FileName:="Jhasdflkdsfjlkjsdfl.doc", FileFormat:= _
wdFormatDocument, LockComments:=False, Password:="", AddToRecentFiles:= _
True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:= _
False, SaveNativePictureFormat:=False, SaveFormsData:=False, _
SaveAsAOCELetter:=False
End Sub

Als ik de code van een button oproep (rechtermuisknop, programmacode weergeven) krijg ik:

Private Sub CommandButton2_Click()

End Sub

Wie kan en wil me helpen hiermee, het is irritant omdat me dit onder xp niet meer lukt en vroeger wast geen probleem.

Help!

p.s. deze vraag i dubbel geplaatst omdat ik heb p.o. eerst bij 'word'neer heb gezet.

 

[Wigi]

Plak dit:

ActiveDocument.SaveAs FileName:="Jhasdflkdsfjlkjsdfl.doc", FileFormat:= _
wdFormatDocument, LockComments:=False, Password:="", AddToRecentFiles:= _
True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:= _
False, SaveNativePictureFormat:=False, SaveFormsData:=False, _
SaveAsAOCELetter:=False

tussen

Private Sub CommandButton2_Click()

End Sub

Wigi

 

[DCHR]

Plak dit:

ActiveDocument.SaveAs FileName:="Jhasdflkdsfjlkjsdfl.doc", FileFormat:= _
wdFormatDocument, LockComments:=False, Password:="", AddToRecentFiles:= _
True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:= _
False, SaveNativePictureFormat:=False, SaveFormsData:=False, _
SaveAsAOCELetter:=False

tussen

Private Sub CommandButton2_Click()

End Sub

Wigi

Raar, als ik hem zo knip en plak dan doet hij het wel, knip en plak ik hem rechtstreeks vanuit vba dan werk het niet...?

Enig idee hoe dit zou kunnen?

 

[Road Dogz]

Waarschijnlijk dat je de naam van de macro ook mee kopieerd.

 

[DCHR]

Waarschijnlijk dat je de naam van de macro ook mee kopieerd.

Dat was inderdaad steeds het geval....

Thanks voor alle hulp. Ik kan weer verder!

 

[huijb]

En de volgende keer niet crossposten a.u.b.

 

[Wigi]

Dat was inderdaad steeds het geval....

Thanks voor alle hulp. Ik kan weer verder!

Zet de vraag dan maar op opgelost.