Show form naar Value uit mijn Combobox

[Csuki]

Hoi,

Ik werk in een Excel 2003 bestand met VBA. Ik ben niet zo ervaren en loop goed vast op een punt.

In VBA heb ik een combobox geplaatst en de verschillende namen van de andere forms erin gekregen. Ik wil zodra ik op "start" druk de geselecteerde form in je combobox tevoorschijn halen. (en de huidige verbergen uiteraard!)

Dus

Kies knop "laad Keuzelijst" 'Keuzelijst word geladen en toeganklijk, Knop enabled = False wat al gelukt is

Selecteer Form uit "droplist"

Kies Knop "Start" '-->Gekozen Form.Show, Me.Hide


(geen officiele programmeertaal, I Know. I'm A Noob:thumb

Moet ik dan eerst de waardes in mijn Combobox vertalen naar namen van Forms? Of onder je start knop command de tekst uit de combobox gebruiken om deze te linken naar een te activeren Form.

Ik heb gezocht in de richting van:

Private Sub Start2_Click() 'commands voor knop start selectie keuzelijst

Droplist.Clear
Droplist.Text = "Keuzelijst..."
Keuzelijst.Enabled = True
Droplist.Enabled = False
'Dit om je combobox naar beginwaarden te herstellen
Me.Hide
(geselecteerde form in je droplist).Show

End Sub

Maar in nog veel meer onlogische richtingen dus niet de moeite waard om te vermelden denk ik. Allemaal liep ik vast op het vertalen van de tekst naar een link tot de betreffende form. En lukt het met niet een form te openen vanuit een Combobox

Dit is mijn eerste post dus kan onduidelijk zijn! Sorry, het bestand is te vinden in de bijlagen.

Bedankt!


Csuki

-------------------------------------------------------------------
Stukje bij Bitje komen we er wel
Die techniek heeft een stevige Byte

 

[lunatoe]

ik zou zeggen ga van Excel naar VB <<< meer opties en makkelijker!

Waarom Excel alleen maar meer nadelen.

 

[Tardis]

ik zou zeggen ga van Excel naar VB <<< meer opties en makkelijker!

Waarom Excel alleen maar meer nadelen.

Ik zou zeggen, als je niets constructiefs heb bij te dragen aan een vraagstelling, reageer dan vooral niet.

@ Csuki, 1 van de experts hier zal ongetwijfeld een oplossing hebben.

Tardis

 

[Warme bakkertje]

Private Sub Start2_Click() 'commands voor knop start selectie keuzelijst
Select Case Droplist.Value
    Case "Materiaalkeuze"
        Materiaalkeuze.Show
    Case "Beveiliging"
        Beveiliging.Show
    Case "Borging"
        Borging.Show
    Case "Verbindingen"
        Verbindingen.Show
End Select
Unload Me
End Sub

 

[Csuki]

Yess

@ Warme Bakkertje

Dit klonk al een stuk makkelijker dan ik had gehoopt. En het werkt gewoon prima! Bedankt voor de hulp!

Nick

 

[Csuki]

ik zou zeggen ga van Excel naar VB <<< meer opties en makkelijker!

Waarom Excel alleen maar meer nadelen.

Ik werk met excel omdat alle prijslijsten van leveranciers in excel binnenkomen en constant worden gewijzigd. Ik heb deze tabbladen in mijn voorbeel verwijdert i.v.m. maximale grootte. Het totale bestand komt neer op 12 mb. Daarom werk ik in Excel

Nick