-
VBA tekstinsyöttö excel-soluun. Jotain virhettä koodissa, voisitteko katsoa sitä hieman?
Kun painan "Tallenna" nappia, niin tulee syöttöruutu, johon voi kirjoittaa numeron 1-10 välillä. Tallennus toimii moitteettomasti, mutta kun haluan lisätä päiväyksen soluun "A4", niin VBA iskee erroria. Tätä on vaikea selittää, joten tein videon:
[ link ]
Virheellinen koodinpätkä:
Range("L30", "O30").Copy
Sheets("PÄIVÄKIRJA").Range("B4", "E4").PasteSpecial xlPasteValues
Range("A4").Select
ActiveCell.Value = Format(Now(), "mm/dd/yyyy")
Kaksi ylempää riviä toimii, mutta päivänmäärän lisäys ei toimi (kaksi alempaa riviä). Missä vika?
Yksi vastaus
-
Nopeesti katottuna näyttäs että sulla on tuo Tallenna_Click() -proseduuri tyyppiä private sille työkirjan ensimmäiselle taulukolle (Sheet1). Kokeile tehdä työkirjaan uus moduuli ja kopioit koodin sinne ja vaihdat vielä Public tyyppiseks sen proseduurin. Ihmettelen suuresti jos muut kohdat koodissasi toimii.
Vastaa kysymykseen
Huom! Ethän vastaa pelkällä linkillä. Vaikka vastaus kysymykseen löytyisikin linkin takaa, tiivistä sen sisältö tähän, jotta lukijan ei tarvitse siirtyä toiseen palveluun saadakseen tarkan vastauksen kysymykseensä.