mal wieder eine Frage von einem Anfänger:
Wie bekomme ich es hin, daß gemäß meinem u.st. Code ich sowohl Zahlen als auch Buchstaben eingeben kann????
Kann mir jemand weiterhelfen??? Aus der excel-Hilfe kann ich keine Lösung erkennen.
Vielen DAnk im voraus und schönes Wochenende
Andi
Private Sub bsEintragen_Click()
text1 = ComboBox1.Text
text2 = ComboBox2.Text
text3 = ComboBox3.Text
Set c = Sheets(text3).Range("A2:A200").Find(text1, LookIn:=xlValues)
If Not c Is Nothing Then
Zeile = c.Row
Else
MsgBox text1 & " nicht gefunden!"
End If
Set b = Sheets(text3).Range("D1:J1").Find(text2, LookIn:=xlValues)
If Not c Is Nothing Then
Spalte = b.Column
Else
MsgBox text2 & " nicht gefunden!"
End If
If Not tfText = "" Then
Sheets(text3).Cells(Zeile, Spalte).Value = CInt(tfText.Text)
Call Summe_anzeigen
Else
MsgBox "Wert in Textfeld eingeben!"
tfText.SetFocus
End If
End Sub