CRKry17

O código acima funcionou perfeitamente. Para verificar o conteúdo do arquivo, por enquanto estou utilizando MsgBox: Dim nome_arquivo, conteudo_arquivo As String Dim arquivo As Long nome_arquivo = "C:\file.csv" arquivo = FreeFile Open nome_arquivo For Input As arquivo conteudo_arquivo = Input(LOF(arquivo), arquivo) MsgBox conteudo_arquivo Close arquivo O resultado: Dando continuidade, minha dúvida agora é como transformar este resultado em um TreeView. Valeu pessoal!

Pessoal, sei que o controle TreeView pode utilizar informações de um arquivo CSV (texto separado por vírgulas), gerado por exemplo, pelo Excel. No Visual Express 2005, isto pode ser feito da seguinte maneira: Dim vLeitura As New System.IO.StreamReader ("C:\file.csv", System.Text.Encoding.GetEncoding(1252)) ... porém no VBA não consegui adaptar o código. Alguém conhece uma solução?

Obrigado pela ajuda, ainda vou testar, mais acho que isto resolve: oShpTop = x ' x e y incrementam a posição da imagem oShpLeft = y ActiveSheet.Pictures.Insert("nome_do_arquivo").Select With Selection.ShapeRange .Left = oShpTop .Top = oShpLeft End With

O código abaixo seleciona uma imagem no Excel e a multiplica quantas vezes conforme estipulado na célula "A1". Dim quant As String quant = Range("A1") For x = 1 To quant ActiveSheet.Shapes("Picture 1").Select Selection.ShapeRange.Duplicate.Select Selection.ShapeRange.IncrementLeft -50 Selection.ShapeRange.IncrementTop -10 Next x :unsure: Peço ajuda na questão: As imagens ficam multiplicadas, mas sobrepostas. Como posso criar um código, que para cada imagem multiplicada, faça um pequeno deslocamento que evite a sobreposição? Eu imaginei utilizar For...Next, mas não consegui materializar isto.