27/04/2006, 01:12
|
| | | Fecha de Ingreso: enero-2006
Mensajes: 166
Antigüedad: 19 años Puntos: 0 | |
ya di con la solucion
Código:
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then ActiveSheet.ChartObjects("Gráfico 1").Visible = True
If CheckBox1.Value = False Then ActiveSheet.ChartObjects("Gráfico 1").Visible = False
End Sub
|