Hej!

Jag vill kontrollera om användaren i en textbox matat in ett nummer.
Om så inte är fallet vill jag att textboxen skall bli aktiv och den felmatade
tecknet skall bli markerat så att användaren ser vad som är felinmatat.
Jag använder Excel VBA.

MVH Stefan

Och med textbox menar du i det här fallet...?

En textbox i ett formulär .

I Vb kan man göra så här,vet inte exakt hur VBA funkar.
<code>
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 48 To 57
'Ok
Case Else
Text1.Text = ""
MsgBox "Bara siffror tillåtna"
End Select
</code>

Hej Sven Åke!

Det funkade alldeles utmärk i VBA oxå.

Jag tackar för hjälpen

/Stefan

Det blev lite fel i koden. Skall vara så här
<code>
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 48 To 57
'Ok
Case Else
Keyascii = 0
MsgBox "Bara siffror tillåtna"
End Select
</code>