Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Wörter zählen
zurück: Steuerlementfelder in Word per Makro deaktivieren weiter: Auswahl in Formular auslesen und in Text einfügen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Gast



Verfasst am:
29. Jan 2010, 20:01
Rufname:

Wörter zählen - Wörter zählen

Nach oben
       Version: Office 2k (2000)

Hallo,

kann man irgendwie es machen, dass die Anzahl der Wörter in einem Dokument angezeigt wird und zwar dauerhaft.

Danke.
Hubert_R
Gast


Verfasst am:
29. Jan 2010, 21:38
Rufname:


AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2k (2000)

Hallo,

leider habe ich kein Word 2000.
In Word XP/2003 gibt es die Symbolleiste Wörter zählen.
Vielleicht ist sie auch in Word 2000 unter Ansicht|Symbolleisten
zu finden.

Grüsse Hubert
Lisa
Moderator; Word seit Word 5.0 (für DOS)


Verfasst am:
30. Jan 2010, 11:40
Rufname:
Wohnort: Leipzig

AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2k (2000)

Hallo zusammen,

in Word 2000: Menü Extras - Wörter zählen.

Gruß
Lisa
Gast



Verfasst am:
30. Jan 2010, 20:04
Rufname:

AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2k (2000)

Ok, aber geht sowas in dieser Version dynamisch?

Sprich, wenn ich schreibe, dass dann die Anzahl weiter steigt und ich nur einen Blick zu werfen brauche um die Zahl sehen zu können.

So wie in der 2007 Version. Da ist unten auch eine kleine Leiste, die die Anzahl der Wörter zählt.
Lisa
Moderator; Word seit Word 5.0 (für DOS)


Verfasst am:
31. Jan 2010, 00:56
Rufname:
Wohnort: Leipzig


AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2k (2000)

Hallo Gast,

in Word 2002 gibt es die Leiste, allerdings muss dort jedesmal auf "Neu zählen" geklickt werden, wenn die Anzahl aktualisiert werden soll. Eine Automatik wie in Word 2007 gibt es nicht. In Word 2000 gibt es die Symbolleiste gar nicht, man kann den Befehl, wie genannt verwenden. Eine Automatik steht nicht zur Verfügung.

Allenfalls könnte man sich selbst eine Anzeige mit VBA besteln, die die Anzahl der Wörter anzeigt. Nur muss das ja irgendwie ausgelöst werden. Entweder eine Anzeige in einer Symbolleiste mit Application-Event mit WindowSelectionChange, nur würde das ja auch nur aktualisiert, wenn im Dokument etwas anderes ausgewählt wird, nicht beim einfachen Schreiben. Man müsste also den Cursor bewegen, um die Anzeige zu aktualisieren.

Ob Dir das den Aufwand wert ist, kannst Du nur selbst wissen.

Gruß
Lisa
Gast



Verfasst am:
31. Jan 2010, 10:18
Rufname:

AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2k (2000)

Danke für die schnellen Antworten.
Hubert_R
Gast


Verfasst am:
01. Feb 2010, 18:32
Rufname:

AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2k (2000)

Hallo Lisa, hallo Gast,

ich habe ein Dokument mit einer Userform ohne Titelzeile.
Diese kann dauernd angezeigt werden, weil sie so klein ist.
Man muss darauf achten, dass die Form vbModeless auf-
gerufen wird, damit im Dokument gearbeitet werden kann.
Die Anzeige wird im Sekundentakt mit einem VBA-Timer
aktualisiert. Der Timer ist im Archiv enthalten und muss vor
dem ersten Start über den VBA-Editor registriert werden.

Grüsse Hubert
Code:
http://www.file-upload.net/download-2217402/ZeichenZaehlen.zip.html
Lisa
Moderator; Word seit Word 5.0 (für DOS)


Verfasst am:
02. Feb 2010, 00:13
Rufname:
Wohnort: Leipzig

AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2k (2000)

Hallo Hubert,

ja super! Das funktioniert genau, wie gewünscht.
Das meinte ich mit "Basteln".

Dein Beispiel hat mich inspiriert, hab auch noch eins gebastelt. Statt einer Userform ist in der Vorlage eine Symbolleiste "WoerterZaehlen" angelegt und dort einfach ein Textfeld als Anzeige benutzt.
Im normalen Mdul:
Code:
Option Explicit

'============================================================================
' Windowstimer setzen
'============================================================================
Declare Function SetTimer Lib "user32" _
    (ByVal hwnd As Long, _
    ByVal nIDEvent As Long, _
    ByVal uElapse As Long, _
    ByVal lpTimerFunc As Long) _
As Long
'============================================================================
' Windowstimer löschen
'============================================================================
Declare Function KillTimer Lib "user32" _
    (ByVal hwnd As Long, _
    ByVal nIDEvent As Long) As Long

Public Const lngAPITIMER    As Long = &H10000
Public lngTIMERID           As Long

Public myControl As CommandBarControl

Sub AutoExec()
   
    CustomizationContext = ThisDocument
    If Application.CommandBars("WoerterZaehlen").Enabled Then
        If Application.CommandBars("WoerterZaehlen").Visible = False Then
            Application.CommandBars("WoerterZaehlen").Visible = True
        End If
    Else
        Exit Sub
    End If
   
    Set myControl = Application.CommandBars("WoerterZaehlen").Controls(2)
   
    lngTIMERID = SetTimer(0, lngAPITIMER, 1000, AddressOf Timer_Procedure)

End Sub

Sub Timer_Procedure()

    myControl.Text = ActiveDocument.ComputeStatistics(wdStatisticWords) & " Wörter"
    ThisDocument.Saved = True
       
End Sub

Sub AutoExit()

    KillTimer 0, lngTIMERID
    myControl.Text = ""
    ThisDocument.Saved = True

End Sub

Sub ExtrasWörterZählen()

    myControl.Text = ActiveDocument.ComputeStatistics(wdStatisticWords) & " Wörter"
    Application.Run "ToolsWordCount"
   
End Sub


Ich häng die Vorlage auch an, braucht bloß ins Vorlagen- oder StartUp-Verzeichnis kopiert zu werden und kann dann als AddIn benutzt werden.

Gruß
Lisa



WoerterZaehlen.dot
 Beschreibung:

Download
 Dateiname:  WoerterZaehlen.dot
 Dateigröße:  38 KB
 Heruntergeladen:  344 mal

Dinijan
Gast


Verfasst am:
22. Apr 2010, 11:44
Rufname:

AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2k (2000)

Hallo Lisa, hallo Hubert,

habe Eure Beiträge mit Interesse gelesen. Eine Frage dazu: Werden bei der Zählung mit Word -> Wörter zählen mit Leerzeichen auch die Zeichen in Kopf- und Fußzeilen (nicht: Fußnoten) mitgezählt?

Anne
Gast12345
Gast


Verfasst am:
22. Apr 2010, 12:43
Rufname:

AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2k (2000)

Hallo Lisa,

hab Deinen Code ausprobiert, bekomme aber die Fehlermeldung wenn ich nicht vorher das Makro AutoExec im neuen Dokument ausführe.

Gruss

Peter
Lisa
Moderator; Word seit Word 5.0 (für DOS)


Verfasst am:
22. Apr 2010, 14:19
Rufname:
Wohnort: Leipzig

AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2k (2000)

Hallo Peter,

wenn Du die Datei ins StartUp-Verzeichnis von Word kopierst, wird das AutoExec-Makro der Vorlage automatisch ausgeführt, wenn Du Word startest. Da brauchst Du gar nichts weiter zu machen. Höchstens noch kontrollieren, dass in Extras - Makro - Sicherheit - Registerkarte: Vertrauenswürdige Quellen die Option Allen installierten AddIns und Vorlagen vertrauen angehakt ist.

Gruß
Lisa
solutioner
prosumer


Verfasst am:
22. Okt 2012, 11:46
Rufname:

AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2003

Hallo Lisa,

Dein VBA-Script lässt sich probemlos auführen, eine sehr gelungene Erweiterung für Word 2003! Allerdings erscheint beim Schließen von Word (nach dem problemlosen Schließen des Dokumentes) immer eine Laufzeitfehlermeldung.

Gibt es hier Abhilfe?

Danke & Viele Grüße
MarkMH_K
z.Z. gaanz unregelmäßig online


Verfasst am:
22. Okt 2012, 12:18
Rufname: Markus
Wohnort: Köln rrh

AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2k (2000)

Hi,

Leider schreibst Du nicht, welche Fehlermeldung kommt. Ich vermute 'mal, daß Du nicht mehr Word2003 benutzst und daß Application.Run "ToolsWordCount" den Fehler auslöst. Bitte berichte.

M.
solutioner
prosumer


Verfasst am:
22. Okt 2012, 12:47
Rufname:


AW: Wörter zählen - AW: Wörter zählen

Nach oben
       Version: Office 2003

Hi@all,

die Fehlermeldung lautet:
"Microsoft Visual Basic
Laufzeitfehler '4248':
Dieser Befehl ist nicht verfügbar, weil kein Dokument geöffnet ist."

Word stürzt nach dem (allerdings stets problemlosen) Schließen eines Dokumentes ab.

In dem VBA Script wird offenbar ein Timer gesetzt und vermutlich nicht beendet, oder was meint Ihr?
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Word Formate: 2 Wörter "verbinden" 3 Luc 6512 14. Jan 2013, 19:55
Gast 2 Wörter "verbinden"
Keine neuen Beiträge Word Formate: Word rückt Wörter zusammen, löscht Freizeichen 1 tesabu 2037 27. Mai 2011, 09:08
Netzverbindung Word rückt Wörter zusammen, löscht Freizeichen
Keine neuen Beiträge Word Formate: Word 2010, Wörter zählen 3 hexe3967 7586 05. Jan 2011, 15:22
stefan75 Word 2010, Wörter zählen
Keine neuen Beiträge Word Serienbriefe: Reihenfolge der Wörter umkehren 0 FranzLu 1006 27. Okt 2010, 18:32
FranzLu Reihenfolge der Wörter umkehren
Keine neuen Beiträge Word Formate: Zeilen zählen in word! 2 Balmain 4364 12. Aug 2010, 10:34
mojos Zeilen zählen in word!
Keine neuen Beiträge Word Formate: Formatvorlage erstellen, die kursive Wörter kursiv lässt 1 Gast 2203 09. Jun 2010, 14:43
Gast Formatvorlage erstellen, die kursive Wörter kursiv lässt
Keine neuen Beiträge Word Formate: Wie kann ich Wörter getrennt formatieren? Word2003 3 Landkreis_BB 1301 28. Feb 2010, 14:41
Lisa Wie kann ich Wörter getrennt formatieren? Word2003
Keine neuen Beiträge Word Formate: Problem mit Formeleditor: Wörter nur teilweise kursiv 2 Hanspompom 4053 28. Jul 2009, 09:28
Hanspompom Problem mit Formeleditor: Wörter nur teilweise kursiv
Keine neuen Beiträge Word Formate: Deutsche Wörter Filtern! 0 Tronix 906 23. Feb 2009, 00:59
Tronix Deutsche Wörter Filtern!
Keine neuen Beiträge Word VBA Programmierung (Makros): Buchstaben PRO seite zählen 1 Alien2 1520 31. Jan 2008, 10:55
HermannL Buchstaben PRO seite zählen
Keine neuen Beiträge Word Formate: buchstaben in wörter einfügen funzt nicht mehr 3 xmix 789 18. Jun 2007, 20:24
Spoeti buchstaben in wörter einfügen funzt nicht mehr
Keine neuen Beiträge Word VBA Programmierung (Makros): Wörter fett darstellen 7 Darkness 1095 20. Apr 2007, 08:56
Darkness Wörter fett darstellen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Project