Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1872to1876
1872to1876
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wortanzahl aus Word in Excel übertragen

Forumthread: Wortanzahl aus Word in Excel übertragen

Wortanzahl aus Word in Excel übertragen
28.02.2022 15:21:34
Marek
Hallo zusammen!
Ist es möglich, die Wörter für einzelne Kapitel in Word zu zählen und diese Wortanzahl nach Kapitel in Excel anzeigen zu lassen?
Word.:
Kapitel 1
Wort Wort Wort
(5 Wörter)
Kapitel 2
Wort Wort Wort Wort Wort
(7 Wörter)
Excel
Kapitel 1: 5
Kapitel 2: 7
Marek
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wortanzahl aus Word in Excel übertragen
28.02.2022 16:19:01
Herbert_Grom
Hallo Marek,
das habe ich dazu von Nepumuk gefunden:

Sub WoerterZaehlen()
Dim objWord As Object, objDocument As Object
Dim strText As String, lngIndex As Long
Set objWord = CreateObject("Word.Application")
objWord.Visible = True
Set objDocument = objWord.Documents.Open("E:\xxx\xxx.docx")
strText = objDocument.Content.Text
objDocument.Close SaveChanges:=False
For lngIndex = 0 To 31
strText = Replace(strText, Chr$(lngIndex), Space$(1))
Next
Do While CBool(InStr(1, strText, Space$(2)))
strText = Replace(strText, Space$(2), Space$(1))
Loop
MsgBox UBound(Split(strText, Space$(1)))
objWord.Quit
Set objDocument = Nothing
Set objWord = Nothing
End Sub
Den Pfad und den Dateinamen musst du natürlich anpassen.
Servus
Anzeige
Ich hab von Word-VBA...
28.02.2022 18:13:54
Word-VBA...
Hi Herbert,
...wirklich wenig bis keine Ahnung - aber in Word selbst gibt es:

ThisDocument.Words.Count
Das müsste man dann doch nur aus Excel heraus "aufrufen"...?
VG, Boris
AW: Wortanzahl aus Word in Excel übertragen
02.03.2022 08:25:38
Marek
Hallo Herbert,
sorry für die späte Rückmeldung. Besten Dank erst mal.
Der Code zählt leider alle Wörter. Ein ähnliches und etwas kürzeres Makro konnte ich bereits in Word erstellen. Auch hier wurden alle Wörter gezählt und in einer Infobox ausgegeben.
Ich muss es schaffen, nur bestimmte Abschnitte (zwischen Kapitel 1 und Kapitel 2 z.B.; die Variablen 1 und 2, die zugleich die Kapitelüberschriften sind, stehen im Excel) zu markieren und die markierten Wörter zu zählen. Und dann diese Zahl als Variable ins Excel zu schreiben.
Mal sehen, was ich aus diesem Code machen - wenn ich ihn dann vollständig verstanden habe. :)
Gruß
Marek
Anzeige

Forumthreads zu verwandten Themen

aus Word-Datei in Excel kopieren
Florian

Hallo liebes Forum,
habe wieder mal eine Frage:
ich will ein Worde-file öffnen, alles kopieren und in ein xls-file einfügen. Kann mir da jemand weiterhelfen?
Danke schon im Voraus!
Gruss Florian
13.08.2008 11:22:00
Thread-ID: 1001444
11 Beiträge
Ecxel Inhalte in Word-Vorlage ausgeben
Alexander

Hallo,
folgende Frage:
Ich möchte Zelleninhalte einer Excel-Tabelle in Formularfelder einer Word-Vorlage übergeben.
Private Sub CommandButton1_Click() Dim wordobj As Object, worddoc As Object Dim Vorlage As String Set wordobj = CreateObject("Word.application") Vorlage = Applicatio...
25.10.2008 21:13:40
Thread-ID: 1019272
3 Beiträge
Ausdruck einer Word-Datei in Excel
Gerhard

Moin moin da draussen
Folgendes Problem, nach dem ich hier schon ne Weile gesucht habe, aber nicht das passende gefunden habe.
Public Sub DRUCK03() 'DRUCK VERPACKUNGSANWEISUNG WORD Dim lloProg As Long With Application.FileSearch .NewSearch .LookIn = "G:\1005 DOKUMENTE\VERPACKUNGSANWEI...
06.11.2008 06:44:00
Thread-ID: 1022119
5 Beiträge
Anzeige
im Seriendruck (Word) Formatierung aus Excel übern
stefan

