none
Erro ao passar o valor para variável RRS feed

  • Pergunta

  • Dim Wk As Workbook
    Dim Caminho As String
    Dim Arquivo As String
    Dim lcontrole As Byte, lFim As Byte
    Dim dtInicio As Date, dtFim As Date
    
    lFim = Parametro.Cells(Rows.Count, "B").End(xlUp).Row
    Caminho = (Parametro.Range("A2"))
    lcontrole = 2
    Arquivo = (Parametro.Cells(lcontrole, "B"))
    dtInicio = DateValue(fConsolida.Range("C3"))
    dtFim = DateValue(fConsolida.Range("C4"))
    
    Na declaração de variáveis, a variável lControle tem o valor passado de 2, que corresponde a segunda linha da coluna "B" da planilha parâmetro. Ocorre que preciso iniciar o FOR nessa linha, para checar uma lista, mas como passei o valor 2 a variável está fixa. como resolver?
    sexta-feira, 10 de julho de 2020 17:20

Todas as Respostas

  • Nelson,

    Qual a condição para que o for seja executado? Como você quer determinar o limite de linha a ser varrido?


    Natan

    sexta-feira, 10 de julho de 2020 18:57
  • Caro Natan,
    Acho que não fui claro. Ocorre o seguinte. Tenho uma tabela com arquivos a serem consultados. Exemplo A.XLSX, B.XLSX, C.XLSX e assim sucessivamente.
    Quando passo o valor para a variável lControle que no caso é 2 para referenciar a linha 2 coluna B, e inicio o for essa variável não realimenta a variável Arquivo.
    Então a variável arquivo fica lendo só o arquivo A.XLSX e a variável lControle inicia o FOR mas não realimenta a variável ARQUIVO para ler os próximos arquivos.
    sexta-feira, 10 de julho de 2020 20:32
  • Dim lcontrole As LONG, lFim As LONG

    for lcontrole = 2 to lFim
    
    Arquivo = (Parametro.Cells(lcontrole, "B"))
    
    next lcontrole


    Caso deseje aprender Excel VBA, assista a este vídeo:

    https://youtu.be/k__GdinXyKA

    A melhor forma de agradecer e votar como util e / ou marcar como resposta. Anderson Diniz diniabr2011@gmail.com





    sábado, 11 de julho de 2020 13:40