buenas tardes, tengo una macro que me abre hipervínculos en celdas seleccionadas
Sub abrirenlaces()
For Each celda In Selection
If celda.Hyperlinks.Count > 0 Then celda.Hyperlinks(1).Follow NewWindow:=False
Application.Wait (Now + TimeValue("00:00:01"))
Next celda
End Sub
el problema que tengo es que, al tratar de abrir gran cantidad de enlaces, la macro solo abre un máximo de 10 y luego me da error, he probado de varias formas y distintas macros que he encontrado en la web, pero todas me dan el mismo problema
muchas gracias por el apoyo y felices fiestas a todos!
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
buenas tardes, tengo una macro que me abre hipervínculos en celdas seleccionadas
Sub abrirenlaces() For Each celda In Selection If celda.Hyperlinks.Count > 0 Then celda.Hyperlinks(1).Follow NewWindow:=False Application.Wait (Now + TimeValue("00:00:01")) Next celda End Sub
el problema que tengo es que, al tratar de abrir gran cantidad de enlaces, la macro solo abre un máximo de 10 y luego me da error, he probado de varias formas y distintas macros que he encontrado en la web, pero todas me dan el mismo problema
muchas gracias por el apoyo y felices fiestas a todos!