APUA, tallentamisnappi antaa virheilmoituksen

Jumppari-Kaisa

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

1

<50

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 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

    1. Anna minulle anteeksi

      Anna minulle anteeksi. Minä pyydän.
      Ikävä
      153
      1884
    2. Kun viimeksi kohtasitte/näitte

      Mitä olitte tekemässä? Millainen ympäristö oli? Löydetään toisemme...
      Ikävä
      130
      1741
    3. Olet kyllä vaarallisen himokas

      Luova, kaunis, määrätietoinen, pervo, mielenkiintoinen, kovanaama, naisellinen ja erikoinen.
      Ikävä
      102
      1507
    4. Anna vielä vähän vihreää valoa

      Teen sitten siirtoni, nainen. Tiedän, että olet jo varovaisesti yrittänyt lähestyä, mutta siitä on jo aikaa. Jos tunnet
      Ikävä
      17
      1213
    5. Mikä on hän on ammatiltaan?

      Vai tiedätkö mitä kaivattusi tekee työkseen?
      Ikävä
      69
      1190
    6. Mitä ajattelit silloin kun

      Löysit hänet?
      Ikävä
      64
      1151
    7. Syksyinen aamuketju suden

      Hyvää huomenta ja kaunista syyspäivää. 🌞🍁🍂☕
      Ikävä
      219
      975
    8. Oletko tutustunut muihin

      Samalla tavalla kuin häneen?
      Ikävä
      68
      796
    9. Uskotko että kohdataan vielä?

      Kysymys otsikossa, aloitukseen ei muuta lisättävää.
      Ikävä
      45
      730
    10. Miksi homous puhuttaa konservatiiveja vuodesta toiseen?

      Kysymykseen on vastattukin Kansanlähetyksen osalta: "Miksi sukupuoleen ja seksuaalisuuteen liittyvät asiat ovat konserv
      Luterilaisuus
      191
      704
    Aihe