Hejsan! Jag är inte alls hemma på Excel, men kan du inte göra ett formulär där man endast kan välja mella dessa tre alternativ? Peter,Endast tre giltiga svar i en Inputbox!
(Osäker på om frågan ska in i forumet Excel eller någon annanstans men det är Excel jag använder)
I en Inputbox ska användaren ange ett värde som denne vill se. Värdet ska vara antingen "Ej mottaget", "Mottaget" eller "Avslutat" och om användaren skriver in något annat ska det bli stopp och uppmanas att skriva in något av de tre korrekta. Hur gör jag för att åstasdkomma detta?
Tack på förhand!
Hälsningar
PeterSv: Endast tre giltiga svar i en Inputbox!
Om du ändå vill gör som du skrev i VBA borde detta fungera:
<code>
Dim svar As String
Dim korrektSvar As Boolean
Do Until korrektSvar
svar = InputBox("blabla")
If svar = "Ej mottaget" Or svar = "Mottaget" Or svar = "Avslutat" Then
korrektSvar = True
End If
Loop
</code>
/JohanSv: Endast tre giltiga svar i en Inputbox!
Johans kod ok men Application.InputBox ger större kontroll över det som anges genom "Type"
<code>
Sub test()
Dim vaVal As Variant
Dim bSvar As Boolean
vaVal = Application.InputBox("Här anger du.... .", "Värde", Type:=2)
If vaVal = False Then Exit Sub
Do Until bSvar
If vaVal = "Ej Mottaget" Or vaVal = "Mottaget" Or vaVal = "Avsluta" Then
bSvar = True
'Din kod....
End If
Loop
End Sub
</code>
Reflektion:
Tycker det är för långa värden användarna måste mata in - Rekommenderar istället en combobox antingen direkt i bladet eller i ett formulär.
Mvh
XL-Dennis