Respuesta
en
Microsoft Access
y en 2 temas más
a
¿Cómo hacer una búsqueda alternativa si uno de mis valores es NULL (VBA ACCESS)?
Le dejo este código Private Sub postFecha_AfterUpdate() Dim criterio As String If IsNull(Me.serviOption) Then criterio = "[microorganismos] = " & Me.enteroOption & " AND [fecha] Between #" & Format(Me.preFecha, "yyyy-mm-dd") & "# AND #" &...
Respuesta
en
VBA
y en 1 temas más
a
¿Cómo contar registro entre una fecha determinada usando VBA?
Otra alternativa Private Sub postFecha_Change() Me.cuentaPorFecha = DCount("*", "[regEnterobacterales]", "[microorganismos]=" & Me.enteroOption & " and [servicio] = " & Me.serviOption & " and [fecha]> #" & Format(Me.preFecha, "yyyy-mm-dd") & "# and...
Respuesta
en
Microsoft Access
y en 1 temas más
a
Envío de informes a correos electrónicos
Le dejo este código Sub EnviarCorreoConInformeAdjunto() Dim db As DAO.Database Dim rs As DAO.Recordset Dim oApp As Object 'Aplicación Outlook Dim oMail As Object 'Correo electrónico Dim strSQL As String Dim strTempPath As String Dim strReportName As...
Respuesta
en
Visual Basic
y en 2 temas más
a
Llevar consulta sql a vba para formulario
Este es un script, espero haya entendido su pregunta Dim strSQl As String strSQL = "SELECT DISTINCT Entradas_DTL_Detalle.Documento" & vbCrLf strSQL = strSQL & " , Entradas_DTL_Detalle.Fecha" & vbCrLf strSQL = strSQL & " ,...
Respuesta
en
Microsoft Access
y en 2 temas más
a
Error en consulta Access VBA
El erro está en la cláusula WHERE debe ir antes que ORDER BY, algo como Consulta = "SELECT Codigo_Producto, Descripcion_Producto, Stock, Cantidad_Recibida, Empresa" Consulta = Consulta & " FROM Inventario" Consulta = Consulta & " WHERE " &...
Respuesta
en
Microsoft Access
y en 2 temas más
a
Inprimir informe de un formulario independiente
¿Y cuál es el error?
Respuesta
en
Microsoft Access
y en 1 temas más
a
Vaciar o eliminar carpeta desde vba access
Puede realizarlo con este código Public Function eliminarCarpeta(ruta As String) Dim fso As Scripting.FileSystemObject Set fso = New Scripting.FileSystemObject fso.DeleteFolder ruta, True End Function Pude llamar la función desde cualquier parte, por...
Respuesta
en
Microsoft Access
y en 2 temas más
a
Como eliminar registros duplicados de una tabla de access dejando un único registro con vba
Le preparé este ejemplo TABLA Observe que están repetidos lo idcliente= 2 y 4, es decir, INES MARTINEZ PAEZ y JORGE OLMOS CRUZ Función para retirar duplicados Public Function retira_duplicado() On Error GoTo hay_error CurrentDb.Execute "DELETE * FROM...
Respuesta
en
Visual Basic
y en 1 temas más
a
Cambiar macro por vba ACCESS
No lo dude es mejor VBA que macros. Puede hacerlo de 2 formas dependiendo la versión de Access. 1. Access 2003 y 2007 Private Sub lstMatricula_Click() ' Buscar el registro que coincida con el control. Dim rs As Object Set rs = Me.Recordset.Clone...
Respuesta
en
Microsoft Access
y en 2 temas más
a
Minimizar formulario Access mediante vba
Juan Pablo, la respuesta que le dan no es la apropiada y es de un principiante. Para su caso le recomiendo mejor hacer no visible el formularioID cuando se cargue el formularioClientes. Para esto haga lo siguiente. 1. En el formularioClientes evento...