How to increase the size of drop down list in Excel
97.8 هزار بار بازدید -
5 سال پیش
-
How to increase the size
How to increase the size of drop down list in Excel. Sometimes there is so much data on an Excel sheet, it may be necessary to the zoom on it to see all the data. In that case the text in the drop down list becomes unreadable. I have some code that when you make a change to the drop down list the zoom on the worksheet becomes 150% so that you are able to view the options and make the correct selection. Free templates and templates with code are available for purchase for $50 USD
https://www.easyexcelanswers.com/temp...
This code is inserted on the worksheet
code
Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range
ActiveWindow.Zoom = 60
Set KeyCells = Range("A2:A3")
If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then
ActiveWindow.Zoom = 150
Else
ActiveWindow.Zoom = 60
End If
End Sub
For more help visit my website http://www.easyexcelanswers.com or email me at [email protected].
Contact me regarding customizing this template for your needs.
Excel one-on-one on-line training available. Email me to arrange.
I am able to provide online help on your computer at a reasonable rate.
Check out my next one-hour Excel Webinar
https://www.crowdcast.io/easyexcelans...
I use a Blue condensor Microphone to record my videos, here is the link
https://amzn.to/37gyyGa
Check out Crowdcast for creating your webinars
https://app.linkmink.com/a/crowdcast/83
If you need to buy Office 2019 follow
https://amzn.to/2VX5dv8
I use Tube Buddy to help promote my videos
Check them out
https://www.Tubebuddy.com/easyexcelan...
Follow me on Facebook
Facebook: easyexcel.answers
TWEET THIS VIDEO How to increase the size of drop down...
Follow me on twitter
easyexcelanswers
IG @barbhendersonconsulting
You can help and generate a translation to you own language
http://www.youtube.com/timedtext_cs_p...
*this description may contain affiliate links. When you click them, I may receive a small commission at no extra cost to you. I only recommend products and services that I've used or have experience with.
https://www.easyexcelanswers.com/temp...
This code is inserted on the worksheet
code
Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range
ActiveWindow.Zoom = 60
Set KeyCells = Range("A2:A3")
If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then
ActiveWindow.Zoom = 150
Else
ActiveWindow.Zoom = 60
End If
End Sub
For more help visit my website http://www.easyexcelanswers.com or email me at [email protected].
Contact me regarding customizing this template for your needs.
Excel one-on-one on-line training available. Email me to arrange.
I am able to provide online help on your computer at a reasonable rate.
Check out my next one-hour Excel Webinar
https://www.crowdcast.io/easyexcelans...
I use a Blue condensor Microphone to record my videos, here is the link
https://amzn.to/37gyyGa
Check out Crowdcast for creating your webinars
https://app.linkmink.com/a/crowdcast/83
If you need to buy Office 2019 follow
https://amzn.to/2VX5dv8
I use Tube Buddy to help promote my videos
Check them out
https://www.Tubebuddy.com/easyexcelan...
Follow me on Facebook
Facebook: easyexcel.answers
TWEET THIS VIDEO How to increase the size of drop down...
Follow me on twitter
easyexcelanswers
IG @barbhendersonconsulting
You can help and generate a translation to you own language
http://www.youtube.com/timedtext_cs_p...
*this description may contain affiliate links. When you click them, I may receive a small commission at no extra cost to you. I only recommend products and services that I've used or have experience with.
5 سال پیش
در تاریخ 1398/09/10 منتشر شده
است.
97,827
بـار بازدید شده