Macro in Excel 2003 speichern

[RayZero]

hi,

ich möchte folgendes verwirklichen:

ich möchte ein macro erstellen, das kopf- und fusszeile füllt (mit inhalten wie datum,
reiter, verfasser, seitenzahl, firmenlogo). dieses macro möchte ich eine schaltfläche
zuweise, so dass es die mappe auf knopfdruck mit dem macro füllt.
allerdings soll das ganze macro als .xla oder .xlt (wo ist der unterschied ?) abgespeichert werden,
damit ich es auf weiteren rechnern hinterlegen kann (AppData/Excek/XLSTART/...).

nur wie speichere ich das macro inkl. schaltfläche ab?

 

[Zeruel]

Hi,

so erstelle ich diverse Makros:

Im VBAProject unter "Microsoft Excel Objekte" in "DieseArbeitsmappe" habe folgenden Code stehen:

Private Sub Workbook_Open()
Dim cbCommandBar As CommandBar
Dim cbCommandBarButton As CommandBarButton

Set cbCommandBar = Application.CommandBars.Add("HierDerMakroName", , , True)

cbCommandBar.Visible = True
cbCommandBar.Position = msoBarTop

Set cbCommandBarButton = cbCommandBar.Controls.Add(msoControlButton, , , , True)
cbCommandBarButton.Visible = True
cbCommandBarButton.Style = msoButtonCaption
cbCommandBarButton.Caption = "HierDerMakroName"
cbCommandBarButton.OnAction = "HierDerSubName"

End Sub

dieser legt eine Schaltfläche an.

Und das Ganze als .xla speichern. Dann kannst du es wie alle anderen Add-Ins über extras hinzufügen.

Ich hoffe ich konnte Helfen

Zeruel

 

[DerKleine49]

@
..oder eine Vorlage estellen...F1 oder Assistenden benützen

 

[RayZero]

brauche ich dazu einen extra visual basic editor?

viele grüße

 

[Zeruel]

nein... einfach ...ALT... F11... drücken

 

[RayZero]

hmm also das will alles nicht so ganz.
einen code habe ich ja schon vom aufgezeichneten macro.

jetzt möchte ich dieses macro auf eine schaltfläche zuweisen. das ist ja auch kein
thema.

ABER:

das ganze konstrukt, soll jetzt exportiert bzw. gespeichert werden als addin (xla) damit
es auf jedem pc benutzt werden kann.

kann mir jemand dafür eine kurze schritt für schritt anleitung schreiben?
kann ja nicht allzu schwer sein

viele grüße