Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
412to416
412to416
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Textboxen Inhalt löschen

Forumthread: Textboxen Inhalt löschen

Textboxen Inhalt löschen
12.04.2004 19:36:56
Anikeb
Hallo
Ich hab ein Problem. Ich möchte von einem Commandbutton, denn Inhalt mehre Textboxen die über verschiedene Worksheets verteilt sind löschen.
Danke im Voraus für Eure Hilfe.
Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textboxen Inhalt löschen
12.04.2004 20:13:46
Josef Ehrensberger
Hallo ?
Dieser Code sollte es tun!

' **************************************************************
' Modul: Modul1 Typ = Allgemeines Modul
' **************************************************************
Option Explicit

Private Sub AlleTextBoxenLeeren()
Dim objO As OLEObject
Dim wks As Worksheet
For Each wks In ThisWorkbook.Sheets
For Each objO In wks.OLEObjects
If TypeName(objO.Object) = "TextBox" Then
objO.Object.Text = ""
End If
Next
Next
End Sub

Code eingefügt mit: Excel Code Jeanie

Gruß Sepp


Ein kluger Mann macht nicht alle Fehler selbst.
Er lässt auch anderen eine Chance.
(Sir Winston Churchill)


Anzeige
AW: Textboxen Inhalt löschen
12.04.2004 21:00:14
anikeb
Danke für die schnelle Antwort
Habe es ins Modul kopiert, brauche noch ein bisschen Hilfe.
Kannst du mir noch weiterhelfen Sepp.
Danke
AW: Textboxen Inhalt löschen
12.04.2004 21:30:40
Josef Ehrensberger
Hallo
Wo liegt das Problem?

Gruß Sepp


Ein kluger Mann macht nicht alle Fehler selbst.
Er lässt auch anderen eine Chance.
(Sir Winston Churchill)


