Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
596to600
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
596to600
596to600
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Formularfelder aus Word auslesen
12.04.2005 08:37:58
Markus
Hallo zusammen,
habe mal eine ziemlich spezielle Frage. Ist es möglich aus Wordformular Textfeldern den Inhalt auszulesen und in Excelzellen oder in VBA als Variablen wiederzugeben? Wenn ja, wie mache ich das? Hätte auch ein konkretes Beispiel parat....
Danke
Markus

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formularfelder aus Word auslesen
12.04.2005 12:03:32
Dani
Hallo Markus,
ich habe leider auch noch keinen Weg gefunden direkt auf die Formularfelder zuzugreifen. Es gibt aber eine Möglichkeit das Problem indirekt zu lösen. Der folgende Code öffnet das Worddokument und speichert die Formularfeldinhalte durch Semikolons getrennt als Textfile. Auf diese Textfiles kannst du aber einfach zugreifen und die Daten einlesen. Du kannst den Code ja noch erweitern und die Temporären Textfiles nach dem auslesen löschen.
Hier der Code


      
Private Sub cmdStart_Click()
Dim appWD As Word.Application
Dim Pfad As String
Dim File As String
Set appWD = CreateObject("Word.Application")
appWD.Visible = 
False
Pfad = Inputbox("Pfad des Wordfiles eingeben")
File = Dir(Pfad)
Do
    appWD.Documents.Add (Pfad & File)
    appWD.ActiveDocument.SaveFormsData = 
True
    File = Left(File, (Len(File) - 3))
    appWD.ActiveDocument.SaveAs ("C:\dein Speicherpfad\") & File & "txt"
    appWD.ActiveDocument.SaveFormsData = 
False
    appWD.ActiveDocument.Close
    File = Dir()
Loop Until File = ""
appWD.Quit
Set appWD = Nothing
MsgBox "Fertig!"
End Sub 
Ich hoffe das hilft dir ein wenig weiter
Gruss
Dani
Anzeige

9 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige