Open a form, format the fonts and close it : Form « Forms « VBA / Excel / Access / Word

1.	Access
2.	Application
3.	Data Type
4.	Data Type Functions
5.	Date Functions
6.	Excel
7.	File Path
8.	Forms
9.	Language Basics
10.	Math Functions
11.	Outlook
12.	PowerPoint
13.	String Functions
14.	Windows API
15.	Word
16.	XML

Microsoft Office PowerPoint 2007 Tutorial

Microsoft Office Excel 2007 Tutorial

Microsoft Office Word 2007 Tutorial

VBA / Excel / Access / Word » Forms » Form

Open a form, format the fonts and close it

 

Sub PermanentFormFonts (strFont As String)



    Dim objAO        As AccessObject  

    Dim objCP        As Object        

    Dim ctlControl    As Control      



    Set objCP = Application.CurrentProject



    For Each objAO In objCP.AllForms

        DoCmd.OpenForm objAO.Name, acDesign, , , , acHidden

        For Each ctlControl In objAO.Controls

            ctlControl.FontName = strFont

        Next

        DoCmd.Close acForm, objAO.Name

    Next



End Sub

Related examples in the same category

1.	Change caption
2.	Display form in Modal mode
3.	Close a form
4.	To remove the Userform from the computer's memory, you must use the Unload statement; otherwise, the Userform is only hidden.
5.	Creating UserForms Programmatically
6.	Adding Controls to a UserForm at Design Time
7.	Output form to html file
8.	Using the Show Method to Display a Form
9.	Loading a Form into Memory Prior to Displaying It
10.	Cancels a cancelable event (an event that has a Cancel parameter).
11.	Format fonts
12.	Form count

java2s.com |

| Contact Us | Privacy Policy

All other trademarks are property of their respective owners.