Boa tarde, Srs.

Estou com dificuldades em retirar aspas dupla (") no inicio e final da linha ao salvar o arquivo em .txt, gostaria de saber dos senhores uma forma que contornar essa situação no momento que estou salvando, estilo hum replace ou até mesmo uma alteranativa de como conter o problema.

Código:

Private Sub cmdSaveTxt_Click()

Dim iFF As Integer
Dim Arquivo As String
Dim Resultado As VbMsgBoxResult

Arquivo = Application.GetSaveAsFilename(InitialFileName:="", _
        FileFilter:="Texto formatado (separado por espaço) (*.txt), *.txt", _
        Title:="Especifique o nome do arquivo")
        
    If LCase(Arquivo) = False Then Exit Sub

    iFF = FreeFile
    
    Open Arquivo For Output As iFF
    
        Write #iFF, "Sumário:"
        Write #iFF,
        Write #iFF, "a) Inicio da série........................................: " & lbl_a.Caption
        Write #iFF, "b) Ultima observação...................................: " & lbl_b.Caption
        Write #iFF, "c) Máximo valor total...................................: " & lbl_c.Caption
        Write #iFF, "d) Mínimo valor total....................................: " & lbl_d.Caption
        Write #iFF, "e) Máximo valor total somado..........................: " & lbl_e.Caption
        Write #iFF, "f) Mínimo valor total somado...........................: " & lbl_f.Caption
        Write #iFF, "g) Total de registros.....................................: " & lbl_g.Caption
           
    Close iFF
        
    Resultado = MsgBox("O arquivo foi salvo com sucesso em [" & Arquivo & "]" & vbCrLf & _
                "Deseja visualizar o arquivo?", vbYesNo, "Arquivo Salvo com Sucesso!")
    
    If Resultado = vbYes Then
    
        If Len(Dir(Arquivo)) > 0 Then
        
                    Shell ("Notepad.exe " & Arquivo), vbNormalFocus
                    
                Else
            Exit Sub
        End If
    End If
    
    Application.ScreenUpdating = True
    
End Sub

Arquivo depois de salvo:

"Sumário:"

"a) Inicio da série........................................: 01/03/2001"
"b) Ultima observação...................................: 01/01/2014"
"c) Máximo valor total...................................: 498,70"
"d) Mínimo valor total....................................: 0,00"
"e) Máximo valor total somado..........................: 498,70"
"f) Mínimo valor total somado...........................: 0,00"
"g) Total de registros.....................................: 285"

Gostaria da ajuda/solução dos senhores do fórum.