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 :

Recopier des lignes en gardant le même emplacement


Sujet :

Macros et VBA Excel

  1. #1
    Futur Membre du Club
    Femme Profil pro
    Analyste
    Inscrit en
    Juillet 2017
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Loire Atlantique (Pays de la Loire)

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

    Informations forums :
    Inscription : Juillet 2017
    Messages : 8
    Points : 5
    Points
    5
    Par défaut Recopier des lignes en gardant le même emplacement
    Bonjour à tous,

    Je vous envoie de nouveau mon problème non résolu en espérant que vous puissiez m'aider !
    Je souhaite qu'à chaque fois qu'une personne ajoute un "x" (colonne a) de l'onglet "BASE DE SAISIE"du fichier joint, il s'affiche dans l'onglet "RESULTAT".
    Il faut absolument que les lignes dans l'onglet "RESULTAT" soient les mêmes que dans "BASE DE SAISIE"
    A titre d'exemple, je dois retrouver le produit A article a2 qui se trouve sur la ligne 4 de la "BASE DE SAISIE", sur la ligne 4 dans l'onglet "RESULTAT"etc
    Les autres lignes sans "x" sont vides (macro ou par formule Excel) et masqués.

    Merci beaucoup pour toute l'aide que vous pourrez m'apporter,
    en espérant vous lire très bientôt
    bonne soirée
    SC
    Fichiers attachés Fichiers attachés

  2. #2
    Membre actif
    Homme Profil pro
    Chargé d'affaire
    Inscrit en
    Avril 2022
    Messages
    141
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 36
    Localisation : Belgique

    Informations professionnelles :
    Activité : Chargé d'affaire
    Secteur : Finance

    Informations forums :
    Inscription : Avril 2022
    Messages : 141
    Points : 219
    Points
    219
    Par défaut
    Procédure 'à écrire dans l'événement "change" de la feuille "BASE DE SAISIE"

    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 Worksheet_SelectionChange(ByVal Target As Range)
     
        Dim r As Long
        Dim MyValue As Variant
        Dim myRng As String
     
        r = Target.Row - 1  'ceci suppose que lorsqu'on encode dans une cellule, la celluel suivante
                            'est sélectionnée dès que l'on fait "entrée".
                            'sinon, il faudra écrire "r = Target.Row "
        myRng = "A" & r & ":D" & r
     
        On Error Resume Next
        MyValue = Intersect(Range("a3:a9"), Range(myRng)).Address
        Sheets("RESULTAT").Range(MyValue) = Sheets("BASE DE SAISIE").Range(MyValue).Value
     
    End Sub

  3. #3
    Futur Membre du Club
    Femme Profil pro
    Analyste
    Inscrit en
    Juillet 2017
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Loire Atlantique (Pays de la Loire)

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

    Informations forums :
    Inscription : Juillet 2017
    Messages : 8
    Points : 5
    Points
    5
    Par défaut
    Un grand merci pour ce retour rapide
    Je suis novice en VBA. Que dois-je mettre avant la ligne 1 pour voir apparaitre la macro dans le fichier ?

  4. #4
    Futur Membre du Club
    Femme Profil pro
    Analyste
    Inscrit en
    Juillet 2017
    Messages
    8
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Loire Atlantique (Pays de la Loire)

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

    Informations forums :
    Inscription : Juillet 2017
    Messages : 8
    Points : 5
    Points
    5
    Par défaut
    C'est tout bon
    Merci beaucoup !

Discussions similaires

  1. [XL-2007] Macro pour fusionner des ligne en gardant la valeur supérieure
    Par michaeldms dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 01/09/2011, 13h15
  2. [XL-2003] Recopier des lignes après un tri
    Par JulienLeno dans le forum Excel
    Réponses: 20
    Dernier message: 10/08/2011, 14h17
  3. Réponses: 4
    Dernier message: 13/06/2011, 17h41
  4. Recopier des lignes en fonction d'un critère
    Par NEC14 dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 21/09/2009, 08h17
  5. [XL-2003] supprimer des lignes qui ont les même valeurs
    Par Neptune64 dans le forum Excel
    Réponses: 1
    Dernier message: 09/08/2009, 00h30

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