Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
In MS Excel, I find that when the zoom is dropped to 50% the fonts in the
list become unreadable. Is there anyway that the fonts in the list have the ability to have their own formats? ---------------- This post is a suggestion for Microsoft, and Microsoft responds to the suggestions with the most votes. To vote for this suggestion, click the "I Agree" button in the message pane. If you do not see the button, follow this link to open the suggestion in the Microsoft Web-based Newsreader and then click "I Agree" in the message pane. http://www.microsoft.com/office/comm...et.f unctions |
#2
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
"Homar" wrote
In MS Excel, I find that when the zoom is dropped to 50% the fonts in the list become unreadable. Is there anyway that the fonts in the list have the ability to have their own formats? Think Debra Dalgleish's page addresses this issue at: http://www.contextures.com/xlDataVal08.html#Larger Make the Dropdown List Appear Larger -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- |
#3
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
Thanx Max
However once the worksheet had protection enabled, the feature did not work. Also it enlarges the entire worksheet which I guess is the best workaround without any such feature within Excel. Homar "Max" wrote: "Homar" wrote In MS Excel, I find that when the zoom is dropped to 50% the fonts in the list become unreadable. Is there anyway that the fonts in the list have the ability to have their own formats? Think Debra Dalgleish's page addresses this issue at: http://www.contextures.com/xlDataVal08.html#Larger Make the Dropdown List Appear Larger -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- |
#4
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
"Homar" wrote:
.. However once the worksheet had protection enabled, the feature did not work. Think there should be a vba way to auto-unprotect & re-protect so that it'll work, but my vba proficiency is insufficient to offer this to you. Do hang around awhile for insights from others versed in vba. -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- |
#5
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
As promised by Max:
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Me.Unprotect Password:="thepassword" If Target.Address = "$A$2" Then ActiveWindow.Zoom = 120 Else ActiveWindow.Zoom = 100 End If Me.Protect Password:="thepassword" End Sub Regards Rowan Max wrote: "Homar" wrote: .. However once the worksheet had protection enabled, the feature did not work. Think there should be a vba way to auto-unprotect & re-protect so that it'll work, but my vba proficiency is insufficient to offer this to you. Do hang around awhile for insights from others versed in vba. -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- |
#6
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
Thanks, Rowan !
I'm also benefiting from your step-in <g Cheers -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- |
#7
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
Likewise <bg
Max wrote: Thanks, Rowan ! I'm also benefiting from your step-in <g Cheers -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- |
#8
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
Thanx Rowan. I'm not a vb expert but managed to figure out where to put the
password commands. below is the script i've used and it works. one last thing though-how do i protect the code from being viewed? as it contains the password!!! Cheers and thanx agains Homar Private Sub Worksheet_SelectionChange(ByVal Target As Range) Me.Unprotect Password:="thepassword" Dim rngDV As Range Dim intZoom As Integer Dim intZoomDV As Integer intZoom = 60 intZoomDV = 85 Application.EnableEvents = False On Error Resume Next Set rngDV = Cells.SpecialCells(xlCellTypeAllValidation) On Error GoTo errHandler If rngDV Is Nothing Then GoTo errHandler If Intersect(Target, rngDV) Is Nothing Then With ActiveWindow If .Zoom < intZoom Then .Zoom = intZoom End If End With Else With ActiveWindow If .Zoom < intZoomDV Then .Zoom = intZoomDV End If End With End If exitHandler: Application.EnableEvents = True Me.Protect Password:="thepassword" Exit Sub errHandler: GoTo exitHandler Me.Protect Password:="thepassword" End Sub "Rowan Drummond" wrote: Likewise <bg Max wrote: Thanks, Rowan ! I'm also benefiting from your step-in <g Cheers -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- |
#9
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
"Homar" wrote:
.. how do i protect the code from being viewed? as it contains the password!!! Think we could try, in VBE, Click Tools VBA Project Properties Protection tab (the option is there) -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- |
#10
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
Thanx Max and Rowan.
It works well. Cheers |
#11
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
You're welcome, Homar !
Thanks for the feedback .. -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- "Homar" wrote in message ... Thanx Max and Rowan. It works well. Cheers |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
List box setup, placement, and functionality | New Users to Excel | |||
provide ability to undo a save - saved by mistake | Excel Worksheet Functions | |||
format control of a list box | Excel Worksheet Functions | |||
I cannot get time format to display in a drop-down list | Excel Discussion (Misc queries) | |||
How do I create a bulleted list text format inside cell? | Excel Discussion (Misc queries) |