Respuesta
en
Microsoft Access
y en 1 temas más
a
Access 2007 (VBA) se cierra y ejecuta backup
Qué respuesta. Hay 2 alternativas, primera, tiene un error en el código de un módulo o en algún formulario, segunda, su base de datos esta dañada. Si no tiene información envíeme su base de datos a [email protected] y la reviso e inclusive si...
Respuesta
en
VBA
y en 2 temas más
a
Averiguar los números que faltan en una serie de Documentos
Le presento esta otra alternativa, no requiere de campos adicionales. Consta de 1 tabla 1 formulario y 1 módulo TABLA FORMULARIO CÓDIGO DEL FORMULARIO Evento Al cargar (Para llenar el cuadro combinado) Private Sub Form_Load() Dim strSQL As String...
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...