He everyone.
After entering text in columns B,C,E, I want to set the width of column D so
that the sum of columns B:E = 4 inches (for printing purposes).
Right now I have this code:
Columns("B:C").EntireColumn.AutoFit
Columns("E").EntireColumn.AutoFit
TempCW = ActiveWindow.PointsToScreenPixelsX(Columns("B:C").Width +
Columns("E:E").Width)
'Columns("D").ColumnWidth =
ActiveWindow.PointsToScreenPixelsX(Application.InchesToPoints(4) -
Round(TempCW))
Right now, column D ends up way too wide. I think I might be getting mixed
up because there are inches, pixels, and .ColumnWidth (which doesn't equal
anything else).
NOTE: I remember seeing something in the help section about resolution.
This macro will be run on different computers with different resolutions.
One last thing. The firewall at work won't run Java, so I am submitting
this during my lunch hour at home. Could you e-mail any responses to me at
work: [email protected].
Thanks, Brad E.
Bookmarks