Omitir datapicker de vba excel si esta en blanco (consulta de Access)
Tengo una BD en access, el cual realizo las consultas desde un frm de excel, el caso es que esta BD tiene campos "fecha" y en algunos casos estos campos pueden estar vacíos, y como mi frm tiene OBJ DTP al cargar los datos vacíos me bota un error en el cual no puedo continuar con la ejecución, dejo mis código para que veaan como lo manjeo y como me pueden ayudar ocn el tema, muchas gracias.
Private Sub cmd_Anterior_Click()
Rs.MovePrevious 'ir al registro anterior
If Rs.BOF Then Rs.MoveFirst: MsgBox "Primer Registro", vbInformation, "MYBD"
txtID.Text = "" & Rs.Fields("Id")
cbo_Codigo.Text = "" & Rs.Fields("CODIGO")
txtCondicionLegal.Text = "" & Rs.Fields("COND_LEGAL")
DTPInicio.Value = Rs.Fields("F_INICIO")
DTPNacimiento.Value = Rs.Fields("F_NAC")
End SubEl campo DTPNacimiento.value en muchos casos no tiene fecha de nacimiento y es por ello que al dar click en siguiente registro o anterior me muestra el error.
1 Respuesta
Que conste que no tengo ni idea de Excel, pero como pasa algo parecido en Access cuando uno de los valores es nulo, por eso lo digo.
En ese caso conviene usar la función NZ, que te transforma el valor nulo, en el valor que quieras, por ejemplo
Texto10=nz([texto8]) Si texto8 es nulo, a efectos de trabajo te lo trata como si en texto8 hubiera un cero. O bien
Texto10=nz([texto8],4), trata los nulos como si fuera un 4
Por si te sirve de algo
