Moje makrá sú uložené v osobnom zošite. Mám 3 pracovné zošity otvorené. Jeden zošit sa vždy generuje z webovej aplikácie. Preto sa meno vždy mení (nemám žiadny vplyv na webovú aplikáciu). Ostatné dva pracovné knižky sú však správne pomenované. Chcel by som na konci podprogramu deaktivovať dve menované makrá, aby som sa vrátil k originálnemu exportovanému súboru programu Excel.
Verzia 1: Aktivujem exportovaný súbor programu Excel. V tomto prípade musím upraviť makro pri každom použití tohto súboru.
Windows("exported_excel_file.xlsx").Activate
Verzia 2: Ja som deaktivoval dva ďalšie súbory programu Excel. Nenašiel som však spôsob deaktivácie:
Windows("exported_excel_file.xlsx").Deactivate
Aké riešenia sú k dispozícii?
odpovede:
1 pre odpoveď č. 1Otáčajte zošity skôr:
For Each wb In Application.Workbooks
Select Case wb.Name
Case "exported_excel_file.xlsx"
Case "some_other_file.xlsx"
Case Else: wb.Activate: Exit For
End Select
Next