Codigo visual basic
Publicado por Hector (1 intervención) el 01/10/2017 19:27:58
Buena tarde a todos, tengo un código que me busca una hoja especifica pero cuando oculto la hoja no me funciona quiero solucionar ese problema que aun que este oculta pueda ser encontrada, este es el código, gracias de ante mano por su ayuda.
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub Buscar()
On Error GoTo error_hoja
Dim x As String
x = [G5].Value
Sheets(x).Select
Sheets(x).Visible = True
x = [G5].Value
Sheets(x).Select
Sheets(x).Visible = False
Exit Sub
error_hoja: MsgBox "No existe la hoja"End Sub
Valora esta pregunta
0