Probléme affichage après l'exécution d'une macro

[FAB80170]

Bonjour à tous,

Lors de l'exécution de la macro (Bouton) (voir code ci-dessous), mon affichage d'écran alterne, feuille de calcul, écran blanc avec notification "excel ne répond pas", feuille de calcul, écran blanc avec notification "excel ne répond pas", jusqu'à la fin de l'exécution de la macro. Ma macro fonctionne, mais avec une alternance; feuille de calcul, écran blanc avec notification "excel ne répond pas"...

Voici le code;

Sub Bouton()
[B10] = ActiveSheet.Shapes(Application.Caller).TextFrame.Characters.Text
End Sub

J'ai parcouru pas mal de post, avec des propositions de solutions ou indications suivantes;
- Application.ScreenUpdating=false
> Bannir les Select et Activate

Je ne suis pas du tout expert en VBA.

Avez-vous une solution à me proposer ?

Par avance, merci pour votre retour.

Bon week-end.

 

[job75]

Bonjour FAB80170,

A elle seule cette petite macro n'a aucune raison de provoquer le phénomène que vous décrivez.

Il y a autre chose, probablement une macro Worksheet_Change qui boucle sans fin.

A+

 

[FAB80170]

Bonjour FAB80170,

A elle seule cette petite macro n'a aucune raison de provoquer le phénomène que vous décrivez.

Il y a autre chose, probablement une macro Worksheet_Change qui boucle sans fin.

A+

Bonjour Job75.

Encore merci pour votre intervention; depuis votre réponse, je cherche désespérément...

Peut-être une piste... ce code n'est pas affecté à un bouton, mais à 25 boutons sur un onglet et 9 sur un autre onglet du classeur.

Ou plutôt, les 34 boutons sont affectés au même code...

Qu'en pensez-vous ?

Merci pour votre retour.

Bon après-midi.