Inputbox

[Hoornvan]

Wie weet of het mogenlijk is om als je een bestand in excel dat dan gelijk een inputbox voorkomt.

Ik heb een tafelleer programmatje gemaakt en wil als dit opstart dat dan gelijk de vraag komt "Welke tafel wil je oefenen".

Al vast bedankt voor jullie moeite

 

[Jan van Asseldonk]

Plaats onderstaande code in ThisWorkbook.

Private Sub Workbook_Open()
dim Tafel as Integer
Tafel = InputBox("Geef tafel: ", "Opgeven van tafel")
'Hier de rest van je code plaatsen.
End Sub

 

[Hoornvan]

Hallo Jan,

Mijn code staat in een module. VBAProject(Persnlk.xls)
Ik heb dit boven aan gezet maar het werkte niet.
We zijn aan het inpakken en gaan 2 maanden weg,
ik neem het mee en zal het dan op jouw manier doen
(in ThisWorkBook) en kijken of het dan lukt.

Iniedergeval hartelijk bedankt