Tente usar a propriedade "Cells" do excell, caso não fique claro procure no help do VBA dentro do Excell essa propriedade. Exemplo: Dim X as integer For X = 1 to 10 'Selecionando linha por linha da coluna 1 Cells(X, 1).value 'Selecionando coluna por coluna da linha 1 Cells(1, X).Value Next