Sie sind vermutlich noch nicht im Forum angemeldet - Klicken Sie hier um sich kostenlos anzumelden Impressum 
Sie können sich hier anmelden
Dieses Thema hat 1 Antworten
und wurde 578 mal aufgerufen
 Berichte und Tipps
glombi Offline



Beiträge: 179

19.10.2018 11:47
RE: Grafik (hier: Unterschrift) mit Formatierung in Word einfügen Zitat · Antworten

Beim Einfügen meiner gescannten Unteschrift in ein Microsoft Word Dokument reichen die Dragon-Befehle nicht aus, da meine Unterschrift groß ist und über die in Computerschrift geschriebene Grußformel ragt. Daher muss sie nachträglich formatiert, nämlich in den Hingergrund (!) gesetzt werden.

Im Internet habe ich dafür ein passendes Microsoft Word Makro gefunden, das bei mir nach geringfügiger Anpassung so aussieht:



Damit wird in einem Rutsch sowohl die Unterschrift eingefügt als auch nachträglich formatiert.

Nach Erstellen des Makros in Word habe ich dann in der "Symbolleiste für den Schnellzugriff" ein Symbol mit der Bezeichnung "Unterschrift einfügen" angelegt, mit dem das Makro durch Mausklick gestartet werden kann:



Um die Unterschrift mit Dragon Spracherkennung einzufügen, kann ich in Word dann einfach

"Klick Unterschrift einfügen"

diktieren.

Klappt sehr gut - mit der kleinen Einschränkung, dass die Unterschrift häufig nicht an der Position des Cursors eingefügt wird, sondern weiter oben im Dokument. Man muss sie dann noch mit der Maus nach unten ziehen.

Sollte jemand ähnlichen Bedarf haben, hier das Skript (Pfad der Unterschrift und Dateiname (fett hervorgehoben) angepassen nicht vergessen!):


Sub UnterschriftEinfügen()
'
' UnterschriftEinfügen Makro
'
Dim obinlineSh As InlineShape, Form As Shape
'statt Selection deine Textmarke oder Paragraph oder...
'Pfad natürlich anpassen!
Set obinlineSh = Selection.InlineShapes.AddPicture(FileName:= _
"C:batchUnterschriftUnterschrift.jpeg", LinkToFile _
:=False, SaveWithDocument:=True)
'dem eingefügen Bild einen key geben
obinlineSh.AlternativeText = "hiho"
obinlineSh.ConvertToShape
For Each Form In ActiveDocument.Shapes
'wenn das Bild den key hat...
If Form.AlternativeText = "hiho" Then
'in den Hintergrund
Form.ZOrder 5
End If
Next
End Sub

-------------------------------------
DPI 15.61
Plantronics Savi 445
Windows 10 64 bit, Office 2019 64 bit

UdoH Offline



Beiträge: 1

09.12.2018 16:14
#2 RE: Grafik (hier: Unterschrift) mit Formatierung in Word einfügen Zitat · Antworten

Vielen Dank für den Beitrag, hat mir sehr geholfen.
Etwas tricky war das Makro einzurichten (man macht es ja nicht alle Tage), aber auf der Hilfeseite von Microsoft war es dann doch recht gut erklärt.
Vor langer langer langer Zeit konnte man die Unterschrift in Word auch per Textkürzel eingeben funktioniert leider aber inzwischen nicht mehr. So gesehen war die Makrolösung etwas aufwendiger aber funktioniert.
Also besten Dank dafür.

Ähnliche Themen Antworten/Neu Letzter Beitrag⁄Zugriffe
Ich kann nicht mehr in Word diktieren.
Erstellt im Forum Fragen zur Anwendung von rc.otto
1 03.05.2023 08:36
von rc.otto • Zugriffe: 391
Word-Makros funktionieren immer wieder einmal nicht.
Erstellt im Forum Skripte und Zusatzprogramme von rc.otto
2 13.03.2023 08:05
von rc.otto • Zugriffe: 168
Wie unter Dragon 16 und MS 365 Skriptbefehle mit Word-VBA-Makros?
Erstellt im Forum Skripte und Zusatzprogramme von Marius_
4 14.03.2023 11:33
von Marius_ • Zugriffe: 348
Kommentarfunktion in Word: Dragon funktioniert nicht mehr
Erstellt im Forum Fragen zur Anwendung von rc.otto
2 12.08.2022 12:22
von Marius_ • Zugriffe: 255
Teile des Diktats in Word "verschluckt"
Erstellt im Forum Fehlermeldungen von HalbMenschHalbKeks
1 16.03.2022 18:20
von HalbMenschHalbKeks • Zugriffe: 272
Formatierung in Word 2019
Erstellt im Forum Fragen zur Anwendung von Gilby2000
1 22.01.2022 15:41
von Marius_ • Zugriffe: 280
Smileys bei Microsoft Word führen zum Absturz von Dragon
Erstellt im Forum Fragen zur Anwendung von Lena
3 29.01.2022 14:39
von Lena • Zugriffe: 374
Add-In für MS-Word.
Erstellt im Forum Fehlermeldungen von Marco
9 30.08.2021 06:56
von Marco • Zugriffe: 971
DRA-Datei in WORD erstellen/speichern
Erstellt im Forum Fragen zur Anwendung von spk347
3 14.04.2021 19:08
von spk347 • Zugriffe: 873
Microsoft Word per Sprachbefehl starten
Erstellt im Forum Fragen zur Anwendung von STAHL
5 07.04.2021 11:25
von STAHL • Zugriffe: 489
 Sprung  
Xobor Ein Kostenloses Forum | Einfach ein Forum erstellen
Datenschutz