|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
 Ausführung Word-Makro nach Eingabe in Textfeld/Tabelle |
07.05.2020 14:30:49 |
Gast680 |
|
|
|
07.05.2020 14:47:17 |
Gast25986 |
|
|
|
07.05.2020 14:51:11 |
Gast6028 |
|
|
|
07.05.2020 19:03:11 |
Gast25986 |
|
|
|
07.05.2020 19:20:18 |
Gast25986 |
|
|
|
09.05.2020 21:18:27 |
Gast33256 |
|
|
|
10.05.2020 00:20:44 |
Gast25986 |
|
|
|
11.05.2020 12:23:58 |
Gast96818 |
|
|
|
11.05.2020 13:46:38 |
Gast25986 |
|
|
|
12.05.2020 21:55:46 |
Gast97627 |
|
|
|
12.05.2020 22:08:19 |
Gast69721 |
|
|
|
13.05.2020 13:01:03 |
Gast25986 |
|
|
Von:
Gast680 |
Datum:
07.05.2020 14:30:49 |
Views:
1130 |
Rating:
|
Antwort:
|
Thema:
Ausführung Word-Makro nach Eingabe in Textfeld/Tabelle |
|
Liebe Mitglieder,
ich bitte um eure Hilfe. Ich möchte gerne ein Makro automatisch ausführen, nachdem ein Wert (z.B "Laura") als Text in eine Tabelle/Textfeld eingefügt wurde.
Besteht die Möglichkeit sowas in Word durch VBA zu erreichen? Falls ja, wie würde der zugehörige Code aussehen?
Mein aktueller Code lautet wie folgt:
Sub PutNamesInHeader()
Dim sName As String
Open "c:/names.txt" For Input As #5
Do While Not EOF(5)
' get the name
Line Input #5, sName
ActiveWindow.ActivePane.View.SeekView = _
wdSeekCurrentPageHeader
Selection.WholeStory
Selection.Delete
Selection.TypeText Text:=sName
ActiveWindow.ActivePane.View.SeekView = _
wdSeekMainDocument
ActiveDocument.PrintOut
Loop
Close #5
ActiveWindow.ActivePane.View.SeekView = _
wdSeekCurrentPageHeader
Selection.WholeStory
Selection.Delete
ActiveWindow.ActivePane.View.SeekView = _
wdSeekMainDocument
End Sub
Besten Dank im Voraus und viele Grüße
Laura
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Ausführung Word-Makro nach Eingabe in Textfeld/Tabelle |
07.05.2020 14:30:49 |
Gast680 |
|
|
|
07.05.2020 14:47:17 |
Gast25986 |
|
|
|
07.05.2020 14:51:11 |
Gast6028 |
|
|
|
07.05.2020 19:03:11 |
Gast25986 |
|
|
|
07.05.2020 19:20:18 |
Gast25986 |
|
|
|
09.05.2020 21:18:27 |
Gast33256 |
|
|
|
10.05.2020 00:20:44 |
Gast25986 |
|
|
|
11.05.2020 12:23:58 |
Gast96818 |
|
|
|
11.05.2020 13:46:38 |
Gast25986 |
|
|
|
12.05.2020 21:55:46 |
Gast97627 |
|
|
|
12.05.2020 22:08:19 |
Gast69721 |
|
|
|
13.05.2020 13:01:03 |
Gast25986 |
|
|