| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Extending sub to cover other target cells
How could the sub below* be extended to cover additional cells besides C2,
viz.: the zoom to 120 should work for: C2, C25, C48, C71, C94 (the other cells in col C are offset to the start cell C2 by 24) *from Debra's site Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$C$2" Then ActiveWindow.Zoom = 120 Else ActiveWindow.Zoom = 100 End If End Sub Thanks -- Rgds Max xl 97 --- Singapore, GMT+8 xdemechanik http://savefile.com/projects/236895 -- |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How many cells can a correlation function cover? | Excel Discussion (Misc queries) | |||
| Data entered needs to cover 2 vertical cells | Excel Discussion (Misc queries) | |||
| Target cell reference moves when target is cut and pasted | Excel Discussion (Misc queries) | |||
| Help - loop through cells in a range that are not together (several different cells as Target) | Excel Programming | |||
| How find if target is object in Worksheet_Change (ByVal Target As.. ?) | Excel Programming | |||
Threaded Mode
