Modificar propiedades de Tabla mediante VBA
Publicado por Christian (2 intervenciones) el 31/07/2017 22:01:40
En un sistema que es dinámico, crea mes a mes la tabla donde se registraran las descargas con este código
Hasta aquí, todo perfecto, me crea la tabla sin ningún problema.
El único inconveniente es que necesito que el campo "FechaDescarga" no sea requerido y por defecto lo crea como "Requerido"... Se puede cambiar esta propiedad por medio de código? Necesito que así sea para que nadie deba manipular el diseño de las tablas
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Tabla = "tblCarga_" & Format(Date, "mmmyy")
Set Adox_Tabla = New ADOX.Table
With Adox_Tabla
.Name = Tabla
'Agrega campos
.Columns.Append "IdMensajero", adInteger
.Columns.Append "Mensajero", adVarWChar, 50
.Columns.Append "FechaCarga", adDate
.Columns.Append "CodBarra", adVarWChar, 13
.Columns.Append "Estado", adVarWChar, 15
.Columns.Append "FechaDescarga", adDate
End With
' -- Crea la tabla
Adox_Cat.Tables.Append Adox_Tabla
Hasta aquí, todo perfecto, me crea la tabla sin ningún problema.
El único inconveniente es que necesito que el campo "FechaDescarga" no sea requerido y por defecto lo crea como "Requerido"... Se puede cambiar esta propiedad por medio de código? Necesito que así sea para que nadie deba manipular el diseño de las tablas
Valora esta pregunta
0
