Office: Makro über Commandbutton starten

Hallo nochmal,

ich habe noch ein Problemchen. Ich habe das folgende Makro:

***
Sheets("Aufträge").Select
Columns("A:A").Select
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlFixedWidth, _
FieldInfo:=Array(Array(0, 1), Array(16, 1)), TrailingMinusNumbers:=True
Sheets("Bestellungen - Übersicht").Select
Range("F5").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],Aufträge!C[-4]:C[-3],2,)"
Selection.AutoFill Destination:=Range("F5:F200"), Type:=xlFillDefault
Rows("4:4").Select
Selection.AutoFilter
Selection.AutoFilter Field:=6, Criteria1:="Bestellt"
Range("F10").Select
Range(Selection, Selection.End(xlDown)).Select
Range("A10:F84").Select
Range("F10").Activate
With Selection.Interior
.ColorIndex = 36
.Pattern = xlSolid
End With
Selection.AutoFilter Field:=6
Range("F1").Select
Columns("F:F").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Columns("F:F").Select
Selection.Replace What:="#", Replacement:="0", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Columns("F:F").Select
Selection.Replace What:="0N/A", Replacement:="0", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Columns("F:F").Select
Selection.Replace What:="0", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Range("A1").Select

***

Dieses möchte ich über einen Commandobutton starten. Das funktioniert nicht so wie gewünscht. Da mußte man doch irgendwas an dem Makro ändern, damit das funktioniert. Irgendwie gibt es da doch dort einen Unterschied.

Kann mir jemand sagen, was ich da ändern muß?

Gruß
Michael

 

Welchen Befehl zum Starten benutzt du denn?
Normaler Weise sollte ein simples
Call Prozedurname
reichen.

 

Hallo,

ich habe einfach einen Commandobutton eingerichtet und das makro dort reinkopiert.

Ich habe gerade noch einmal geschaut; ich hatte zum gleichen Problem schon mal eine Anfrage gestellt ("[Excel 2002] Daten in über Commandobutton in ein anderes Tabellenblatt").
Da ich leider nicht viel von Makros verstehe (außer diese aufzuzeichnen und zu hoffen, dass das funktioniert), bräuchte ich nochmal Hilfe, bei dem aktuellen Makro.

Vielen Dank für Eure Hilfe und sorry, dass ich 2 Anfragen zum gleichen Thema stelle.

Gruß
Michael