Procura Planilha

[bEbEr]

Galera..

Como faço pra que no excel, procurei uma planilha com o nome de TIAGO? e c tiver exclua?

Valeuuuuuu!

:)

[RenatoMejias]

Pesquise o método find, use a ajuda do Excel, ali tem um exemplo legal de como fazer isso.

[bEbEr]

bahh

não consegui! :/

já procurei por find

[RenatoMejias]

Para fazer a consulta sobre o find faça o seguinte:

- vá no Editor do Visual

- digite a palavra find

- selecione com o mouse a palavra find

- pressione a tecla F1

O código que você verá é assim:

For Each c In [A1:A5]
    If c.Value = "teste" Then
        c.Value = Empty
    End If
Next

[bEbEr]

Eu não achei isso dai que você falou.. meu Office é o 2003..

fiz um esquema assim:

Private Sub CommandButton1_Click()
i = 1
nome = "Plan2"
While Worksheets(i).Name <> ""
If Worksheets(i).Name = nome Then
Application.DisplayAlerts = False
Worksheets(i).Delete
Application.DisplayAlerts = True
Else
End If
i = i + 1
Wend
End Sub

ele faz tudo certo, só que quando termina ele da um erro loko da linha 4.

porque????

:unsure:

[Lisandro Oliveira]

Olá Beber,

Coloque isso dentro de um módulo e beleza!!!

Sub li()

Dim a, b As Integer

Application.DisplayAlerts = False

a = 1

b = InputBox("Informe o total de planilhas existentes")

While a <= b

If Sheets(a).Name = "tiago" Then

Sheets(a).Select

ActiveWindow.SelectedSheets.Delete

Exit Sub

End If

a = a + 1

Wend

End Sub

Abs

Lisandro Oliveira

[RenatoMejias]

Eu não achei isso dai que você falou.. meu Office é o 2003..

Faça como este posts indica, e adicione os suplementos relacionados a VBA.

Quanto ao seu código eu não testei, achei que esse exemplo que citei ficou mais compacto. :P

[bEbEr]

não tem como o computador descobrir quantas planilhas tem?

[RenatoMejias]

não tem como o computador descobrir quantas planilhas tem?

Com o seguinte código você pode descobrir quantas planilhas tem seu projeto:

Sub teste()
    Dim i As Integer
    i = ActiveWorkbook.Sheets.Count
    MsgBox (i)
End Sub