Usar o WriteLine em vez de Write deve se livrar das aspas.
Eu tenho duas colunas como pares chave / valor e quero exportá-las para um arquivo na estrutura key = value (para criar um arquivo de propriedades).
Eu tentei este script:
Sub Properties()
Dim FileName As String, i As Integer, str As String
FileName = "C:\propstest.txt"
Open FileName For Output As #1
For i = 1 To 50
str = cells(i, 1) & "=" & cells(i, 2)
Write #1, str
Next i
Close #1
End Sub
Quase funciona, mas imprime no arquivo como
"key=value"
Existe uma maneira de se livrar das aspas no arquivo?
Obrigado.
Tags microsoft-excel macros vba