Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1112to1116
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
Inhaltsverzeichnis

vierstellige Zahl aus einer ComboBox auslesen

vierstellige Zahl aus einer ComboBox auslesen
David
Hi ihr,
ich versuche gerade aus einem ComboBoxeintrag z.B. "ab 2018" nur die Zahlen 2018 auszulesen, kriege das mit diesem Code aber leider nicht hin:
 Worksheets("Tabelle6").Cells(77, 3) = Val(Worksheets("Tabelle5").ComboBox2.Value)
Weiss jemand vlt. eine Lösung?
LG, Daniel

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: vierstellige Zahl aus einer ComboBox auslesen
29.10.2009 16:26:59
ransi
HAllo DAniel
Hier hast du mal einige Ansätze auf denen man aufbauen kann:
Option Explicit

Public Sub test()
MsgBox Right(Sheets("Tabelle1").ComboBox1.Value, 4)
MsgBox Split(Sheets("Tabelle1").ComboBox1.Value, " ")(1)
MsgBox Replace(Sheets("Tabelle1").ComboBox1.Value, "ab ", "")
MsgBox NurZahlen(Sheets("Tabelle1").ComboBox1.Value)
End Sub



Public Function NurZahlen(zelle)
Dim Regex As Object
Set Regex = CreateObject("Vbscript.Regexp")
With Regex
    .Pattern = "\D"
    .Global = True
    NurZahlen = .Replace(zelle, "")
End With
Set Regex = Nothing
End Function


ransi
Anzeige

319 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige