En el evento load, ocultamos el control:
Private Sub Form_Load()
If Internal.opcionActiva("Fecha Pedido Auditoria") Then
Me.Controls("FechaPedido").ColumnHidden = False
Else
Me.Controls("FechaPedido").ColumnHidden = True
End If
DoCmd.SetWarnings False
End Sub
Es muy importante desconectar los warnings y volverlos a conectar en el cierre para evitar la fastidiosa pregunta que les muestro en esta imagen:
Private Sub Form_Close()
DoCmd.SetWarnings True
End Sub
No hay comentarios:
Publicar un comentario