Recuperer l'ensemble des caractères d'une cellule

Bjr à tous,

Je souhaite pouvoir récuperer l'ensemble des caractères (nombre important et aléatoire ex 1723 caractères) contenu dans une cellule.

Parmi ces caractèrès il existe des "caractères spéciaux " qui doivent me permettre via un collage spéciale source / texte

une mise en forme exploitable de mes données.

J'aimerais pouvoir faire cela automatiquement via une macro VBA

Merci d'avance à ceux qui pourront me venir en aide

Bonjour

Si tu fais

Sub Test()
Dim Contenu as String

  Contenu =  Range("A1")
End Sub

Ta variable Contenu contiendra tous les caractères de ta cellule