Eli Excel-taulukkoon on aikanaan joku rustannut koodia, tässä tapauksessa tallennusnapin josta ko. taulukko tallennetaan. Nyt yhtäkkkiä alkoi tulla virheilmoitus:
Code execution has been interrupted.
Siis täh?!??!? Miksi? Miten voi korjata?
Tässä koodi:
Sub Painike35_Napsautettaessa()
Sheets("Toimari").Select
Dim SoluA18 As String
Dim SoluF4 As String
Dim SoluI8 As String
SoluA18 = Range("A18")
SoluF4 = Range("F4")
SoluI8 = Range("I8")
ThisWorkbook.BuiltinDocumentProperties("Subject").Value = SoluI8
Dim Polku As String
Polku = ActiveWorkbook.Path
ChDir Polku
ActiveWorkbook.SaveAs Filename:= _
Polku & "\" & SoluA18 & "_" & SoluF4 & ".xls", FileFormat:=xlNormal _
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub
APUA, tallentamisnappi antaa virheilmoituksen
Jumppari-Kaisa
1
58
Vastaukset
kokeile seuraavaa
VBA editorin puolella klikkaa CTRL BREAK tai SHIFT CTRL BREAK
jos ei auta lisää sitten koodin alkuun
Application.EnableCancelKey = xlDisabled
tallenna ja buuttaa masiina
tämä toki poistaa mahdollisuuden keskeyttää makron suoritus manuaalisesti
Keep EXCELing
@Kunde
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 1824160
Se oli siinä sitten
Yhdysvaltain presidentti Donald Trump on määrännyt kaiken maan Ukrainalle toimittaman sotilaallisen tuen tauolle, kertoo7262830Paljonko aikaa on kulunut siitä kun viimeksi tapasit hänet?
Päiviä? Viikkoja? Kuukausia? Vuosia?692728- 1532520
- 722162
Trump tekee rauhan Amerikan ja Venäjän ehdoilla
Ukraina luovuttaa Venäjän haluamat alueet Venäjälle. Ukraina luovuttaa Amerikan haluamat arvokkaat mineraalit Amerikall3482046- 331528
Minulta loppuu aika
Halusin olla täydellinen. Nyt näyttää siltä että viimeinen kiristys jää puolitiehen, sillä h-hetki on jo ihan kohta käsi391447Syvälliset keskustelut
Olisivat tärkeintä ensisijaisesti hänen kanssaan Tulisi sellainen hetki, mutta kaikki meni pieleen211433Olisipa sitä henkisesti eheämpi ja rohkeampi
mikään maallinen mammona ei itseäni kiinnosta, eikä sen menetys kiinnostus. Mutta kun kohtaa jonkun sykäyttävän ihmisen,171322