VBA Excel : Cells.formula
Bushinone
Mensajes publicados
8
Estado
Miembro
-
Bushinone Mensajes publicados 8 Estado Miembro -
Bushinone Mensajes publicados 8 Estado Miembro -
Hola a todos,
estoy intentando, en el transcurso de una macro, escribir una fórmula en una celda y luego copiarla en un rango dado. Procedo de la siguiente manera:
ThisWorkbook.Sheets(2).Activate
Cells(2, 2).Formula = "=SI(ENCONTRAR("permiso";ESPACIO.QUITAR(A2))>4;"";ESPACIO.QUITAR(SUSTITUIR(SUSTITUIR(A2;"<nombre de permiso=";"");" />";"")))"
Cells(2, 2).AutoFill Destination:=Range("B3:B999"), Type:=xlFillDefault
Sin embargo, me muestra un error: se esperaba una instrucción.
¡Si alguien puede ayudarme a resolver mi problema, se lo agradecería muchísimo ^^ !
estoy intentando, en el transcurso de una macro, escribir una fórmula en una celda y luego copiarla en un rango dado. Procedo de la siguiente manera:
ThisWorkbook.Sheets(2).Activate
Cells(2, 2).Formula = "=SI(ENCONTRAR("permiso";ESPACIO.QUITAR(A2))>4;"";ESPACIO.QUITAR(SUSTITUIR(SUSTITUIR(A2;"<nombre de permiso=";"");" />";"")))"
Cells(2, 2).AutoFill Destination:=Range("B3:B999"), Type:=xlFillDefault
Sin embargo, me muestra un error: se esperaba una instrucción.
¡Si alguien puede ayudarme a resolver mi problema, se lo agradecería muchísimo ^^ !
Configuración: Windows XP Firefox 3.0.1
