View Single Post
 
Old 02-26-2025, 01:37 PM
batman1 batman1 is offline Windows 11 Office 2013
Advanced Beginner
 
Join Date: Jan 2025
Posts: 57
batman1 is on a distinguished road
Default

Attachment 21416
Quote:
Originally Posted by Aengus345 View Post

Opened the .DOC with the .WIZ macros within. Then opened the VBE. I found the full line stated above:
Code:
objActiveRange.Style = rgstrDaysStyle(iCalendarStyle) & iOrientation & iNoPicture
But after that, I got nowhere

I found that objActiveRange.Style line above okay, but the next one:

Code:
objActiveRange.Style = "Boxes 11" - font.Size = 36, paragraph alignment= Center
was nowhere to be found that I know how how to access.

What am I doing wrong, please?
You misunderstood.
There is a line
Code:
objActiveRange.Style = rgstrDaysStyle(iCalendarStyle) & iOrientation & iNoPicture
If in the UserForm you click Finish or Next --> Next --> Next --> Finish and don't change anything then you have the setting = default = "Boxes & border", Landscape, No ... -->
rgstrDaysStyle(iCalendarStyle) = "Boxes", iOrientation = 1, iNoPicture = 1
Then
objActiveRange.Style = rgstrDaysStyle(iCalendarStyle) & iOrientation & iNoPicture
= "Boxes" & 1 & 1 = "Boxes11"
So objActiveRange has the style "Boxes11"
You can see from the image that
font 36 pt, Bold
ALIGNMENT Centered

You have to change in this WIZ style Boxes11 e.g. like this:
font 24 pt, Bold
ALIGNMENT Left

Include DOC, DOCM instead of WIZ

But since there are so many styles, you have to change them all to suit your needs
Attached Images
File Type: png style.png (13.8 KB, 10 views)
File Type: png wiz.png (154.8 KB, 11 views)
Reply With Quote