Excel VBA : boite de dialogue inserer un text

Bonjour,
J'ai créer une macro qui, affecté à un bouton, m'affiche une boite de dialogue me pemettant d'écrire un texte :

Sub exemple()
    Dim resultat As String
   
    resultat = InputBox("Texte ?", "Texte") 'La variable reçoit la valeur entrée dans l'InputBox
   
    If resultat <> "" Then 'Si la valeur est différente de "" on affiche le résultat
       MsgBox resultat
    End If
End Sub

J'ai pris le code sur internet mais je ne sais pas quoi modifier pour pouvoir choisir la case où ce texte doit être inséré.
Merci d'avance