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 :

Comment Récuperer et modifier la zone d'une plage nommée ? [Toutes versions]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    88
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 88
    Par défaut Comment Récuperer et modifier la zone d'une plage nommée ?
    Bonjour,
    Je cherche, sans succès pour le moment, à modifier les références d'une plage nommée.

    Une zone variable nommée "Salariés" retourne par exemple comme zone d'adresse $A$3:$E$10.

    Je voudrais que quelque soit la zone retournée par ce nom, arriver à retirer systématiquement 1 ligne en haut et 1 ligne en bas pour ne trier que la zone $A$4:$E$9.

    Merci de votre aide !

  2. #2
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    13 171
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 13 171
    Billets dans le blog
    53
    Par défaut
    Bonjour,
    En partant du fait que "maPlage" est le nom de la plage nommée et Rng est la variable objet représente sa zone courante
    La ligne de code pour redéfinir une plage nommée existante
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ThisWorkbook.Names("maPlage").RefersTo = "=" & Rng.Address(External:=True)
    Le code pour redimensionné cette plage (Rng) en prenant la ligne suivante et l'avant-dernière dernière est (Code à placer bien entendu avant de redimensionné la plage nommée)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    With Rng
      Set Rng = .Offset(1).Resize(.Rows.Count - 2)
    End With
    Philippe Tulliez
    Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)
    Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer sur et si celle-ci est pertinente pensez à voter
    Mes tutoriels : Utilisation de l'assistant « Insertion de fonction », Les filtres avancés ou élaborés dans Excel
    Mon dernier billet : Utilisation de la fonction Dir en VBA pour vérifier l'existence d'un fichier

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    88
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 88
    Par défaut
    Citation Envoyé par Philippe Tulliez Voir le message
    Bonjour,
    En partant du fait que "maPlage" est le nom de la plage nommée et Rng est la variable objet représente sa zone courante
    La ligne de code pour redéfinir une plage nommée existante
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ThisWorkbook.Names("maPlage").RefersTo = "=" & Rng.Address(External:=True)
    Le code pour redimensionné cette plage (Rng) en prenant la ligne suivante et l'avant-dernière dernière est (Code à placer bien entendu avant de redimensionné la plage nommée)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    With Rng
      Set Rng = .Offset(1).Resize(.Rows.Count - 2)
    End With
    Merci pour cette ligne de code qui correspond exactement à ce que je recherchais.

  4. #4
    Membre Expert Avatar de mfoxy
    Homme Profil pro
    Automation VBA
    Inscrit en
    Février 2018
    Messages
    752
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 38
    Localisation : Belgique

    Informations professionnelles :
    Activité : Automation VBA
    Secteur : High Tech - Opérateur de télécommunications

    Informations forums :
    Inscription : Février 2018
    Messages : 752
    Par défaut
    Hello,

    Il vous serait profitable de passer de range nommé à un tableau Structuré, vous pourriez ainsi plus aisément ne pas effectué de tris sur votre ligne de Total et Entête, avec les avantages lié aux listobject notamment celui de ne pas se soucier de la taille du tableau.

    Un petit tuto sur le sujet : Fauconnier Pierre : tableaux structurés/
    Un petit exemple de procédure de tris : Fauconnier Pierre : Sub Table_Sort

    Bien à vous,

  5. #5
    Membre confirmé
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    88
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 88
    Par défaut
    Citation Envoyé par mfoxy Voir le message
    Hello,

    Il vous serait profitable de passer de range nommé à un tableau Structuré, vous pourriez ainsi plus aisément ne pas effectué de tris sur votre ligne de Total et Entête, avec les avantages lié aux listobject notamment celui de ne pas se soucier de la taille du tableau.

    Un petit tuto sur le sujet : Fauconnier Pierre : tableaux structurés/
    Un petit exemple de procédure de tris : Fauconnier Pierre : Sub Table_Sort

    Bien à vous,
    Très intéressant. Je ne connaissais pas les tableaux Structurés mais à la lecture des explications données par Pierre Fauconnier je crois que je vais être obligé de m'y mettre. Ça semble effectivement très puissant et cela m'aurait évité bien des lignes de code et beaucoup de déboires. Merci pour ces informations.

  6. #6
    Membre Expert Avatar de mfoxy
    Homme Profil pro
    Automation VBA
    Inscrit en
    Février 2018
    Messages
    752
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 38
    Localisation : Belgique

    Informations professionnelles :
    Activité : Automation VBA
    Secteur : High Tech - Opérateur de télécommunications

    Informations forums :
    Inscription : Février 2018
    Messages : 752
    Par défaut
    Hello bartez63,

    Content d'avoir pu te diriger vers de nouvelles connaissances, tu vas voir après y avoir gouté impossible de ne pas y adhérer :-)

    Bonne journée,

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

Discussions similaires

  1. Réponses: 11
    Dernier message: 03/08/2010, 17h19
  2. Réponses: 2
    Dernier message: 06/10/2009, 13h13
  3. comment voir et modifier les membres d'une structure ?
    Par dva2tlse dans le forum Débuter
    Réponses: 12
    Dernier message: 22/11/2008, 14h07
  4. Réponses: 2
    Dernier message: 15/04/2008, 22h14
  5. Comment modifier la valeur d'une plage de cellule
    Par shako6 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 12/03/2008, 19h12

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