Userform starten bij lege cel A1

[Rudi Rombouts]

Als ik mijn OEF.XLS openen en de cel A1 is leeg dan moet er een USERFORM1 te voorschijn komen met een COMBOBOX, waaruit ik dan iets kan kiezen dat de cel A1 vult. Hoe doe ik dat?
Kan ik zoiets maken als een "autoexec" macro ?

If [A1] = "" then
userform1.show
else
endif

 

[huijb]

Volgens mij moet je er wel voor zorgen dat bij het openen a1 geselecteerd wordt. Rest van de code ziet er goed uit, dacht ik. Ik zou zeggen probeer het met die macro.

 

[Rudi Rombouts]

Dacht dat ik zoiets moest maken met
workbook.activate
workbook. open
en dan de code

van zodra ik OEF.xls open moet deze vanzelf starten en dat lukt me niet

Rudi

 

[huijb]

Probeer het eens met deze code. Zet hem in This Workbook
Private Sub Workbook_Open()
Range("A1").Select
If Range ("A1") = "" then
Userform.Show
End If
End Sub

 

[Rudi Rombouts]

YES... dat is het

was bezig met
Private Sub Worksheet_Activate()
If [a1] > "" Then

ging in de mist bij het openen van het werkblad in plaats van de werkmap

bedankt voor het mee danken
Rudi

 

[huijb]

Geplaatst door Rudi Rombouts
bedankt voor het mee danken
Rudi

Geen dank.