Minulla on sovellus, jossa tauluun lisätään inputboxin avulla tietoja. InputBoxissa on OK ja Cancel -painike. Ongelmani on se, että cancel ei toimi eli kun tallennan tietoja ja teen virheen niin en pääse sitä korjaamaan vaan inputbox kyselee seuraavia tietoja.
Kuka osaisi neuvoa???
Kuka osaisi neuvoa???
Vastaukset 4
Vanhimmat
Eikös InputBox toimi niin, että jos valitsee Cancel/Peruuta -painikkeen, niin se palauttaa tyhjän merkkijonon.
Eli jos ohjelmassa on esim...
Arvo = InputBox ("Anna arvo: ")
...niin seuraavalle kannattaa laittaa...
If Arvo = "" Then Exit Sub
...jolloin suoritus loppuu siihen.
- Mika
vaan palauttaa false
inputboxin type arvolla voit määritellä mitkä arvot on sallittuja
Sub koe()
Dim x As Variant
Dim i As Integer
Range("A1:A5") = ""
For i = 1 To 5
annaluku:
x = Application.InputBox("anna luku", Type:=1)
If x = False Then GoTo annaluku
Range("A" & i) = x
Next i
End Sub
Olet toki oikeassa.
Unohdin, että on olemassa myös InputBox-menetelmä, joka toimii juuri noin.
Itselle tuli mieleen InputBox-funktio, joka palattaa tyhjän merkkijonon peruutettaessa.
- Mika
minun jutussani ei voi määritellä arvoja, koska pitää pystyä tallentamaan erilaisia tietoja soluihin.
Tarkoitin sellaista tapausta, että olen esim. jonkun tietueen toiseen soluun tallentamassa ja huomaan tehneeni esim.kirjoitusvirheen ensimmäiseen soluun, niin millä konstilla pääsen siitä takaisinpäin korjaamaan ensimmäisen solun tiedon?? Vai pitääkö korjaus tehdä muulla konstilla?