ComboBox Wert in MsgBox ausgeben
Herbert
Mein "kleines" Problem:
Ich habe eine Adressenliste und mit einer ComboBox kann ich einen Namen in der Spalte A auswählen.
Wie muß der Code für den CommandButton lauten, um in einer MsgBox die Info´s zu dem gewählten Namen anzuzeigen(Name, Straße, Ort, etc)?
Danke für Eure Hilfe im Voraus
Herbert
Option Explicit
Private Sub cboName_Change()
Dim rng As Range
Set rng = Columns(1).Find(cboName.Value, lookat:=xlPart, LookIn:=xlValues)
End Sub
Private Sub CommandButton1_Click()
End Sub
Private Sub UserForm_Initialize()
cboName.List = Range("A1").CurrentRegion.Value
cboName.ListIndex = 1
End Sub