I've tried using all the formulas from: http://www.contextures.com/xlDataVal08.html
and they will not work. I can't figure out why.
I've tried using all the formulas from: http://www.contextures.com/xlDataVal08.html
and they will not work. I can't figure out why.
Your code has a Reference error
Select the field where the #REF should be pointing to.Please Login or Register to view this content.
You could use the below calculation to produce a zero, if field B5 or C5 is blank/empty
Or use the below calculation to show nothing/blank field, if field B5 or C5 is blank/emptyPlease Login or Register to view this content.
Please Login or Register to view this content.
Thanks for the reply that was actually the next issue I needed to address! Also for my original issue in the formula:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Intersect(Target, Range("A1,B3,D9")) Is Nothing Then
ActiveWindow.Zoom = 100
Else
ActiveWindow.Zoom = 120
End If
End Sub
Is there anyway to set the ActiveWindow.Zoom for non drop listed cells to where it doesn't zoom at all?
Last edited by pahickham; 06-16-2017 at 09:02 AM.
Still a work in progress but here what I found to work thus far. With a little code manipulation, the code could actually do what you want.
* You must select an empty cell to reset the zooming
Source: https://www.youtube.com/watch?v=r65mICOUQcA
There are 3 codes
Code #1:
Code #2:Please Login or Register to view this content.
Code #3:Please Login or Register to view this content.
Please Login or Register to view this content.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks