MS Excel

Téma: VBA prechod medzi zošitmi

Zaslal/a Bill 23.11.2018 20:22

Ahojte, mám vytvorený kód (VBA) na prechod z jedného otvoreného zošita (Excel 2016) do druhého. Následne potrebujem ten prvý zošit zatvoriť (bez uloženia) a pracovať v druhom. Toto makro mi nepracuje korektne, keď mám otv. viacej zošitov a chcem prejsť na iný. Viete mi pomôcť. Ďakujem za každý podnet.
Sub Prechod()
Dim miesto As String, cesta As String
Application.ScreenUpdating = False
cesta = "C:\Users\Public\Documents\Skuska_2.xls"
miesto = Dir(cesta)
On Error Resume Next
If miesto <> vbNullString Then
Workbooks.Open (cesta)
Workbooks(1).Close (False)
Else
MsgBox "ZOSIT NIE JE", vbInformation, "SKÚŠKA"
End If
End Sub

Zaslat odpověď >

Strana: « předchozí 1 2

Bill(25.11.2018 17:25)#041976

No ono tých skupín je viacej, ale všetky spĺňajú podmienku začiatku v názve SKUSKA_. A vždy platí podmienka, že bude z týchto skupín otv. len jeden zošit aby sme sa rozumeli.citovat

elninoslov(25.11.2018 17:31)#041977

No tomu práve nerozumiem, ako má makro zistiť, ktorý súbor patrí do ktorej skupiny, aby mohlo zasiahnuť a zatvoriť predošlý súbor z danej skupiny. Nejako sa musia rozlišovať.citovat

Bill(25.11.2018 18:35)#041980

Rozlišujú sa názvom (SKUSKA_A a niečo.xls) a hlavne umiestneným v príslušnom adresári. Tieto adresáre rozdeľme trebárs na SKUPINA A, SKUPINA B a atď (celkovo 7 skupín).citovat

Strana: « předchozí 1 2

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.