Platzhalter vorm Kopieren entfernen?

[Bollerkohl]

Hallo zusammen, ich möchte eine Rufnummer an PhonerLite übergeben, bekomme aber die Platzhalten aus dem Textfeld nicht weg? Kann mir bitte jemand helfen? Danke

Code [Auswählen] Erweitern

Private Sub ruf_Click()
Dim F_Telefon_Nr As String
Me.F_Telefon_Nr.SetFocus
On Error Resume Next
DoCmd.RunCommand acCmdCopy

Dim phonerLitePath As String
    phonerLitePath = "C:\Program Files (x86)\PhonerLite\PhonerLite.exe"
   
    If Dir(phonerLitePath) <> "" Then
        Shell phonerLitePath, vbNormalFocus
    Else
        Dim response As VbMsgBoxResult
        response = MsgBox("PhonerLite wurde nicht gefunden. Stellen Sie sicher, dass der Pfad korrekt ist und das Programm installiert ist.", vbExclamation + vbOKOnly, "Fehler")
       
        If response = vbOK Then
            MsgBox "Installationspfad von PhonerLite: " & phonerLitePath, vbInformation + vbOKOnly, "Installationspfad"
        End If
    End If
End Sub


[MzKlMu]

Hallo,
was sind denn das für Platzhalter ?
In dem oben gezeigten Code wird keine Telefonnummer übergeben.

Code [Auswählen] Erweitern

On Error Resume NextDas sollte vermieden werden. Du erhältst dann keine Fehlermeldung, auch keine sinnvolle.