Macro para seleccionar una pestaña

[kalamata]

Muy buenas a todos. A ver, os comento.

Tengo una macro en excel 2010 que, a través de un useform, me genera (en la pestaña principal) una fila con con varias columnas. Las dos primeras columnas son las importantes. Además, dicha macro, crea una pestaña con el nombre que hay en la columna A y genera el hipervinculo correspondiente a dicha celda con la nueva pestaña. ejemplo: En el useform pongo "123" y se crea en la celda A5: 123, además de crearse una pestaña con el nombre "123". La celda A5 y la pestaña estan hipervinculadas. También tengo que comentar, que segun se va ejecutando el useform, se van añadiendo filas nuevas con las mismas columnas

Esta macro funciona perfectamente

El problema, es que quiero enlazar las celdas de la pestaña principal con otras celdas de las pestañas que se van creando, y no se como utilizar el comando Sheet para ir seleccionando automaticamente cada pestaña correspondiente.

Espero haberme explicado correctamente, y muchas gracias por su ayuda!!

[verzulsan]

Hola

Sub modo1()

    Sheets(2).Select

End Sub


Sub modo2()

    Sheets(2).Activate

End Sub


Sub Modo3()

    Sheets("Hoja2").Select

End Sub


Sub Modo4()

    Sheets("Hoja2").Activate

End Sub


Sub Modo5()

    Dim NombreHoja As String

    NombreHoja = "Hoja2"

    Sheets(NombreHoja).Select

End Sub


Sub Modo6()

    Dim NombreHoja As String

    NombreHoja = "Hoja2"

    Sheets(NombreHoja).Activate

End Sub


Sub RecorrerTodasLasHojas_Modo1()

    For Each hoja In ThisWorkbook.Sheets

        hoja.Select

        MsgBox hoja.Name

    Next

End Sub


Sub RecorrerTodasLasHojas_Modo2()

    For Each hoja In ThisWorkbook.Sheets

        hoja.Activate

        MsgBox hoja.Name

    Next

End Sub[/CODE]

Saludos

[kalamata]

Muchisimas gracias. Me has ahorrado 1 semana de trabajo