Górny wiersz okna to pasek tytułu. Użyj dostępnego pustego miejsca, aby dodać metadane związane ze skoroszytem.
Aby dodać metadane, dodamy kod do zdarzenia aktywującego skoroszyt. Tak więc tytuł skoroszytu zmieni się po aktywacji skoroszytu.
Domyślnie skoroszyt programu Excel zawiera tytuł „Microsoft Excel”.
Aby dodać tytuł do paska tytułu:
1. Naciśnij Alt + F11, aby otworzyć VBE.
2. W panelu VBAProject kliknij dwukrotnie ThisWorkbook.
3. W górnej części modułu otwórz lewą listę rozwijaną (Ogólne) i wybierz Skoroszyt, a następnie wybierz zdarzenie Aktywuj z rozwijanej listy zdarzeń po prawej stronie.
4. W zdarzeniu Activate wpisz następujący kod:
Application.Caption = "Plik makra"
Powyższy kod przypisze "Plik makr" jako tytuł do skoroszytu.
5. Aby anulować wyświetlany tytuł podczas aktywowania lub otwierania innego skoroszytu, dodaj zdarzenie Deactivate, wybierając opcję Deactivate z listy rozwijanej Procedura.
6. W zdarzeniu Deactivate wpisz następujący kod:
Application.Caption=" "
Proszę postępować zgodnie z poniższym kodem!
Option Explicit Private Sub Workbook_Activate() 'Zmienianie podpisu skoroszytu Application.Caption = "Macro File" End Sub Private Sub Workbook_Deactivate() 'Zmienianie podpisu skoroszytu na pusty Application.Caption = "" End Sub
Jeśli podobał Ci się ten blog, podziel się nim ze znajomymi na Facebooku. Możesz również śledzić nas na Twitterze i Facebooku.
Chcielibyśmy usłyszeć od Ciebie, daj nam znać, jak możemy poprawić naszą pracę i uczynić ją lepszą dla Ciebie. Napisz do nas na stronie e-mail