ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   resizing columns with pixels (https://www.excelbanter.com/excel-programming/285510-resizing-columns-pixels.html)

Andy

resizing columns with pixels
 
I want to be able to specify column widths in pixels
rather than points. I can call the function for column
widths in VBE but can't find an option to specify a width
in pixels (even though this value is always shown when
manually resizing)

Help would be great,
Cheers
Andy

Michel Pierron[_2_]

resizing columns with pixels
 
Hi Andy;
MsgBox Columns(1).ColumnWidth ' Points
MsgBox Columns(1).ColumnWidth * 4 / 3 ' Pixels

"Andy" a écrit dans le message de
...
I want to be able to specify column widths in pixels
rather than points. I can call the function for column
widths in VBE but can't find an option to specify a width
in pixels (even though this value is always shown when
manually resizing)

Help would be great,
Cheers
Andy




Andy

resizing columns with pixels
 
Ta for the suggestion but it doesn't work. I have tried
to find a relationship between points and pixels but as
points are based on the standard font size the bigger the
column width the more (different sized letters) can fit
in. I do know that the relationship is definatley not
linear. I think I need to actually specify number of
pixels rather than converting into points

Any ideas?

Andy




-----Original Message-----
Hi Andy;
MsgBox Columns(1).ColumnWidth ' Points
MsgBox Columns(1).ColumnWidth * 4 / 3 ' Pixels

"Andy" a écrit dans

le message de
...
I want to be able to specify column widths in pixels
rather than points. I can call the function for column
widths in VBE but can't find an option to specify a

width
in pixels (even though this value is always shown when
manually resizing)

Help would be great,
Cheers
Andy



.


Steve Garman

resizing columns with pixels
 
Andy wrote:
Ta for the suggestion but it doesn't work. I have tried
to find a relationship between points and pixels but as


Have you looked at the methods PointsToScreenPixelsX and
PointsToScreenPixelsY of the Window object?

points are based on the standard font size the bigger the
column width the more (different sized letters) can fit
in. I do know that the relationship is definatley not
linear. I think I need to actually specify number of
pixels rather than converting into points

Any ideas?

Andy





-----Original Message-----
Hi Andy;
MsgBox Columns(1).ColumnWidth ' Points
MsgBox Columns(1).ColumnWidth * 4 / 3 ' Pixels

"Andy" a écrit dans


le message de

...

I want to be able to specify column widths in pixels
rather than points. I can call the function for column
widths in VBE but can't find an option to specify a


width

in pixels (even though this value is always shown when
manually resizing)

Help would be great,
Cheers
Andy



.





--
Steve Garman


Michel Pierron[_2_]

resizing columns with pixels
 
Hi Andy; test this:

Private Declare Function GetWindowRect Lib "user32" _
(ByVal hwnd As Long, lpRect As RECT) As Long
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type

Sub PixelsPointsRate()
Application.WindowState = xlMaximized
Dim R As RECT
GetWindowRect Application.hwnd, R
MsgBox "Pixels - Points: " & Application.Width / (R.Right - R.Left)
End Sub

If Pixels to Points = 3/4 Then Points To Pixels = 4/3 !

"Andy" a écrit dans le message de
...
Ta for the suggestion but it doesn't work. I have tried
to find a relationship between points and pixels but as
points are based on the standard font size the bigger the
column width the more (different sized letters) can fit
in. I do know that the relationship is definatley not
linear. I think I need to actually specify number of
pixels rather than converting into points

Any ideas?

Andy




-----Original Message-----
Hi Andy;
MsgBox Columns(1).ColumnWidth ' Points
MsgBox Columns(1).ColumnWidth * 4 / 3 ' Pixels

"Andy" a écrit dans

le message de
...
I want to be able to specify column widths in pixels
rather than points. I can call the function for column
widths in VBE but can't find an option to specify a

width
in pixels (even though this value is always shown when
manually resizing)

Help would be great,
Cheers
Andy



.




Michel Pierron

resizing columns with pixels
 
Sorry Andy;
You must use the width property and not columnwidth.
MsgBox Columns(1).Width 'Points
MsgBox Columns(1).Width * 4 / 3 'Pixels
Regards

"Andy" a écrit dans le message de
...
I want to be able to specify column widths in pixels
rather than points. I can call the function for column
widths in VBE but can't find an option to specify a width
in pixels (even though this value is always shown when
manually resizing)

Help would be great,
Cheers
Andy





All times are GMT +1. The time now is 10:36 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com