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
90
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
Muovikassikartelli
Kauppaketjut ovat yhdessä sopineet muovikassin yksikköhinnaksi 59 senttiä. Milloin viranomaiset puuttuvat tähän kartell362194Aidon persun tunnistaa Marinin palvonnasta
Oli kyse sitten Halla-ahosta tai Putinista. Ensimmäisenä aidolle persulle tulee mieleen Marin.491777Hallintooikeus..
"Asemakaavapäätös pysyy voimassa.Poikkeamista ja rakentamista koskevat luvat hylättiin" kertoo Pyhäjärven Sanomat netti.1251643Olen rakastunut
varattuun joka ei eroa. Miten tunteista eroon? Tämä ei ole tavanomaista. On elämäni suuri rakkaus.1041336Teit yllättävän siirron
Olet tähän saakka ollut tietyllä tapaa varovainen. Voi kai sanoa, että olemme kunnioittaneet toistemme rajoja. Tiedän,541060Jos se joskus oli molemminpuolista
niin hyvin me molemmat onnistuttiin pitämään toinen epätietoisena.761018- 59925
Laita nyt se viesti
Tiedän että haluat tavata. Kirjoitat, pyyhit, kirjoitat... Lähetä se viesti 😗54837Kaipaatko nainen
Semmoista tosi hankalaa ja arkaa miestä? Pitäisitkö hänet aina omanasi jos saisit hänet? Miten huomioisit hänen herkkyyd102811- 61793