Ir para conteúdo
Fórum Script Brasil
  • 0

Macros com várias Workbooks


JohnnyBravo99

Pergunta

<_< Preciso criar uma planilha com a lista dos valores contidos na célula G24 de vários arquivos...

O nome desses arquivos é Informativo Soja e Milho - 010906.xls (sendo esse o primeiro, até o dia de hoje).

Tentei fazer um loop, mas me confundo na hora de declarar váriaveis para puxar os arquivos na ordem certa...

Valeu,

Link para o comentário
Compartilhar em outros sites

1 resposta a esta questão

Posts Recomendados

  • 0

Tente este código:

Dim wkb as Workbook

For Each wkb In Workbooks

If wkb.Name Like "*Informativo Soja e Milho*" Then

Workbooks("Informativo Principal").Worksheets("Lista").Range("A1").End(xlup).Offset(1,0) = _

wkb.Worksheets("Sheets onde existe a célula que quero extrair o valor").Range("G24")

End If

Next

Estou considerando que todas as planilhas de informativo já estão abertas...

:wacko:

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...