Anzeige
AW: Textboxen Inhalt löschen
12.04.2004 21:55:57
anikeb
Wo muss ich den code kopieren?
Hab es ins Modul kopiert. Aber es funktioniert nicht.
Ich wollte alles über ein Commandbutton löschen.
AW: Textboxen Inhalt löschen
12.04.2004 22:05:33
Josef Ehrensberger
Hallo (ein Name wäre schön!)
Angenommen der CommandButton heist "CommandButton1"
und befindet sich auf Tabelle1, dann gehört folgender
Code in das Modul der Tabelle.
(einfach geht's auch mit rechtsklick auf den Button > Code anzeigen)
Option Explicit

Private Sub CommandButton1_Click()
Dim objO As OLEObject
Dim wks As Worksheet
For Each wks In ThisWorkbook.Sheets
For Each objO In wks.OLEObjects
If TypeName(objO.Object) = "TextBox" Then
objO.Object.Text = ""
End If
Next
Next
End Sub

Code eingefügt mit: Excel Code Jeanie

Gruß Sepp


Ein kluger Mann macht nicht alle Fehler selbst.
Er lässt auch anderen eine Chance.
(Sir Winston Churchill)


Anzeige
AW: Textboxen Inhalt löschen
12.04.2004 23:43:23
anikeb
Hallo Sepp
Sorry mein Name ist Mario.
Der Code den du mir gegeben hast funktioniert nicht.
AW: Textboxen Inhalt löschen
13.04.2004 00:51:30
Josef Ehrensberger
Hallo Mario!
Dann hast du keine Textboxen aus der Steuerelemente-Toolbox
in deinen Tabellen!

Gruß Sepp


Ein kluger Mann macht nicht alle Fehler selbst.
Er lässt auch anderen eine Chance.
(Sir Winston Churchill)


Anzeige
AW: Textboxen Inhalt löschen
13.04.2004 00:59:02
anikeb
Es läuft. Danke nochmal.
Jetzt hab ich aber ein anderes Problem. Ich hab in anderen Textboxen artikelbeschreibungen die werden jetzt auch gelöscht.
Und das sollte nicht sein. Diese sind widerum mit einer anderen Tabelle verbunden.
Könnte ich diese Artikelbeschreibungen auch in Labels schreiben bzw. verknüpfen?
Ich hab es versucht finde aber nichts.
Danke
Mario
Anzeige
AW: Textboxen Inhalt löschen
13.04.2004 01:08:40
Josef Ehrensberger
Hallo Mario!
Befinden sich die TextBoxen die nicht gelöscht werden sollen
alle in einer Tabelle, oder sind sie über alle Tabellen verteilt?

Gruß Sepp


Ein kluger Mann macht nicht alle Fehler selbst.
Er lässt auch anderen eine Chance.
(Sir Winston Churchill)


Anzeige
AW: Textboxen Inhalt löschen
13.04.2004 01:14:58
anikeb
Die sind alle verteilt. Die Textboxen die gelöscht werden sollen sind nur für die Menge bestimmt! Nur bei denen soll der Inhalt gelöscht werden.
AW: Textboxen Inhalt löschen
13.04.2004 01:23:17
Josef Ehrensberger
Hallo Mario!
Zuerst musst du die namen aller Textboxen die NICHT gelöscht
werden sollen ändern!
Und zwar für mein Beispiel von z.B. "TextBox1" in "XTextBox1".
Also immer ein "X" an den Beginn des namens setzen!
Und dann verwendest du diesen Code:
Option Explicit

Private Sub CommandButton1_Click()
Dim objO As OLEObject
Dim wks As Worksheet
For Each wks In ThisWorkbook.Sheets
For Each objO In wks.OLEObjects
If TypeName(objO.Object) = "TextBox" Then
If Left(objO.Name, 1) <> "X" Then
objO.Object.Text = ""
End If
End If
Next
Next
End Sub
Code eingefügt mit: Excel Code Jeanie

Gruß Sepp


Ein kluger Mann macht nicht alle Fehler selbst.
Er lässt auch anderen eine Chance.
(Sir Winston Churchill)


Anzeige
AW: Textboxen Inhalt löschen
13.04.2004 06:40:36
anikeb
Vielen Dank Sepp. Es funktioniert wunderbar.
Ich hab noch eine Bitte. Wie kann ich wenn ich in die Textboxen die menge eintrage, die
Artikel Beschreibungen in eine Neue Tabelle so kopieren, dass immer in die nächste Zeile kopiert wird. Also immer geprüft wird ob die Zeile schon vergeben ist.
Danke Sepp
Mario
Anzeige
;

Forumthreads zu verwandten Themen

Wert aus Combobox zurückgeben in Textboxen
Peter

Hallo wertes Form
bin kurz vor der Vollende meinesWerkes
benötige aber noch die Hife aus dem Forum
Ich habe eine Combox19, die beim öffnen die 5000-26000 in 100 Steps an zeigt
Wenn ich den wert 0 bis 6999 eingebe soll in einer Textbox27 der wert 130 ausgegeben werden.
ab dem...
10.08.2008 20:06:00
Thread-ID: 1000671
7 Beiträge
Addieren von Textboxen - Fehlermeldung
Textboxen

Hallo nochmals
ich mochte mit folgender Zeile Textboxen addieren:
Private Sub TXT_ZEIT3_Change() TXT_ERG = CDbl(TXT_ZEIT1.Value) + CDbl(TXT_ZEIT2.Value) + CDbl(TXT_ZEIT3.Value) End Sub
Funzt...
Allerdings wenn ich jetzt in txt_Zeit1 oder txt_Zeit2 die Zahl lösche um sie zu ve...
13.08.2008 23:47:20
Thread-ID: 1001684
8 Beiträge
Wie kann ich 3 Textboxen wert addieren
Kurt

Guten Abend,
wie kann ich 3 Werte der Textboxen addieren ?
Habe es so versucht:
Label69.Caption = TextBox13.Value + TextBox14.Value + TextBox15.Value
mfg Kurt
(nicht Orginal)
14.08.2008 20:54:00
Thread-ID: 1001982
4 Beiträge
Färben von Textboxen in Userform
Textboxen

Guten Morgen!
Ich habe in einer UserForm 22 TextBoxen in denen Zahlen stehen.
Wenn eine positive Zahl in den Textboxen steht, dann soll der Hintergrund (Backcolor) grün gefärbt werden.
Wenn eine negative Zahl in den Textboxen steht dann soll der Hintergrund hellrot gefärbt werden.<...
21.08.2008 07:38:00
Thread-ID: 1003354
4 Beiträge
Formateierung von Textboxen in einer Userform
Textboxen

Hallo, nochmal 'ne warscheinlich blöde Frage:
Wie man Schriftart, Farbe etc. für Textboxen einstellt, bekomme ich hin. Aber
wie lege ich fest, dass es sich um das Format "Zahl" mit x Kommastellen oder
ähnliches handeln soll? - Hintergrund:
Auf einer Userform muß der Benutzer in...
16.09.2008 16:24:26
Thread-ID: 1010158
2 Beiträge
TextBoxen formatieren
Frank

Hallo liebes Forum!
Wieder einmal brauche ich Rat! In einem Tabellenblatt befinden sich mehrere Textboxen, welche über die Eigenschaft LinkedCell sich ihren Inhalt holen. Nun möchte ich das wenn der darin befindliche Wert negativ ist, der Inhalt rot geschrieben wird. Wie bekomme ich zwische...
28.10.2008 20:37:00
Thread-ID: 1020080
10 Beiträge
TextBoxen werden nicht geleert
Josef

Hallo!
Ich habe folgenden Code in einer Userform
Private Sub ListBox1_Click() On Error Resume Next If ListBox1.List(ListBox1.ListIndex, 7) = "EV-N / FV-XPV" Then Call Text_EF Call Text_EF2 Call Text_EF3 TextBox40.Text = "" Else If ListBox1.List(ListBox1.ListIndex, 7) = "J" Then TextBo...
29.10.2008 14:19:00
Thread-ID: 1020283
3 Beiträge
Anzeige
Textboxen aus Tabelle füllen
Sebastian

Guten Abend zusammen,
ich sitze wieder mal vor einem Problem und hoffe auf eure Hilfe. Ich habe eine Tabelle mit Kundennamen, die sich von Monat zu Monat verändert. Ich möchte nun (wenn möglich) eine Userform mit einer variablen Anzahl von Textfeldern auf "Knopfdruck" generieren, wobei die...
03.11.2008 18:25:00
Thread-ID: 1021413
6 Beiträge
Nur Zahlen in sehr vielen Textboxen
uli

Hallo,
habe ein im Internet gefunden, der allerdings noch ein bisschen angepasst werden muss. Vielleicht könnt ihr mir helfen, da ich an dieser Stelle nicht mehr weiterkomme.
Ich möchte die Eingabe von Buchstaben in mehreren Textboxen verbieten. Dies mache ich mit folgendem Code in eine...
13.11.2008 10:24:00
Thread-ID: 1024091
3 Beiträge
Rechnen mit TextBoxen
Frank

Hallo Zusammen!!!
Einen schönen guten Abend und schon vorab Danke für bestimmt zahlreiche Hilfe!
Ich benutze folgenden Code:
TextBox4.Value = TextBox2.value - TextBox3.Value
Diese Codezeile wird mittels Klick auf eine Schaltfläche ausgelöst. Funzt mit normalen Zahlen auch Super,...
14.11.2008 19:27:33
Thread-ID: 1024690
7 Beiträge
Userform Textboxen Text in Tabelle schreiben
Erich

Hallo Excelprofis,
habe ein Problem und hoffe ich könnt mir weiterhelfen.
ich habe eine Userform mit 100 Textboxen
1. ich will den inhalt der Textboxen 1 - 50 in die Tabelle Gültigkeit Spalte A 1 bis A50 eintragen den inhalt der Textboxen 51 - 100 in die Spalte B 1 bis B50
2...
18.11.2008 19:16:31
Thread-ID: 1025756
6 Beiträge
Textboxen auf Sheet per drag drop verschieben
Joachim

Hi,
ich habe auf einem Sheet ein paar Textboxen und würde diese im laufenden Betrieb (Maktos aktiviert) gerne mit der Maus auf dem Sheet bewegen und an anderer Stelle platzieren. Habe mich mit drag drop aber noch kein bisschen beschäftigt.
Geht das irgend wie ?
Danke Joachim
05.12.2008 17:14:00
Thread-ID: 1030513
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige