Abraham Valencia

[Hola Si tienes el problema tal cual mencionas en realidad para ayudarte habría que ver todo el código que tienes/usas, ya que eso que has enviado no realiza lo que mencionas. Quizás incluso sea más práctico que coloques tu archivo en algún "drive" y...

[Hola Primero que nada, si te refieres a que la macro sola busque el archivo en el o los discos duro, te aseguro que no es tan simple. Segundo, mientras comentas/piensas lo primero, haz estas modificaciones: - Tus datos a reemplazar comienzan en...

[Hola Hazlo así: .Provider = "Microsoft.ACE.OLEDB.15.0" .ConnectionString = "data source=" & ThisWorkbook.Path & "\Database1.accdb;Jet OLEDB:Database Password=1234;" .Open Saludos] Abraham Valencia PD: Por si acaso es VBA 7.1, no VB, VB es otra cosa :)

Tu respuesta [Hola Hay muchas cosas que se pueden hacer con VBA y los PDF de manera relativamente fácil: Convertir a pdf, rellenar formularios pdf, renombrar archivo y algunas cosas más. Lo de buscar y/u obtener los datos desde un pdf cuando dicho...

[Hola Para entenderte bien sería ideal que coloques tu archivo en algún "Drive" y compartas por aquí el enlace. No olvidar explicar con más detalle. Saludos] Abraham Valencia

[Hola No hay forma de que una macro se active si el archivo está cerrado por lo que necesariamente tendrías que hacer que el sistema operativo abra el archivo que tiene la macro y que dicha macro sea activada y/o sea parte del evento "Open" del libro...

[Hola Si mal no te entendí, y viendo lo que tienes, solo haría falta cambiar esto: MsgBox "EXISTEN " & Range("AS1").Value & " PALPADORES VENCIDOS" Comentas Abraham Valencia PD: Yo no usaría "Select"

[Hola Por lo que comentas, la hoja está protegida así que solo basta poner algo así al inicio (o donde sea necesario): WorkSheets("Nombredetuhoja"). Unprotect "laclave" Y luego al final (o donde corresponda) algo así: WorkSheets("Nombredetuhoja")....

[Hola Suponiendo varias cosas: - Todo comienza en "A1" - Los tiempos de todos modos están en la columna "C" - Los códigos son solo númericos Entonces, prueba así: Sub MacroFiltro() Dim Mifecha As Date, Fechamaxima As Date, fechaminima As Date Dim...

[Hola En el módulo del libro, aquel que lleva por nombre "ThisWorkBook" (nombre por defecto), coloca esto: Private Sub Workbook_Open() Worksheets("Hoja1").Range("M4").Value = Worksheets("Hoja1").Range("M4").Value + 1 End Sub Solo reemplaza por el...