Hallo,
ich habe ein kleines Problem. Seit Jahr und Tag, seit 2007 arbeitet meine Frau an unseren Heimrechner mit Word 2007. Da sie täglich viele Schreiben fertigt, habe ich Ihr ein kleines Makro aus dem Netz gesucht und eingebunden mit dem sie die Faltmarkierungen einbringen kann.
Sub FalzmarkenEinfügen()
Dim oKz As Object
Set oKz = ActiveDocument.Sections(1).Headers(1)
Set FM = oKz.Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, _
Left:=CentimetersToPoints(0), _
Top:=CentimetersToPoints(8.7), _
Width:=CentimetersToPoints(0.2), _
Height:=CentimetersToPoints(0.01))
FM.LockAnchor = True
Set LM = oKz.Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, _
Left:=CentimetersToPoints(0.5), _
Top:=CentimetersToPoints(14.85), _
Width:=CentimetersToPoints(0.4), _
Height:=CentimetersToPoints(0.01))
FM.LockAnchor = True
Set LM = oKz.Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, _
Left:=CentimetersToPoints(0), _
Top:=CentimetersToPoints(19.2), _
Width:=CentimetersToPoints(0.2), _
Height:=CentimetersToPoints(0.01))
FM.LockAnchor = True
Set FM = Nothing
Set LM = Nothing
End Sub
Nun hätte ich eine Frage:
Ist es möglich, das Makro über eine Schaltfläche ausführen zulassen.
Bis jetzt geht es nur so:
- Registerkarte „Ansicht“ - Makros - Makros anzeigen - Ausführen
Ich hätte gern, dass z.B. in der Registerkarte „Seitenlayout“ eine Schaltfläche vorhanden ist.
Ist das möglich? Wenn ja, bin ich auf HILFE angewiesen.
Danke im Voraus.
Ist es möglich, das Makro über eine Schaltfläche ausführen
zulassen.
Ich hätte gern, dass z.B. in der Registerkarte „Seitenlayout“
eine Schaltfläche vorhanden ist.
Hallo Bernd,
Man könnte u.a. folgendes tun:
Das Makro auf eine Tastenkombination legen.
Ein Symbol in der Schnellstartleiste hinzufügen und dem das Makro zuweisen.
Gruß
Reinhard
Danke im Voraus.
Man kann auch - zumindest in VB.NET - AddIns proggen,
damit dürfte es auch gehen.
Die Idee mit der Tastenkombination ist aber mit sicherheit einfacher:smiley:
Grüße
Hallo Reinhard,
Danke für die schnelle Antwort. Nun tut sich gleich das nächste Problem auf: Wie mache ich das? Wenn ich so etwas einmal gemacht habe, dann geht das. Aber bis dahin würde ich nochmals deine Hilfe beanspruchen.
Danke, Bernd
Danke für die schnelle Antwort. Nun tut sich gleich das
nächste Problem auf: Wie mache ich das? Wenn ich so etwas
einmal gemacht habe, dann geht das. Aber bis dahin würde ich
nochmals deine Hilfe beanspruchen.
Hallo Bernd,
was genau meinst du, ich habe dir zwei Möglichkeiten genannt.
Magst du lieber die Tastenkombilösung, also z.B. Strg und einen Buchstaben drücken oder in der Schnellstartleiste auf ein symbol klicken.
Gruß
Reinhard
Morgen Reinhard,
Ich würde lieber ein Symbol in der Schnellstartleiste bevorzugen.
Danke.
Bernd
Makro als Symbol in der Schellstartleiste Word2007
Ich würde lieber ein Symbol in der Schnellstartleiste
bevorzugen.
Hallo Bernd,
wenn das Makro allen docs zur Verfügung stehen soll so stelle es in ein Modul der Normal.dotm.
In der Hilfe steht auch wie man Schnellstartleiste ergänzt/ändert.
Allerdings über Word-Optionen.
Schneller ghet es wenn du mit rechts auf ein vorhandenes Symbol der Schnellstartleiste (= QAT = Quick Access Table) klickst, dann auswählst:
„Symbiolleiste für den Schnellzugriff anpassen…“
Bei „Befehle auswählen“ wählst du Makros…
Gruß
Reinhard
Hallo Reinhard,
DANKE, hat prima geklappt und habe wieder was gelernt.
Tschüss
Bernd