IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Molette inactive sur l'onglet affiché mais active sur un autre onglet après macro


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau membre du Club
    Homme Profil pro
    Ergonome
    Inscrit en
    Juillet 2019
    Messages
    7
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Calvados (Basse Normandie)

    Informations professionnelles :
    Activité : Ergonome

    Informations forums :
    Inscription : Juillet 2019
    Messages : 7
    Par défaut Molette inactive sur l'onglet affiché mais active sur un autre onglet après macro
    Bonjour,

    Je développe pour une société industrielle un fichier Excel dont le but principal est de collecter des infos sur les arrêts de la ligne de production.

    Pour saisir un arrêt:
    -Onglet "SAISIE"
    -Bouton "Saisir un arrêt"
    -Remplir l'Userform

    Nom : Capture123.PNG
Affichages : 470
Taille : 48,9 Ko

    -Ok

    ET LÀ, LE PROBLEME SE POSE :

    La macro affiche l'onglet concernant la date de saisie de l'arrêt mais la molette (entre autres) est active sur l'onglet "SAISIE".
    Pour palier à ça, il suffit de cliquer sur un autre onglet et de revenir sur l'onglet souhaité.
    Mes équipes étant réticentes à l'informatique, j'aimerai leurs simplifier la saisie au maximum et donc supprimer ce "bug" ou cette erreur ...

    Sauriez vous m'aider ?

    Merci beaucoup pour votre lecture.

    TileMaestro
    Fichiers attachés Fichiers attachés

  2. #2
    Invité
    Invité(e)
    Par défaut
    Citation Envoyé par TileMaestro Voir le message
    Bonjour,

    Ajoutez cet événement dans votre Userform :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
     
    Private Sub Dat_Change()
     
    Dim I As Integer
     
      For I = 1 To Sheets.Count
          If Sheets(I).Name = Val(Mid(Dat, 1, 2)) Then
             With Sheets(I)
                  .Activate
                  .Range("E4").Select
             End With
             Exit For
          End If
      Next I
     
    End Sub

  3. #3
    Nouveau membre du Club
    Homme Profil pro
    Ergonome
    Inscrit en
    Juillet 2019
    Messages
    7
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Calvados (Basse Normandie)

    Informations professionnelles :
    Activité : Ergonome

    Informations forums :
    Inscription : Juillet 2019
    Messages : 7
    Par défaut
    Bonjour,

    Tout d'abord, merci de votre réponse.

    J' ai collé le code dans mon Userform, mais malheureusement ça ne supprime pas mon problème ...


    Quelles sont vos pistes ? Avez vous une idée d'où ça peut venir ?

    Lors de mes recherches sur l'éradication de ce problème, la seule info que j'ai trouvée était que lorsqu'une macro sélectionnait ou activait plusieurs fois une sheet, ce bug apparaissait ... J'ai cherché à remédier à cela mais je n'ai malheureusement pas trouvé de doublon dans mon code.


    Merci de votre lecture.

    TileMaestro

  4. #4
    Invité
    Invité(e)
    Par défaut
    Citation Envoyé par TileMaestro Voir le message
    Qu'obtenez-vous avec ce fichier ?

  5. #5
    Nouveau membre du Club
    Homme Profil pro
    Ergonome
    Inscrit en
    Juillet 2019
    Messages
    7
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Calvados (Basse Normandie)

    Informations professionnelles :
    Activité : Ergonome

    Informations forums :
    Inscription : Juillet 2019
    Messages : 7
    Par défaut
    Exactement la même chose.

  6. #6
    Invité
    Invité(e)
    Par défaut
    Citation Envoyé par TileMaestro Voir le message
    Moi j'obtiens ça en choisissant le 4 juillet :
    Nb : Je suis sur Excel 10, 32 bits.
    Pièce jointe 491060

Discussions similaires

  1. [XL-2010] Boucle sur une plage déterminée par la cellule active et copie sur un autre onglet
    Par yanou91 dans le forum Macros et VBA Excel
    Réponses: 11
    Dernier message: 16/02/2016, 19h08
  2. [UI] Afficher boîte de dialog lors d'un click sur un autre onglet.
    Par loic20h28 dans le forum jQuery
    Réponses: 1
    Dernier message: 07/07/2015, 22h20
  3. [XL-2010] Copier colonne d'un onglet sur l'autre mais dans un ordre différent
    Par Bleue dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 13/03/2014, 19h14
  4. Réponses: 3
    Dernier message: 07/06/2007, 19h26
  5. Lancer un programme, mais sur une autre machine
    Par GOUGOU1 dans le forum Réseau
    Réponses: 12
    Dernier message: 08/12/2002, 20h36

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo