Página 1 de 1

Macro para abrir varias panilhas e contar linhas

Enviado: 23 Fev 2016 às 22:36
por LiviaRabelo
Boa noite!!
Estou precisando de muita ajuda, sou inciante em VBA mas estou precisando desenvolver a seguinte macro e não sei nem por onde começar...
Eu preciso que ela pesquise e retorne o nome das planilhas em um determinado diretório ( todas as planilhas tem o nome iniciado em detalle). Além disso preciso que abra cada uma das planilhas e que conte o número de linhas com preenchimento amarelo (acredito que até esta parte eu consiga fazer com a ajuda do gravador de macros), e que esta informação seja incluida na mesma base que vai armazenar o nome de todas as planilhas.
Então quem souber uma forma que eu consiga pesquisar os arquivos e pedir que retorne o nome das planilhas já vai me ajudar bastante.
Obrigada!

Re: Macro para abrir varias panilhas e contar linhas

Enviado: 24 Fev 2016 às 10:07
por alexandrevba
Bom dia!!

vamos por parte.
Código: Selecionar todos
Sub Teste()
    MsgBox FileCountA("C:\Users\alexandreVBA\")
End Sub
Código: Selecionar todos
Function FileCountA(Path As String) As Long
    Dim strTemp As String
    Dim lngCount As Long
    
    strTemp = Dir(Path & "*.*")
    Do While strTemp <> ""
        lngCount = lngCount + 1
        strTemp = Dir
    Loop
    
    FileCountA = lngCount
    
End Function
Vou tentar entender a segunda parte e responder.

Att