Příspěvky uživatele
< návrat zpět
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?
Uživatelské menu
\nMenu
On-line nástroje
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
RSS nejnovější články