Příspěvky uživatele

Při otevření libovolného excelského souboru (*.XLSX, *.XLSM) se současně v pozadí otevře soubor FUNCRES.XLAM.

Proč se to děje?
Nemůže mi to vadit? Zpomalovat práci?
Jak tomu mám zabránit?

Předem díky za odpovědi

ANO, všechny ty otevírané "xlsm" soubory mají stejnou strukturu a obsahují "BeforeClose" - už existují několik let a tak jsem na to zapomněl.

Vložení
Application.EnableEvents = False
ActiveWindow.Close
Application.EnableEvents = True
to zcela vyřešilo.
DoEvents jsem tam vložil také, správná připomínka.

VŠEM ZÚČASTNĚNÝM DĚKUJI
BoTl

Zdar,
jakmile se program dostane k příkazu "uzavřít soubor" (jde o jiný než zdrojový soubor), ukončí se. Zkrácený kód:

Public JMFSE(32) As String, PL As Integer

Sub tlacitko1_Kliknuti()

NAB = ActiveWorkbook.Name

M = "01"
CD = "C:\ArchivVykazu\"

' pole JMFSE obsahuje "holé" názvy souborů, PL je počet názvů

For i = 1 To PL
MVPT = JMFSE(i) & ".xlsm"
Workbooks.Open Filename:=CD & MVPT, ReadOnly:=True
Sheets(M).Select
S = Range("B4:U199") 'uloží důležitou část listu "M" do pole S

Workbooks(MVPT).Close SaveChanges:=False 'ZDE SE PROGRAM PŘEDČASNĚ UKONČÍ (soubor "MVPT" se uzavře a program skončí)

' Workbooks(NAB).Activate 'tento příkaz by neměl být potřeba, ale stejně to na to nemá vliv
X = 0 'sem už se program nedostane

' atd. zde by mělo dojít ke zpracování dat z pole S

Workbooks(NAB).Save
Next i

End Sub

Zkoušel jsem místo Workbooks použít Windows, ActiveWorkbook.Close a ActiveWindow.Colse. Také jsem zkusilsoubor před uzavřením znovu "aktivovat". Nic na to nemá vliv.

Máte někdo nápad, co s tím je?

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje