MS Excel

Téma: zavření sešitu po přechodu do druhého

Zaslal/a lafo 29.6.2016 14:06

Potřeboval bych poradit jakým způsobem udělat, aby se mi po přepnutí ze sešitu pokus1.xls do sešitu pokus2.xls okamžitě uzavřel sešit pokus1.xls. Přepnutí mi funguje, ale uzavření sešitu pokus1.xls generuje chybu "404".

Workbooks.Open "D:\Data\...\Nový formulář pro vyplnění TS_rolovací menu_TESTOVACÍ.xlsx"
Workbooks("pokus1.xlsx").Close

Zaslat odpověď >

elninoslov(29.6.2016 14:24)#031934

Takéto niečo by nefungovalo (malé makro v každom súbore).

Příloha: zip

31934_otvor-zatvor.zip (20kB, staženo 30x)

citovat

MePExG(29.6.2016 14:44)#031936

Skúste tento postup:

Sub pokus()
pomoc = Workbooks.Count
Application.DisplayAlerts = False
Workbooks(pomoc - 1).Close
Application.DisplayAlerts = True
End Sub

a dá sa aj

Sub pokus()
Application.DisplayAlerts = False
Workbooks(Workbooks.Count - 1).Close
Application.DisplayAlerts = True
End Sub
citovat

lafo(29.6.2016 15:54)#031943

To: elninoslov

super... funguje, tak jak jsem potřeboval ... jak jednoduché

citovat

Uživatelské menu

Nejste přihlášen(a)

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.