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 :

Aide Macro Copier /Coller si on sélectionne sur une valeur


Sujet :

Macros et VBA Excel

  1. #1
    Nouveau Candidat au Club
    Femme Profil pro
    Conseil en assistance à maîtrise d'ouvrage
    Inscrit en
    mars 2021
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Conseil en assistance à maîtrise d'ouvrage

    Informations forums :
    Inscription : mars 2021
    Messages : 2
    Points : 1
    Points
    1
    Par défaut Aide Macro Copier /Coller si on sélectionne sur une valeur
    Bonjour à tous,

    J'aurais besoin d'aide pour mettre en place une macro sur mon fichier.. mes compétences ne sont pas suffisantes, j'arrive juste à sélectionner les cellules souhaitées et les recopier à un endroit.

    Dans le fichier joint,sur mon onglet "Stat PE", à chaque fois que je renseigne une ligne et que je choisis en colonne I dans ma liste de valeur "RN". je voudrais que les informations des cellules C, D, E et F de la ligne en question se recopie dans l'onglet "Candidats à inviter en SR" en cellule C mais il faut que les cellules A et B de chacune des deux feuilles sont identiques et que la cellule C soit vide.

    Un grand merci pour votre aide.

    Suivi PE..xlsx

    Amanda

  2. #2
    Nouveau membre du Club
    Homme Profil pro
    Ingénieur Méthodes Industrialisation
    Inscrit en
    octobre 2020
    Messages
    28
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 28
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Ingénieur Méthodes Industrialisation
    Secteur : Industrie

    Informations forums :
    Inscription : octobre 2020
    Messages : 28
    Points : 39
    Points
    39
    Par défaut
    Bonjour à toi,


    Je ne suis pas sûr d'avoir compris toutes les subtilité de ton sujet, mais je vais te donner un début de solution.

    - Quand tu dis colonne C vide, tu parle bien de la feuille Candidats ... ? (si oui alors c'est ok)
    - Tu ne testes pas si ton candidat une croix en C avant de copier ? (Pas dit, pas mis)
    - Je me suis contenté d'un simple copié/coller, donc attention à la mise en page qui suis. Ca écrase les couleurs déjà présente dans les cellules réception.

    Une amélioration à faire est aussi la limit supérieur de i. J'ai mis jusqu'à 2000 mais il faudrait aller chercher la dernière ligne avec les colonne A et B de remplit

    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
    17
    18
    19
    20
    21
    22
    23
     
    Private Sub Worksheet_Change(ByVal Target As Range)
     
        If Not Application.Intersect(Target, Range("I:I")) Is Nothing And Target.Text Like "*RN" Then
            Col1 = Cells(Target.Row, 1)
            Col2 = Cells(Target.Row, 2)
            Sol = 0
            Feuille = "Candidats à inviter en SR"
            For i = 3 To 2000
                If Sheets(Feuille).Cells(i, 1) = Col1 And Sheets(Feuille).Cells(i, 2) = Col2 And Sheets(Feuille).Cells(i, 3) = "" Then
                    LigneC = i
                    Sol = 1
                    Exit For
                End If
            Next i
     
            If Sol = 1 Then
                Sheets("Stat PE").Range(Cells(Target.Row, 3), Cells(Target.Row, 6)).Copy Sheets(Feuille).Cells(i, 3)
            Else
                Msg = MsgBox("Pas de possiblité trouvé", , "Erreur")
            End If
        End If
    End Sub
    Cordialement,
    Zeabon

  3. #3
    Nouveau Candidat au Club
    Femme Profil pro
    Conseil en assistance à maîtrise d'ouvrage
    Inscrit en
    mars 2021
    Messages
    2
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Conseil en assistance à maîtrise d'ouvrage

    Informations forums :
    Inscription : mars 2021
    Messages : 2
    Points : 1
    Points
    1
    Par défaut
    Merci Zeabon !! Je vais regarder ca attentivement !

Discussions similaires

  1. [XL-2016] Copier/coller ligne en fonction d'une valeur
    Par Franck76Dav dans le forum Macros et VBA Excel
    Réponses: 7
    Dernier message: 30/01/2019, 09h50
  2. [Toutes versions] Demande d'aide macro copier coller catégories
    Par audreyportiere dans le forum Macros et VBA Excel
    Réponses: 17
    Dernier message: 02/11/2018, 13h58
  3. Réponses: 1
    Dernier message: 18/08/2017, 12h49
  4. Macro copier/coller des dates identiques d'une feuille à une autre
    Par bienreveille dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 31/08/2014, 21h44
  5. [XL-2007] aide macro copier coller
    Par young 25 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 24/03/2012, 16h37

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