Makro einem Button zuweisen

24/08/2007 - 16:31 von Ralph | Report spam
Hallo ich habe ein Makro aufgezeichnet und möchte es einem Button
zuweisen.
Das Makro hat den Code:
Sub Makro1()
'
' Makro1 Makro
' Makro am 24.08.2007 von xyz aufgezeichnet
'

'

Workbooks("Auftragsbuch.xls").Sheets("Tabelle1").Cells.AdvancedFilter
Action _
:=xlFilterCopy,
CriteriaRange:=Sheets("Filterangaben").Range("A1:A2"), _
CopyToRange:=Range("A7:H7"), Unique:=False
End Sub

In den Code des Buttons füge ich die Zeile:
Application.Run "Makro1"
ein.

Beim ausführen kommt die Fehlermeldung "Laufzeitfehler 1004".
Was mache ich falsch?
 

Lesen sie die antworten

#1 Robert Jakob
24/08/2007 - 17:16 | Warnen spam
Am Fri, 24 Aug 2007 07:31:54 -0700 schrieb Ralph:

Hallo ich habe ein Makro aufgezeichnet und möchte es einem Button
zuweisen.
Das Makro hat den Code:
Sub Makro1()
'
' Makro1 Makro
' Makro am 24.08.2007 von xyz aufgezeichnet
'

'

Workbooks("Auftragsbuch.xls").Sheets("Tabelle1").Cells.AdvancedFilter
Action _
:=xlFilterCopy,
CriteriaRange:=Sheets("Filterangaben").Range("A1:A2"), _
CopyToRange:=Range("A7:H7"), Unique:=False
End Sub

In den Code des Buttons füge ich die Zeile:
Application.Run "Makro1"
ein.

Beim ausführen kommt die Fehlermeldung "Laufzeitfehler 1004".
Was mache ich falsch?



Hallo Ralph,

einem Makro einen Button zuweisen ist eine einfache Sache wenn es sich um
einen sogenannten FormularButton handelt.

Es gibt aber auch noch einen anderen Button, genauso aussehen kann,
der sich aber CommandButton nennt.

Für Anfànger ist der Formularbutton einfacher, daher will ich
Dir hier erklàren wie Du einen Formularbutton bauen kannst, den
Du dann Deinem Code zuweisen kannst,

Gehe auf Ansicht, Symbolleisten und klicke Formular an, dann bekommst Du
die Formular Symbolleiste.

Dort findest Du neben XYZ einen kleinen Knopf, der wie ein MiniButton
aussieht. Klicke diesen MiniButton an und gehe mit dem Cursor in die
Tabelle.
Dort wirst Du dann ein Kreuzchen als Cursor haben.
Die linke Maustaste festhalten und dann in der Tabelle ein bischen in der
Tabelle bewegen, dann wirst Du einen Formular-Button bekommen und dann
öffnet sich auch schon ein Formular, Makro zuweisen.

Nun kannst Du entweder einen Code der Dir im Fenster angezeigt wird
auswàhlen und so dem Button zuweisen oder mit Neu eine neue Prozedur
erstellen.

Zum Versuch würde ich Dir empfehlen, eine neue Prozedur zu erstellen.

Schreibe zwischen Schaltflàche und End Sub:

MSGBOX "Hier meldet sich der Makro"


sodann gehe in die Tablle und klicke Deine Schaltflàche an.

Wenn Du diesen Button einer anderen Prozedur zuweisen möchtest,
dann klicke den Button mit der linken Maustaste an und dann kannst
Du diesen Button einer anderen Makro-Prozedur zuweisen.

MfG
Robert

Ähnliche fragen