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 :

Positionnement sur une cellule [XL-2016]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de Vba14
    Homme Profil pro
    Retraité
    Inscrit en
    Janvier 2019
    Messages
    440
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 64
    Localisation : France, Calvados (Basse Normandie)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Janvier 2019
    Messages : 440
    Par défaut Positionnement sur une cellule
    Bonjour à toutes et à tous,

    Je bug sur un petit soucis que je n'arrive pas à régler. Dans le code suivant, certaines lignes de ma feuille de calcul sont visibles et d'autres non.
    Lorsque je clique sur le bouton pour sélectionner la zone qui doit rester afficher, je me retrouve systématiquement à la dernière ligne de cette zone (ici 1662) alors que je souhaite être positionné sur la première à partir de A13.

    Pouvez-vous m'apporter votre éclairage s'il vous plait ?
    Je vous en remercie par avance

    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
     
    Private Sub Cmb1_Click()
    'Procédure pour accéder aux archives conservées à la Direction des Bâtiments (Zone JAUNE)
    Application.ScreenUpdating = False
     
    'Les lignes 1 à 13 et 14 à 1662 sont visibles, les autres sont cachées
        UsedRange.Rows.Hidden = True
            Rows("1:13").Hidden = False
            Rows("14:1662").Hidden = False
     
    'On se place sur la cellule A13
        Range("A13").Select
     
    Application.ScreenUpdating = True
    End Sub
    Pour être plus précis, le curseur pointe bien en A13 mais je suis obligé d'utiliser le scrollbar pour remonter à la première ligne de ma sélection. J'aimerai que ça soit automatique.

  2. #2
    Membre éclairé Avatar de Vba14
    Homme Profil pro
    Retraité
    Inscrit en
    Janvier 2019
    Messages
    440
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 64
    Localisation : France, Calvados (Basse Normandie)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Janvier 2019
    Messages : 440
    Par défaut
    J'ai trouvé la solution, j'ai tout simplement figé les volets sur la ligne 13 et ça fonctionne.
    Problème résolu.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2010] Se positionner sur une cellule spécifique à la sortie d'une autre cellule
    Par ToFind dans le forum Macros et VBA Excel
    Réponses: 13
    Dernier message: 14/09/2011, 13h24
  2. se positionner sur une cellule definie a l avance
    Par jgidet dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 21/10/2009, 06h16
  3. Se positionner sur une cellule
    Par lilp1 dans le forum Macros et VBA Excel
    Réponses: 15
    Dernier message: 04/06/2009, 16h54
  4. Positionnement sur une Cellule DGV et effet ombre de Form
    Par bellak dans le forum Windows Forms
    Réponses: 7
    Dernier message: 15/12/2008, 11h46
  5. se positionner sur une cellule
    Par titemireille dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 28/01/2008, 19h07

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