Hallo,
nimm den Vorgang mit dem Macrorecorder auf, gib dem Macro im Dialog die Tast.-kombi und speichere in deinem Addin ab, bspw so:
Sub Makro1()
'
' Makro1 Makro
'
' Tastenkombination: Strg+b
'
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Gruß,
|