Aumentar el tamaño de en una validación de datos
Publicado por Luis (2 intervenciones) el 24/03/2017 22:05:02
Buen día!
Alguien me puede ayudar, tengo en una misma hoja dos validaciones de datos y me gustaría cambiar el tamaño en cada que se selecciona una de ellas.
Lo estoy intentando con esta macro, pero no he podido resolverlo.
Muchas gracias de antemano por el apoyo, saludos!
Alguien me puede ayudar, tengo en una misma hoja dos validaciones de datos y me gustaría cambiar el tamaño en cada que se selecciona una de ellas.
Lo estoy intentando con esta macro, pero no he podido resolverlo.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Sub Zoom()
If Union(Target, Range("B2")).Column = Range("B2").Column Then
ActiveWindow.Zoom = 100
Else
Range("$B$3").ColumnWidth = 40
ActiveWindow.Zoom = 75
End If
If Union(Target, Range("B5")).Column = Range("B5").Column Then
ActiveWindow.Zoom = 100
Else
Range("$B$6").ColumnWidth = 40
ActiveWindow.Zoom = 75
End If
End Sub
Muchas gracias de antemano por el apoyo, saludos!
Valora esta pregunta
0
