Innehållsförteckning
Nedan kommer vi att titta på ett program i Excel VBA det där skapar en sidfot innan du skriver ut en arbetsbok.
Skapa en arbetsbok BeforePrint -händelse. Kod som läggs till i Workbook BeforePrint -händelsen körs av Excel VBA innan du skriver ut en arbetsbok.
1. Öppna Visual Basic Editor.
2. Dubbelklicka på den här arbetsboken i Project Explorer.
3. Välj arbetsbok från den vänstra listrutan. Välj BeforePrint från den högra listrutan.
4. För att skapa en sidfot, lägg till följande kodrad i Workbook BeforePrint -händelsen:
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName
Obs! Objektet PageSetup innehåller alla sidinställningsattribut (vänster sidfot, nedre marginal, pappersstorlek, vänster marginal och så vidare) som egenskaper.
5. Testa programmet genom att skriva ut din arbetsbok.
Resultat:
