Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
496to500
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
496to500
496to500
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Strings subtrahieren

Strings subtrahieren
11.10.2004 17:03:03
Jens_Pu
Hallo Excelfreunde,
brauche mal wieder einen Tip von Euch.
Die MsgBox in folgender Procedure war nur mal zum Test.
Sie zeigt an:
"ComboBox1 ComboBox"
"ComboBox2 ComboBox"
"ComboBox8 ComboBox"
"ComboBox24 ComboBox"
Das ist o.K. so, weil in dem Frame1 nur diese ComboBoxen enthalten sind.
Mir geht es um das Ermitteln der Nummer (nr).
Nach dem Motto "ComboBox8" - "ComboBox" = "8"
Wie mache ich das?

Private Sub test()
Dim c As Control
Dim nr As Integer
For Each c In Me.Frame1.Controls
If TypeName(c) = "ComboBox" Then
MsgBox c.Name & " " & TypeName(c)
'nr = c.Name - TypeName(c)
End If
Next c
End Sub

Gruß Jens

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Strings subtrahieren
ungar
Hallo Jens,
so geht es:
nr = Mid(c.Name, 9)
Danke ungar o.T.
11.10.2004 17:14:40
Jesn_Pu
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige