Jump to content

GILDARDO GONZALO LUNA GARC

Members
  • Content Count

    7
  • Joined

  • Last visited

Posts posted by GILDARDO GONZALO LUNA GARC

  1. Al ejecutar la Macro me da un error 91

    Se ha producido un Error “91 en tiempo de Ejecución:

    Variable de Objeto o Bloque With no Establecido

     

    El Error se Genera porque en el Reporte no encuentra la palabra "ACTIVO A LARGO PLAZO"

    La pregunta es que instrucción le tengo que dar para que al querer ejecutar esta parte de la macro cuando no encuentre el nombre no genere el error  y siga ejecutando el resto de la macro

    Cells.Find(What:="ACTIVO A LARGO PLAZO", After:=ActiveCell, LookIn:= _
    xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
    xlNext, MatchCase:=False, SearchFormat:=False).Activate
    Selection.Font.Bold = True


    Se anexa un archivo con el reporte en dos situaciones una cuando lo ejecuta correctamente y el segundo donde se genera el error 

    hice unas macros para copiar el archivo origina que es al que se le da formato con unas instrucciones en la primer pestaña 


    Agradezco de Antemano el Apoyo 

    Saludos

    Gildardo Luna 

    Estado de Cambios.xlsm

  2. Hace 6 horas, Antoni dijo:
    
    set celda = Cells.Find(What:="ACTIVO A CORTO PLAZO", After:=ActiveCell, LookIn:= _
            xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
            xlNext, MatchCase:=False, SearchFormat:=False)
    if not celda is nothing then celda.Font.Bold = True

     

    Gracias Antoni, Ahora me da un error 13 en Tiempo de ejecución

    No coinciden los tipos  

  3. Tengo un problema a la hora de ejecutar mi macro en ocasiones no existe un nombre en mi reporte, y en ese momento la macro se detiene, como hacer para que no se detenga se que tengo que agregar unas lineas con la palabra "Falce" pero no se se donde adicionarla 

    Este es el inicio de mi macro, que debo hacer para que en caso de que no encuentre "ACTIVO A CORTO PLAZO" siga en ejecución la macro ya que si no tengo en mi reporte la frase "ACTIVO A CORTO PLAZO" se detiene y me manda un error

     

            Cells.Find(What:="ACTIVO A CORTO PLAZO", After:=ActiveCell, LookIn:= _
            xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
            xlNext, MatchCase:=False, SearchFormat:=False).Activate
        Selection.Font.Bold = True
     

    O puede ser esta otra Macro

     

            Cells.Find(What:="ACTIVO A CORTO PLAZO", After:=ActiveCell, LookIn:= _
            xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
            xlNext, MatchCase:=False, SearchFormat:=False).Activate
        Selection.Font.Bold = True
     

     

     

     

    Gracias 

×
×
  • Create New...

Important Information

Privacy Policy