Erro ao passar o valor para variável

Question

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?

Answer 1

Nelson,

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

---

Natan

Answer 2

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.

Answer 3

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 [e-mail]