![]() |
|
#2
|
||||
|
||||
|
What is the point of this exercise? Why not simply set the changed properties of the controls as you need them when you call the userform?
Code:
Sub Example()
Dim ofrm As New UserForm1
Dim oCtrl As Control
With ofrm
For Each oCtrl In ofrm.Controls
If (TypeName(oCtrl) = "TextBox" Or TypeName(oCtrl) = "CheckBox") Then
With oCtrl
.Font.Size = 12
.Font.Name = "Calibri"
.Width = 120
End With
End If
Next oCtrl
.Show
Unload ofrm
End With
Set ofrm = Nothing
End Sub
__________________
Graham Mayor - MS MVP (Word) (2002-2019) Visit my web site for more programming tips and ready made processes www.gmayor.com |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
"Linking" an arrow to textbox
|
mferrigno | Drawing and Graphics | 1 | 02-04-2016 03:11 PM |
| Where can the Document Property "Company Address" be manually edited? | JS411 | Word | 8 | 12-17-2015 10:26 PM |
| Word 2013 "Document Property" | Rude Awakening | Word | 2 | 10-28-2015 08:07 AM |
| help with compatibility of "WdSaveFormat" property of SaveAs method | ajetrumpet | Word | 0 | 07-15-2013 07:29 AM |
| Want to search for "class", replacing with document property | YetAnotherAuthor | Word | 0 | 10-30-2009 09:43 AM |