Hallo,
ich will in Word einen Serienbrief erstellen, in dem ich felder aus einer Exceltabelle übernehme.
U.a. ist ein Feld Betrag, der im Format Währung formatiert ist.
Leider wird in Word dass €-Zeichen nicht mit angezeigt.
Wißt Ihr, was ich anders machen muss?
Danke Euch....
25.11.2008 10:08:39
Thread-ID: 1027584
3 Beiträge
Anzeige
Text aus Word in offenes Excel Dokument
M.Schmidt

Hallo liebe Forum User,
ich bräuchte ganz dringend Eure hilfe!
Erklärung:
Ich habe ein excel dokument dort hab ich einen button durch den daten aus dem excel dokument in eine auf der festplatte abgespeicherte wordvorlage (via Textmarken) einfügt (mittels VBA).
Ich möchte jet...
20.05.2009 15:30:12
Thread-ID: 1076405
2 Beiträge
Eingebundenes Word Objekt aus Excel befüllen
Matze

Hallo zusammen,
ich binde über folgenden Code ein Word-Dokument in ein neues Excel-Worksheet ein:
Private Sub CommandButton1_Click() Sheets.Add after:=Sheets(ThisWorkbook.Sheets.Count) ActiveSheet.Name = "Angebot" ActiveSheet.OLEObjects.Add(Filename:= _ "Pfad", Link:=False, _ Display...
26.05.2009 10:43:20
Thread-ID: 1077295
2 Beiträge
Word-Serienbrief mit versch. Daten aus Excel
Stephan

Hallo zusammen,
habe folgendes Problem: Ich möchte die Nebenkostenabrechnungen für Mieter als Serienbrief erstellen. Die Daten hierfür sind allerdings in verschiedenen Excell-Dateien zu suchen.
Beispiel: Ich habe ein Objekt 1 ("O1"), 30 Mieter. In der Excel-Datei befinden sich die Gesam...
18.06.2009 14:54:26
Thread-ID: 1082615
4 Beiträge
aus in Word eingefügtes Excel wieder Exceldatei
Simon

Hallo,
Ich habe da ein Problem und es wäre schön wenn ihr mir helfen könntet:
Es wurde eine Exceltabelle in Word einfügt als Microsoft Office Excel Arbeitsmappe Objekt. Jetzt würde ich gerne wissen welche Formeln dahinter stehen. Durch einen Doppelklick kann ich das Ganze öffnen, aber d...
04.09.2009 13:38:01
Thread-ID: 1100637
3 Beiträge
aus Word mit Makro in Excel Tabellenblatt wechseln
Joni

Hi,
ich habe das Problem, dass ich aus einem Worddokument eine Exceltabelle, die bereits geöffnet ist, aktivieren möchte und dann da aus 2 Tabellenblättern Werte auslesen. Ich komm da einfach nicht weiter.
Excel als Object habe ich definiert. Beim Workbook und Sheet klappt das nicht meh...
31.10.2009 00:38:15
Thread-ID: 1113446
3 Beiträge
Mit Excel in Word ein Doc aus mehreren Docs
Reinhard

Hallo Wissende,
ich weiß schon, hier ist das optimale Forum für Fragen zu Word :-))
Btw: Kennt ihr ein empfehlenswertes Forum zu Word? Wo auch viel mit Word-Vba steht? Danke vorab.
Ich soll/will aus mehreren Docs, nach Auswahl in Excel welche Docs nun genommen werden sollen ein Haup...
04.01.2010 15:09:14
Thread-ID: 1127047
3 Beiträge
Anzeige
Seriendruck in Word von Excel aus
Karel Hermann

Wertes Forum !
Ist es möglich mit einem Makro von excel aus den Seriendruck in Word mit einer bestimmten Vorlage zu verknüpfen und zu starten?Ich hoffe es gibt eine Lösung !
Danke im Vorhinein.
hermann
17.04.2002 16:24:20
Thread-ID: 114193
2 Beiträge
Daten aus Word mit Layout/Excelsuche in Textfelder
Werner

Hallo!
Ich werde noch irre mit meiner Sache hier...
Ich habe eine Datei im Word-Format.
Die Daten aus der Datei kriege ich ja noch in Excel rein.
Aber dann stimmt ja in Sachen Layout nichts mehr.
Da es 160 Seiten sind ist das manuelle anpassen extrem zeitaufwendig.
Gibt...
14.02.2010 12:20:14
Thread-ID: 1137300
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige