Schlagwort: Textfeld

Bist du Brillenträger? – Nein, die Druckstellen auf der Nase kommen vom Bierglas.

VBA-Befehle, Word nervt auch

Boah, ist das mies!

Ich soll ein kleines Programm schreiben, das alle Word-Vorlagen in einem Dokument öffnet und ein Barcodefeld am unteren Ende der Seite einfügt.

Klappt ziemlich gut. Bei einigen allerdings nicht.

Vor allem bei Formularen, auf denen vorher ein Schutz war (den ich per VBA entfernt habe), zickt er. Word macht bei dem Befehl

Set wdTextbox = wdDokument.Shapes.AddTextbox(msoTextOrientationHorizontal, (210 - 18) * 2.54, (297) * 2.54, 113, 85)

Gar nichts. Einfach nichts. Nada. Nicht einmal einen Fehler.

Bis ich dahinter komme:

Nach Aufheben des Schutzes befindet sich der Cursor (meistens) in einem Formularfeld:

Obwohl das wdDokument das aktuelle Dokument meint, fügt Word vielleicht (?) die Textbox in das Formularfeld ein. Egal: einige Versuche: Springt man zum Ende des Dokuments und wieder zum Anfang und fügt dann das Shape ein, so klappt es:

    wdDokument.Activate
    Selection.EndKey Unit:=wdStory
    Selection.HomeKey Unit:=wdStory
    ' -- damit der Cursor nicht in einem Formularfeld sitzt
    
    ' -- erstelle den QR-Code
    Set wdTextbox = Dokument.Shapes.AddTextbox(msoTextOrientationHorizontal, (210 - 18) * 2.54, (297) * 2.54, 113, 85)
Kommentar hinterlassen ,

Hab mal ein Zettelchen unters Bett geklebt. Für das Monster. Heute darf das Monster in meinem Bettchen schlafen. Bin einsam.

VBA-Befehle, Word nervt auch

Hallo Hr. Martin. Wie kann ich in VBA prüfen, ob ein Textfeld als Formularsteuerelement das mit einer Textmarke versehen ist (z Bsp.“TMThemaPos16″) leer ist. Laut Lokal-Fenster soll es ein String mit 5 Leerzeichen sein. Diese Prüfung wird aber ignoriert. Auch auf Empty prüfen bringt keinen Erfolg. Ich muss den Inhalt der Textmarken in eine Excel überführen, die stetig erweitert wird. Es können 30 Themen ins Formular eingetragen werden. Ab einer leeren Textmarke der Kategorie „Thema“, soll die Prozedur beendet werden. Vielen Dank für ihre Unterstützung.

###

Hallo Herr W.,

Wenn ich Ihr Problem richtig verstanden habe, würde ich das folgendermaßen lösen: Formularsteuerelemente haben keinen Namen und können deshalb nicht direkt angesprochen werden. Hinterlegen Sie bei der Eigenschaft „Tag“ einen Text. Durchlaufen Sie mit einer Schleife alle ContentControls und überprüfen Sie, ob das ContentControls(i) den Tag = „yxz“ hat. Wenn ja, dann können Sie den Text auslesen: ActiveDocument.ContentControls(1).Range.Text Ist das die Antwort auf Ihre Frage?

LG und ein schönes Wochenende

Rene Martin

###

Hallo Hr. Martin.

Ich hab das jetzt über die ASC-Funktion gelöst. Frage somit ab, welches ASCII Zeichen die Textmarke hat und wenn diese (in meinem) Fall 32 ist, dann ist sie leer.

Kommentar hinterlassen , ,

Hat jemand die Nummer von der Stiefmutter von Schneewittchen. Ich bräuchte mal ein paar Äpfel.

Dateneingabe, Userforms

Kennt ihr das? Eigentlich sollte es nicht so sein. Aber einer der Kunden bestellt unbedingt darauf. Hat auch einen guten Grund dafür.

Der Kunde ist König!

Nun – gut – soll er seinen Willen haben!

