Autor Tema: VBAExcel Como saber por medio de Codigo el numero de hojas (Leído 1795 veces)

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?

FJRIOS

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

F_Tanori

Código: Visual Basic

sheets.Count
 

saludos

SoloCodigo

Autor Tema: VBAExcel Como saber por medio de Codigo el numero de hojas (Leído 1795 veces)

Jimbenit

VBAExcel Como saber por medio de Codigo el numero de hojas

FJRIOS

Re: VBAExcel Como saber por medio de Codigo el numero de hojas

F_Tanori

Re: VBAExcel Como saber por medio de Codigo el numero de hojas