Programación General => Visual Basic 6.0 e inferiores => VBA => Mensaje iniciado por: Jimbenit en Miércoles 10 de Diciembre de 2008, 19:19
Título: VBAExcel Como saber por medio de Codigo el numero de hojas
Publicado por: Jimbenit en Miércoles 10 de Diciembre de 2008, 19:19
Disculpen mis Novatadas
Alguien sabe como se puede obtener el numero de hojas de un proyecto determinado?. He podido saber el numero de hojas por medio de este codigo
Código: Text
Private Sub CommandButton1_Click()
Dim i As Integer
On Error GoTo xError
While True
i = i + 1
Sheets(i).Select
Wend
xError:
If Err.Number > 0 Then
MsgBox ("Hay " & i - 1 & " Hojas")
End If
End Sub
Pero no me gusto, ¿No hay una funcion o metodo de VBA para saber el numero de "Hojas" de un proyecto?
Título: Re: VBAExcel Como saber por medio de Codigo el numero de hojas
Publicado por: FJRIOS en Jueves 11 de Diciembre de 2008, 05:34
Hola,
Hay una variable que se llama:
Worksheets.Count
Contiene el número de hojas del libro.
Yo la he usado por ejemplo con este código:
For I = 1 To Worksheets.Count If Worksheets(I).Name = "DETAILS FROM LAYOUTS" Then Sheets("DETAILS FROM LAYOUTS").Select Cells.Select Selection.ClearContents Range("A1").Select X = 1 End If Next I
Saludos, Francisco
Título: Re: VBAExcel Como saber por medio de Codigo el numero de hojas
Publicado por: F_Tanori en Jueves 11 de Diciembre de 2008, 06:37