kirjoitusvirhe sisään Excel VBA tapahtuu, kun yrität määrittää arvon muuttujalle, joka ei ole oikeantyyppistä.
Aseta komentopainike laskentataulukkoosi ja lisää seuraavat koodirivit:
Dim -numero kokonaislukuna
numero = "pyörä"
Tulos, kun napsautat taulukon komentopainiketta:
Selitys: et voi määrittää merkkijonoarvoa (pyörä) Integer -tyyppiselle muuttujalle.
Tyyppivirhe (ajonaikainen virhe 13) esiintyy usein käytettäessä InputBox-toimintoa Excel VBA: ssa.
1. Aseta komentopainike laskentataulukkoosi ja lisää seuraavat koodirivit:
Dim -numero kokonaislukuna
number = InputBox ("Anna numero", "Neliöjuuri")
MsgBox "" & number & ": n neliöjuuri on" & Sqr (luku)
2. Napsauta taulukon komentopainiketta, kirjoita merkkijonon arvo sata ja napsauta OK.
Tulos:
3. Napsauta End.
4. Näytä ystävällinen viesti -merkin sijasta kirjoitusvirhe, päivitä koodi seuraavasti.
Dim -numero Vaihtoehtona
number = InputBox ("Anna numero", "Neliöjuuri")
Jos IsNumeerinen (luku) Sitten
MsgBox "" & number & ": n neliöjuuri on" & Sqr (luku)
Muu
MsgBox "Anna numero"
Loppu Jos
Selitys: Variant -tyyppinen muuttuja voi sisältää minkä tahansa tyyppisen arvon (katso ensimmäinen rivi). Excel VBA: n IsNumeric -toiminto tarkistaa, onko arvo numero.
5. Toista vaihe 2.
Tulos:
6. Tarkista lopuksi, toimiiko tämä yksinkertainen neliöjuurilaskin.
Tulos:
Vinkki: Lataa Excel -tiedosto (tämän sivun oikea puoli) ja kokeile sitä.