tengo un macro con este macro, lo que hace es buscar las palabras que esten entre el rango "principio" y "final" y escribirlas en la casilla a2 y me funciona bien.
pero ahora quiero un macro que haga la misma funcion pero con todos los codigos que tengan esas caracteristicas, ya que este macro en esas situaciones me marca error
Sub selecciondetextoentrepalabras()
'macro que selecciona texto entre dos palabras
principio = "<a class=""submenu"" ""href="""
Final = "</a>"
texto = Range("a1")
x1 = InStr(texto, principio) + Len(principio)
x2 = InStr(texto, Final) - x1
Range("a2") = Mid(texto, x1, x2)
End Sub
- - - - - Mensaje combinado - - - - -
aclaro que lo que me gustaria hacer es copiar todos los terminos que tengan las mismas variantes, por ejemplo que copie todos los que inicien con "href=" y terminen con " />
eso como se hace?
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
hola una ultima duda
tengo un macro con este macro, lo que hace es buscar las palabras que esten entre el rango "principio" y "final" y escribirlas en la casilla a2 y me funciona bien.
pero ahora quiero un macro que haga la misma funcion pero con todos los codigos que tengan esas caracteristicas, ya que este macro en esas situaciones me marca error
Sub selecciondetextoentrepalabras()
'macro que selecciona texto entre dos palabras
principio = "<a class=""submenu"" ""href="""
Final = "</a>"
texto = Range("a1")
x1 = InStr(texto, principio) + Len(principio)
x2 = InStr(texto, Final) - x1
Range("a2") = Mid(texto, x1, x2)
End Sub
- - - - - Mensaje combinado - - - - -
aclaro que lo que me gustaria hacer es copiar todos los terminos que tengan las mismas variantes, por ejemplo que copie todos los que inicien con "href=" y terminen con " />
eso como se hace?