XL 2010 Résolu par Marcel : une macro qui gêne un code dans la feuille

[Usine à gaz]

Bonjour à toutes et à tous,

Me voici à nouveau à vous solliciter.
En fait, il y a longtemps que je souhaitais vous poser cette question et puis .... le temps passant, n'ayant pas eu vraiment besoin, j'avais oublié.

Aujourd'hui, j'ai besoin d'exécuter "pas à pas" un code qui est dans le code de ma feuille .
Voici une partie du code :

If Not Application.Intersect(Target, Range("q7:q20000")) Is Nothing Then
Application.EnableEvents = False
Application.ScreenUpdating = False
ActiveSheet.Unprotect Password:="Krameri"
   On Error Resume Next
   With Target
      ActiveSheet.PasteSpecial Format:="Texte", Link:=False, DisplayAsIcon:=False
      Call ClearClipboard
      Call sms
      ActiveCell.Offset(0, 1).Select
   End With

quand je veux déboyer pas à pas, hormis une sonnerie ..... rien ... nada qdal

Pourtant, j'ai besoin de voir ce qui se passe en détails car ce code fait référence à ma macro "sms".

- Quand j'exécute la macro "sms" direct, ça marche bien sans aucun problème.
- Quand je passe par le code de la feuille, la macro "sms" est exécutée n'importe comment et donc ça ne va plus.

Pourriez-vous me dire comment déboyer pas à pas à partir des codes feuilles ?
Je vous remercie encore une fois,
Amicalement,
Lionel,

 

[Usine à gaz]

Dans la macro "sms", remplace la ligne
TexteEnCours = TexteEnCours & "... Avez-vous vendu ? Voici mon n° tel : 0111111111, Cordlt"
par la ligne
TexteEnCours = TexteEnCours & "... Avez-vous vendu ? Voici mon n° tel : " & Sheets("Feuil3").Range("E9").Value & ", Cordlt"

LOL, je n'aurais jamais fait ça !!!
Comme koi, on sait ou on sait pas.
Merci Marcel

 

[TooFatBoy]

Et quand on ne sait pas, on regarde et on apprend.

 

[Usine à gaz]

C'est vrai et je tente de le faire mais je reste basic si je n'ai pas votre aide