Vraag : De bartitel van de Titel van Excel van het terugstellen?

Als ik gebruik blinkt de code hieronder om te veranderen de titel van de titelbar… uit wat ik het proces Workbook_BeforeClose aanbrengen om achter het terug te stellen.  Ik gebruik ook Activate/desactiveer processen.  Ik zou dit sub aan die waarschijnlijk moeten toevoegen, zodat wanneer de nadrukveranderingen in een ander werkboek, het verandert adviseren titeltoo.
Please/>
" codeBody " 
1:
2:
3:
4:

Private SubWorkbook_Open ()
        Application.Caption = de „Naam van de Toepassing“
        Application.ThisWorkbook.Windows (1). Titel = „Uw Titel“
Sub van het eind

Antwoord : De bartitel van de Titel van Excel van het terugstellen?

Dit zou moeten werken, gebruikend uw vorige code.

Mat
1:
2:
3:

Privé SubWorkbook_SheetActivate (Sh ByVal als Voorwerp)
    Application.ThisWorkbook.Windows (1). Titel = Sh.Name
Sub van het eind
Andere oplossingen  
 
programming4us programming4us