toetsenbord snelkoppeling omzetten naar command button

[lampardio]

Beste Excel experts,

Ik heb een macro opgenomen waarmee ik via de snelkoppeling (ctrl m) het werkblad kopieer naar een nieuwe Excel bestand. Ik wil dit automatisme via een command button laten gaan. Hoe kan ik van de snelkoppeling (ctrl m) een command button maken?

Alvast bedankt!

Thijmen

Sub Nieuwbestand()
'
' Nieuwbestand Macro
' Openen nieuw bestand
'
' Keyboard Shortcut: Ctrl+m
'
    Sheets("1006").Select
    Sheets("1006").Copy
    ActiveWindow.SmallScroll Down:=-21
End Sub

 

[edmoor]

Maak een button op je werkblad en koppel die macro er aan.
http://office.microsoft.com/nl-nl/e...p-toevoegen-aan-een-werkblad-HP010236676.aspx

Deze macro is overigens voldoende:

Sub Nieuwbestand()
    Sheets("1006").Copy
    ActiveWindow.SmallScroll Down:=-21
End Sub

 

[lampardio]

Bedankt! Het antwoord was dus heel simple. Het is me gelukt

 

[Warme bakkertje]

Zelfs die SmallScroll is overbodig. (Restant van opname die elke schermbeweging registreert)

 

[edmoor]

Daar zal je gewoon gelijk in hebben denk ik