Ouverture application XL aléatoire

Résolu

fabien25000 Messages postés 697 Statut Membre -
fabien25000 Messages postés 697 Statut Membre - 2 sept. 2017 à 14:26

Bonjour,

j'ai créé une application Excel VBA pour les commerciaux de mon entreprise qui par le remplissage de formulaires édite un devis Word via publipostage et le converti en PDF pour éviter les erreurs de manipulation.
je n'ai qu'un problème :
Mon code :

Private Sub workbook_open()

Application.WindowState = xlMinimized
Application.Visible = False
ufLoggin.Show 0
    

End Sub

ne fonctionne qu'une fois sur 2
C'est à dire que je l'ouvre une première fois, tout se passe bien, je ferme, j'ouvre une deuxieme fois et là c'est le classeur excel qui s'ouvre.
j'ai testé en mettant les paramètres inverses dans

Private Sub Workbook_BeforeClose(Cancel As Boolean)

mais l'application réagis toujours pareil

Auriez vous des idées sur le sujet?
Merci d'avance

Afficher la suite

1 réponse

Réponse 1 / 1
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention Ambassadeur 1 588

bonjour, peux-tu décrire "tout se passe bien"?
0
1. fabien25000 Messages postés 697 Statut Membre 59
  
  l'application s'ouvre comme je le lui demande (commande) et réagis conformément au code que j'ai écrit
  mais à la deuxième ouverture l'userform ne s'affiche pas et le classeur s'ouvre "physiquement"
  
  0
2. yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention 1 588 > fabien25000 Messages postés 697 Statut Membre
  
  ok, j'ai lu maintenant que tu veux que seul ton userform soit visible.
  et cela refonctionne à la troisième fois?
  quelle sont les différences entre la première et la seconde fois?
  que dois-tu faire pour te remettre dans les conditions de la première fois?
  
  0
3. fabien25000 Messages postés 697 Statut Membre 59
  
  Le code fonctionne la troisième fois, il fonctionne littéralement 1 fois sur 2
  il n'y a aucune différence d'une ouverture à l'autre si ce n'est que le fichier à déjà été ouvert et que comptabilise sur une feuille dédiée le nombre de login mais c'est un simple Range("A1")=Range("A1")+1 ça m'étonnerai que le fichier soit allergique aux nombres pairs (ou impairs)
  je ne vois que le redémarrage de l'ordi entre la première et la deuxieme utilisation pour que l'appli s'ouvre en suivant le code copié plus haut
  
  0
4. fabien25000 Messages postés 697 Statut Membre 59 > fabien25000 Messages postés 697 Statut Membre
  
  j'ai essayé d'ouvrir un autre fichier excel entre 2 ouvertures du fichier "malade" mais ca ne change rien
  
  0
5. yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention 1 588 > fabien25000 Messages postés 697 Statut Membre
  
  je suggère d'ajouter un msgbox dans workbook_open(), pour identifier si il est appelé chaque fois.
  que fais-tu quand cela ne fonctionne pas (une fois sur deux)? cela crée peut-être les conditions pour que cela refonctionne la fois suivante.
  
  0

Newsletters