Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
500to504
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
500to504
500to504
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Problem mit Textboxen

Problem mit Textboxen
15.10.2004 20:52:49
Rolf
Hallo Excel Profis,
folgendes Problem: ich habe drei Textboxen (aus Steuerelement-Toolbox) in denen ich Zahlen eingebe
Durch betätigen der Schaltfläche werden die Zahlen in Zelle A1, A2, A3 übertragen - für weitere Berechnungen.
Befinden sich in allen Textboxen Zahlen läuft das Makro.
Ist eine Textbox leer und das Marko wird gestartet kommt Laufzeitfehler 13.

Private Sub CommandButton1_Click()
'Wert aus TextBox1,2,3 wird in Zelle A1,A2,A3 übertragen
Sheets("Tabelle1").Range("A1") = CDbl(TextBox1)
Sheets("Tabelle1").Range("A2") = CDbl(TextBox2)
Sheets("Tabelle1").Range("A3") = CDbl(TextBox3)
End Sub

Vielen Dank im voraus
Rolf

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Problem mit Textboxen
Bert
Entweder du übergehst den fehler mit einer On Error- Anweisung, was in diesem fall nicht tragisch wäre, oder du machst eine Abfrage auf Länge oder ob der Wert numerisch ist.
Bert
AW: Problem mit Textboxen
15.10.2004 21:01:16
Hajo_Zi
Hallo Rolf,
mache eine Prüfung ob Textbox "" und danach ob numerish.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


AW: Problem mit Textboxen
15.10.2004 21:11:11
Rolf
Hallo Excel Profis,
kann mir jemand zeigen wie das Makro aussehen muß.
Vielen Dank im voraus
Rolf
Anzeige
AW: Problem mit Textboxen
15.10.2004 21:22:28
Hajo_Zi
Hallo Rolf
If textbox1 "" Then If IsNumeric(textbox1) Then Sheets("Tabelle1").Range("A1") = CDbl(textbox1)
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


AW: Problem mit Textboxen
Rolf
Vielen Dank Hajo
Gruß Rolf

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige