Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1116to1120
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

Verknüpfung Textbox/ComboBox

Verknüpfung Textbox/ComboBox
Eva
Hallo,
ich habe eine TextBox deren Eingabe nur ganze Zahlen zulassen soll (z.B. 1 und 1,0 zulässig) und möchte gerne bei Eingabe von z.B. der Zahl 5 eine ComboBox mit den Zahlen 1,2,3,4,5 befüllen; bei Eingabe von z.B. 7 die entsprechenden 1,2,3,4,5,6,7 in der ComboBox zur Auswahl anbieten.
Da ich mich leider mit VBA sehr schlecht auskenne, bin ich Euch für jegliche Hilfe dankbar.
Viele Grüße,
Eva

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

Betreff
Benutzer
Anzeige
AW: Verknüpfung Textbox/ComboBox
19.11.2009 21:48:06
Josef
Hallo Eva,
Private Sub TextBox1_Change()
  Dim lngI As Long
  With ComboBox1
    .Clear
    If Len(TextBox1) > 0 Then
      If Clng(TextBox1) > 0 Then
        For lngI = 1 To Clng(TextBox1.Text)
          .AddItem CStr(lngI)
        Next
      End If
    End If
  End With
End Sub

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
  Select Case KeyAscii
    Case 48 To 57 'Zahlen
    Case Else
      KeyAscii = 0
  End Select
End Sub

Gruß Sepp

Anzeige
AW: Verknüpfung Textbox/ComboBox
21.11.2009 11:44:37
Eva
Sepp,
es klappt vorzüglich. Dir wünsche ich ein schönes Wochenende!
LG, Eva

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige