Hola! anoche estuve revisando, tuve que hacer unos pequeños ajustes en la direccion de la carpeta (en vez de poner la direccion en partes la coloque toda de corrido parecida a como estaba antes) y logramos (vos y yo) que funcione!. Tambien tuve que desactivar la linea de código que bloqueaba la hoja porque sino no estaba dejando que la macro escriba el codigo de la propiedad en la celda, pero eso es lo de menos, supongo que lo puedo solucionar poniendo el bloqueo al final de la macro que creaste o desprotegiendo la celda donde se pone el codigo de propiedad.
Por
Corvette , · publicado el 9 de diciembre 9 dic
Buenas Tardes a todos,
Soy nuevo en programación de Excel y he estado realizando un autofiltro con 2 Criterios. Lo que necesito es crear If Then con el primer criterio, si mi criterio1 no existe entonces que se muestre una caja de dialogo, mi codigo es así:
For i = 149 To 185
Range("I7:I55").Select
Selection.AutoFilter
ActiveSheet.Range("$I$7:$I$55").AutoFilter Field:=1, Criteria1:=i, _
Operator:=xlOr, Criteria2:="=TAL"
If Criteria1 = False Then MsgBox "No existe Criterio " & i
Next
Intenté subir mi archivo, pero no me lo permite, espero me puedan ayudar