Codigo para "volver"

Prueba poniendo esto en el módulo del libro (click derecho sobre su solapa->Ver código):

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Call AsignarNombreHoja(Sh.Name)
End Sub

y esto al principio de un módulo creado por ti:

Dim strHojaAnterior As String

Sub AsignarNombreHoja(strNombre)
strHojaAnterior = strNombre
End Sub

Sub CódigoParaElBotón()
If strHojaAnterior = "" Then Exit Sub
ThisWorkbook.Worksheets(strHojaAnterior).Select
End Sub

Al botón tendrás que asignarle la macro "CódigoParaElBotón".
Un saludo.


Fernando Arroyo
MS MVP - Excel


"Gerardo Roda" escribió en el mensaje news:

Quiero ver si alguien sabe el codigo para en una aplicacion VB, hacer lo que
hace el boton "Volver" de la barra "Web"
Concretamente tengo varios macros en diferentes paginas que van a una pagina
especifica, y quiero hacer un boton con un macro asignado que vuelva a la
pagina desde donde se vino, cualquiera sea.-

Gracias

Gerardo Roda