Impossible de sortir du Combox et activer l'application

[modus57]

Bonjour à tous et meilleurs vœux.

J'ai passé beaucoup de temps à rechercher sans trouver de solution, c'est pourquoi je fais appel à vous.

Voilà le problème, à l'ouverture du classeur l'UserForm est activé mais le curseur clignote et reste désespérément dans le Combox sans activer l'application.

Il faut fermer l'UserForm pour activer l'application.

Le même problème se produit à l'activation d'une autre feuille.

Ci-joint le fichier pour mieux comprendre ce phénomène.

Auriez-vous une solution ?

Merci d'avance pour votre réponse.

 

[PMO2]

Re : Impossible de sortir du Combox et activer l'application

Bonjour,

Essayez de remplacer les lignes de code

 On Error Resume Next
 UserForm1.Show
 AppActivate "Microsoft Excel"

par la seule ligne de code

UserForm1.Show vbModeless

 

[modus57]

Re : Impossible de sortir du Combox et activer l'application

Bonjour Jean-Marcel, PMO2.

Je vous prie de m'excuser j'ai créé le fichier trop rapidement, effectivement il est incomplet et incompréhensible.

J'ai intégré dans le nouveau fichier ci-joint la solution de Jean-Marcel :

UserForm1.Show (0)

cela fonctionne très bien.

A prime abord mon problème est résolu.

Merci pour vos réponses