Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1584to1588
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
Inhaltsverzeichnis

VBA - Hilfe!! Tabellen aus Word in Excel einfügen

VBA - Hilfe!! Tabellen aus Word in Excel einfügen
18.10.2017 08:00:42
Patrick
Hey Jungs, ich brauche mal eure Hilfe!
Ich habe ein Word-Dokument mit mehreren eingefügten Tabellen.
Insgesamt gibt es immer nur 3 Spalten pro Zeile.
In der letzten Zeile steht "iO" oder "n.IO".
Geplant ist alle "n.IO"-Zeilen in eine Excel-Datei zu kopieren.
Alternativ könnten auch erst alle Zeilen kopiert und anschließend die entsprechenden in Excel gelöscht werden.
Leider habe ich festgestellt dass meine Kenntnisse dafür nicht ausreichen.
Hat jemand einen Code für mich?
Vielen Dank,
Patrick

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ein Beispiel
18.10.2017 14:49:01
Fennek
Hallo,
hier ein Beispielcode, der Tabellen von wd nach xl kopiert. Die Zielzelle in xl muss noch angepasst werden.

Sub iFen()
Dim wdDatei As String
wdDatei = ThisWorkbook.Path & "\Bericht.docx"
With GetObject(wdDatei)
For i = 1 To .tables.Count
.tables(i).Range.Copy
ActiveCell.PasteSpecial xlPasteValues
ActiveCell.Offset(10).Select
Next i
End With
End Sub
mfg
Anzeige

332 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige