martes, 8 de septiembre de 2015

¿Cómo ocultar una columna en una vista de hoja de datos programaticamente en MS Access?

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