listenfeld +optionsfeld
07.08.2003 11:17:46
dirk
mein problem ist folgendes!
Ich habe 3 listenfelder und 3 Optionsfelder!
ich möchte das ich wenn ich eine auswahl aus dem listenfeld treffe eine datei aufgeht aber nur
wenn der nutzer ein optionsfeld mit anklickt!
hat jemand eine idee für einen vba code?
dh. 1begriff(aus listenfeld) + 1 klick auf optionsfeld = datei öffnen
vielleicht wäre es möglich das datei öffnen noch über eine spezielle befehlschaltfläche zu machen!
ist einfacher zu arbeiten!
vielleicht hat jemand eine idee!
gruss
dirk
-------------------------------------------------------------------
Private Sub CommandButton1_Click()
ListBox1.Visible = Not (ListBox1.Visible)
ListBox1.Visible = True
ListBox2.Visible = False
ListBox3.Visible = False
End Sub
Private Sub CommandButton2_Click()
ListBox2.Visible = Not (ListBox2.Visible)
ListBox1.Visible = False
ListBox2.Visible = True
ListBox3.Visible = False
End Sub
Private Sub CommandButton3_Click()
ListBox3.Visible = Not (ListBox3.Visible)
ListBox1.Visible = False
ListBox2.Visible = False
ListBox3.Visible = True
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
End Sub
Anzeige