Pb macro EXECUTEE à partir du ruban COMPLEMENTS

Bonjour,
J'ai une barre d'outil XL2003 qui pointe sur un fichier .xla

Dans excel 2003 tout va bien. Dans 2007 lorsque je clique sur mon bouton de macro je bloque l'accès au ruban JUSQU'à la fin de la macro !!

Si je lance ma macro par le menu MACRO (ou alt+f8) cela ne se produit pas.

Quelqu'un a t'il une solution aisée qui reste compatible XL2003 ?

j'ai besoin au cours d'une macro de changer de fenêtre pour aller choisir sur quelle classeur je travaille.
exemple :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

Sub Comparaison_1()   Dim ColonneImmat_GSR As Range Dim ColonneImmat_client As Range   colgsr: Set ColonneImmat_GSR = Application.InputBox(prompt:="Sélectionner avec la souris le FICHIER et la COLONNE ou se trouvent NOS " & TexteBoite _ & vbCr & Texterreur, Title:="1ère colonne " & TexteBoite, Type:=8) If ColonneImmat_GSR Is Nothing Then MsgBox "Boîte de dialoque annuler": Exit Sub If ColonneImmat_GSR.Columns.Count <> 1 Then Texterreur = "##Veuillez selectionner 1 seule colonne ! ##'" GoTo colgsr Else Texterreur = "" End If     '... End Sub

---

J'ai trouvé une solution

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Sub Comparaison()   If CDbl(Left(Application.Version, 2)) >= 12 Then Application.OnTime Now + TimeValue("00:00:01"), "Module_comparaison.Comparaison_go" Exit Sub Else Call Comparaison_go End If End Sub Sub Comparaison_go() ' ma macro end sub

---

Si vous avez autre chose ?