Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
25.02.2011 13:36:42 |
Daniel001 |
|
|
|
25.02.2011 14:10:05 |
Severus |
|
|
|
25.02.2011 15:08:39 |
Daniel001 |
|
|
Auswahl in KomboBox, durchsuchen einer Exceltabelle, Ausgabe in Textfeld |
25.02.2011 16:40:34 |
Severus |
|
|
|
28.02.2011 12:20:04 |
Daniel001 |
|
|
Von:
Severus |
Datum:
25.02.2011 16:40:34 |
Views:
868 |
Rating:
|
Antwort:
|
Thema:
Auswahl in KomboBox, durchsuchen einer Exceltabelle, Ausgabe in Textfeld |
Annahme: Die Werte Beispiel1 bis 3 stehen in A1:B3, die Werte Beispeil_n, _m in A5:B6.
Du brauchst die zwei Kombinationsfelder ComboBox1 und ComboBox2 mit den Eigenschaften
-
BoundColumn=2
-
ColumnCount=2
-
ColumnWidth=90;0 (die erste Spalte kann auch größer/kleiner als 90 sein)
-
RowSource=$A$1:$B$3 bzw. $A$5:$B$6
und ein Label1 . Dann zwei Prozeduren auf dem CodeModul der UsaerForm:
Option Explicit
Private Sub ComboBox1_Change()
If ComboBox1.ListIndex <> -1 And ComboBox2.ListIndex <> -1 Then
Label1 = ComboBox1.List(ComboBox1.ListIndex, 1) & ComboBox2.List(ComboBox2.ListIndex, 1)
End If
End Sub
Private Sub ComboBox2_Change()
If ComboBox1.ListIndex <> -1 And ComboBox2.ListIndex <> -1 Then
Label1 = ComboBox1.List(ComboBox1.ListIndex, 1) & ComboBox2.List(ComboBox2.ListIndex, 1)
End If
End Sub
Severus
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
25.02.2011 13:36:42 |
Daniel001 |
|
|
|
25.02.2011 14:10:05 |
Severus |
|
|
|
25.02.2011 15:08:39 |
Daniel001 |
|
|
Auswahl in KomboBox, durchsuchen einer Exceltabelle, Ausgabe in Textfeld |
25.02.2011 16:40:34 |
Severus |
|
|
|
28.02.2011 12:20:04 |
Daniel001 |
|
|