Hallo,
Ik zou volgende doen :
Klik in de projectverkenner dubbel op blad1, kies Worksheet en SelectionChange. Vul nu de volgende If structuur in (met "$B$2" als de cel die jij wenst).
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If ActiveCell.Address = "$B$2" Then
UserForm1.Show
End If
End Sub
Hierdoor zal op het ogenblik dat cel B2 (in dit voorbeeld) geactiveerd worden UserForm1 getoond worden.
Nu moet je nog Userform1 aanmaken :
Kies Invoegen en UserForm. Hier voeg je een label toe met bv "Maak uw Keuze".
Voeg eveneens twee OptionButtons (keuzerondjes) toe.
Voeg dan ook nog een CommandButton (opdrachtknop) toe.
Dubbelklik op de CommandButton en voeg hier de code toe voor wat er precies moet gebeuren indien selectie 1 werd aangevinkt en wat indien selectie 2 werd aangevinkt.
Persoonlijk verkies ik keuzerondjes (indien slechts 1 mogelijk antwoord) of selectievakjes (indien meerdere antwoorden mogelijk) boven de inputbox als je de mogelijke antwoorden weet, want dit maakt het een stuk eenvoudiger voor het verloop van de procedure. Want wat sommige gebruikers allemaal niet invullen in een inputbox, kan je nooit voorzien.
Hopelijk ben je hier al mee op weg geholpen (indien er nog vraagjes zijn, stel ze gerust).
Groetjes