Overskrive fil

Så vidt, jeg ved, så bruges commondialog jo kun til at "udpege" filer og mapper. Det er vel din anden kode, som rent faktisk gemmer filen?
Og derfor vil det være oplagt at spørge med en Dir lige efter din commondialog.showsave

ja kan godt se, men hvad er dit forslag hertil så ?

Hvis du kan paste din kode ind her, så skal jeg prøve at indsætte mit forslag i koden.

her er koden

Private Sub MnuGem_Click()
Dim x As Integer
    CommonDialog1.ShowSave
    If CommonDialog1.FileName <> "*.txt" Then
        Open CommonDialog1.FileName For Output As #1 
            For x = 0 To 63
                Print #1, Ram(x).Text
            Next x
        Close #1
    End If
End Sub

Prøv denne:

Private Sub MnuGem_Click()
Dim x As Integer
    CommonDialog1.ShowSave
    If Dir(CommonDialog1.Filename) <> "" Then
        If MsgBox("ønsker du at overskrive filen '" & CommonDialog1.Filename & "'?", vbQuestion + vbOKCancel) = vbCancel Then
            Exit Sub
        End If
    End If
    If CommonDialog1.Filename <> "*.txt" Then
        Open CommonDialog1.Filename For Output As #1
            For x = 0 To 63
                Print #1, Ram(x).Text
            Next x
        Close #1
    End If
End Sub

Prøv at tilføje:
CommonDialog1.flag=cdlOFNOverwritePrompt