In einem sehr umfangreichen Projekt, das mit VBA realisiert wurde, soll eine Auswahl über eine Auswahlliste getroffen werden. Aber eben ein Kunde möchte Freitext haben. Eigentlich widerspricht dies dem Workflow.

Also füge ich unter der Liste ein Textfeld (!) ein und formatiere es so, dass es aussieht als wäre es ein Bezeichnungsfeld. Man muss einige der Eigenschaften ändern:

Das verraten wir natürlich nur einem Kunden. Damit DER Freitext eingeben kann. Weil er es will. Weil er es braucht. Eben: weil der Kunde König ist:

Kommentar hinterlassen , , ,

Heute habe ich gelesen, was auf der Flasche Shampoo steht: Für extra Volumen und mehr Fülle!!! Kein Wunder, dass es mir schwerfällt, mein Gewicht zu kontrollieren! Ich werde ab sofort Geschirrspülmittel benutzen! Da steht drauf: entfernt auch hartnäckiges Fett.

Excel rechnet falsch, Userforms, Zahlenformate

Einfach nicht aufgepasst!

Mit VBA wird eine Userform (eine Maske) erstellt zur bequemen Dateneingabe. Der Wert eines Textfeldes wird als String interpretiert und als solcher bei Dezimalzahlen in eine Excelliste eingetragen. Man erkennt es, weil die Zahlen linksbündig in der Zelle stehen:

Dummerweise wird ein Text immer größer als eine Zahl definiert, so dass eine Formel

=WENN(J2>1000;WAHR;FALSCH)

immer WAHR liefert!

Kommentar hinterlassen , , , ,

My therapist told me to delete this app

Dateneingabe

Gestern Excelschulung. In der Kaffeepause sah mich eine Teilnehmerin der letzten Schulung: „Ach, wie gut, dass ich dich sehe – du kannst mir sicherlich helfen! Ich habe eine Exceldatei mit einem Kästchen, das ich nicht löschen kann.“ Bevor ich ihr eine mögliche Antwort geben konnte, schleppte sie mich an ihren Rechner und zeigte mir das Kästchen:

Ein Textfeld! Das war eine leichte Übung: Registerkarte „Entwicklertools“ einschalten, „Entwurfsmodus“ aktivieren, Textfeld markieren und löschen:

Das Ergebnis: die Damen war glücklich!

2 Kommentare , , , , , ,

Für eine vernünftige Headline fehlt mir die richtige Kreativitätstechnik

Merkwürdige Diagramme

Vergessen?

Viele Dialog kann man an der rechten Ecken Ecke „aufziehen“, das heißt vergrößern. Das ist gut und wichtig, weil sich dadurch das Eingabefeld vergrößert und der darin befindliche Text lesbar wird. Leider ist dies nicht bei allen Dialogen der Fall, wie beispielsweise bei den Diagrammen: Daten auswählen (Registerkarte „Entwurf“) / Bearbeiten):

Haben die das vergessen?

Kommentar hinterlassen , , ,

Summe rechnet falsch

Excel rechnet falsch

Man braucht schon ein sehr gutes Auge, um auf Anhieb erkennen zu können, warum Excel hier falsch rechnet.

Ein Tipp: Wenn man mit den Mauszeiger über den Bereich streicht, fällt auf, dass er seine Gestalt bei der Zahl 3 ändert. Ein Klick darauf ertappt den „Bösewicht“: Auf der Zelle liegt ein weißes Textfeld, in dem die Zahl 3 steht. Darunter steht natürlich eine andere Zahl.

Warum rechnet die Summe nicht richtig?

Warum rechnet die Summe nicht richtig?

Der "seltsame" Mauszeiger gibt einen Hinweis.

Der „seltsame“ Mauszeiger gibt einen Hinweis.

Ein Textfeld ...

Ein Textfeld …

... und darunter eine andere Zahl.

… und darunter eine andere Zahl.

Kommentar hinterlassen , ,