Case servant de titre

Bonjour tout le monde,

Je cherche à faire une chose peu être simple mais que je n'arrive pas à trouver.

L'idée: avoir les cases qui servent de "titre" et lors d'un double clic, copier un texte.

Par exemple: Dans la case "Réparation batterie"
et copie un texte:
-etape1

-etape2

-etape3

Pour la copie en double click c'est déjà codé sur ma feuille.

Merci d'avance à vous

Bonjour et bienvenue sur le forum

Tu devrais joindre ton fichier....

Bye !

Bonjour,
Du coup j'ai mis en C12 l'exemple que je souhaite,
Actuellement si on double clic sur la case cela copie "Réglage 1" dans le presse papier
L'idée serait de copier un texte au lieu du mot réglage

Merci

Je pensais à un renvoi vers un module en partant de la feuille avec ceci:

'Code pour Appeler des modules
Public Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

'Annulation de changement de valeur de case par double clic
    Cancel = True

'Appel aux modules suivant les cases
'if = Choix; elseIf = Choix différent etc à la fin mettre end if
If Target.Address = "$A$66" Then
    Application.Run "reglage.reglage"

Choisir une case et renvoyer vers un module.
Ce qui me permets de bien sélectionner les cases
Et derrière c'est que mettre dans le module?? là je plante totalement

Bon j'ai trouvé,
Je renvoi bien vers un moule suivant les cases et ensuite dans le module je fais ceci:

Sub Reglage()

Dim strContenupressepapier
Dim dobPressepapiers As DataObject

strContenupressepapier = "Texte 1" & Chr(13) & Chr(10) & "Texte 2"

Set dobPressepapiers = New DataObject
dobPressepapiers.SetText strContenupressepapier
dobPressepapiers.PutInClipboard

End Sub

J'ai donc ma réponse