MS Excel

Uvidíme, ako to presne myslíte, a čo chcete so súbormi robiť, koľko ich je atď ... atď. Nechce sa mi to zbytočne zdokonaľovať, keď to možno bude na nič. Pretože treba myslieť aj na zatvorenie ovládaného zošitu ovládacím zošitom, ak je tento zatváraný, a pod...citovat

Do doplnku, opakujem ešte raz, DO DOPLNKU (!), vložte do modulu Tento_zošit kód:
Private WithEvents App As Application

Private Sub App_WorkbookOpen(ByVal WB As Workbook)
Dim WBS As Workbook, MenoS As String, MenoN As String
MenoN = WB.Name
If Left$(MenoN, 7) = "Skuska_" Then
For Each WBS In App.Workbooks
MenoS = WBS.Name
If Left$(MenoS, 7) = "Skuska_" And MenoS <> MenoN Then WBS.Close False: Exit For
Next WBS
End If
End Sub

Private Sub Workbook_Open()
Set App = Application
End Sub
Doplnok, znovu opakujem DOPLNOK (!) uložte.

Zámer je taký, že sa v doplnku vytvorí premenná App, ktorá sa pri Workbook_Open toho doplnku (čo sa udeje pri akomkoľvek prvotnom otvorení Excelu, keď sa aktivujú aj iné doplnky) naplní objektom samotnej aplikácie aj s udalosťami. A potom sa kontroluje každá globálna-aplikačná udalosť App_WorkbookOpen, vznikajúca pri akomkoľvek otvorení akéhokoľvek súboru. Vtedy sa zkontroluje či ide o súbor "Skuska_*", ak áno, nájde sa prípadný otvorený predošlý "Skuska_*" a zavrie sa. Takže tak. Skúste.citovat

Prečítal som si to asi 7x a stále som nechápal čo chcete. Na 8-mi som to možno pobral. Vy chcete toto ? :

-Pri otvorení akéhokoľvek zošitu Skuska_* sa má kontrolovať, či je otvorený súbor UVOD.xls. Ak nieje, má sa otvoriť aj ten. Teda vždy, ak je nejaký Skuska_* otvorený musí byť aj UVOD.xls otvorený.
-Ak nieje otvorený žiaden Skuska_*, zatvorí sa aj UVOD.xls (bez uloženia) ?citovat

"Otvorí sa UVOD užívateľovi na PC" - Akože "sa" ? Pri štarte akéhokoľvek Excelu "sa" automaticky má otvoriť UVOD ? Naplánovanou úlohou pri štarte PC ? Alebo "si" ho užívateľ otvorí sám ? V tom prípade to má byť "Užívateľ si otvorí UVOD na PC", to je predsa veľký rozdiel.

"kde si vyberie "skupinu zošitov"" - Teda otvorenie UVOD-u vyvolá akciu, kde nabehne nejaký formulár v ktorom si má užívateľ vybrať skupinu zošitov ?

"skupinu zošitov" - To je čo ? Adresár so súbormi rovnakého typu ? Teda treba zistiť na aké slová súbory začínajú (určujúcim znakom môže byť podčiarknik). Alebo skupina zošitov znamená už výber priamo tých začínajúcich slov (napr. "Skuska_"), ImputBox-om alebo formulárom ?

"Po výbere sa otvorí SKUSKA_*(sieť) a zatvorí UVOD" - Teda sa má po výbere skupiny sám automaticky otvoriť prvý súbor danej skupiny ? Alebo sa má niekde v skrytom liste v doplnku uchovávať aktuálny výber skupiny (alebo aj zoznam možných skupín), a čakať či si súbor z danej skupiny užívateľ otvorí sám ? Vtedy je to rovnako zle napísané ako hore - nie "sa" ale "si".

No a čo ak si užívateľ svojprávne otvorí koľko chce súborov z inej ako z vybratej skupiny ?

Ak sa/si opätovne otvorí UVOD, zatvoria sa všetky zošity doteraz otvorených skupín (lebo mohol si svojvoľne otvoriť aj X zošitov z nevybratej skupiny), a načíta sa opäť prvý zošit z novovybranej skupiny ?

Ak sa pri otvorení UVOD zistí, že prvý súbor vybranej skupiny sa nedá otvoriť, tak sa z nejakou hláškou o nedostupnosti ukončí aj tento UVOD (bez uloženia)? Rovnako aj všetky doteraz otvorené súbory zo všetkých skupín?

Ak bude umožnené užívateľovi otvoriť svojvoľne aj iné skupiny, na ich zatvorenie je potreba dopredný zoznam všetkých skupín, a všetkých súborov v nich. Ak sa jedná o zložky, dá sa urobiť zoznam súborov v nich uložených, a tie uchovať v doplnku. A potom porovnávať s otvorenými zošitmi.

A to ma určite nenapadá všetko...citovat