Copier / Coller la valeur uniquement Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Répondre
A
Ahah
Jeune membre
Jeune membre
Messages : 20
Inscrit le : 5 décembre 2017
Version d'Excel : 2010 FR

Message par Ahah » 15 janvier 2018, 12:17

Bonjour,

Dans le fichier ci-joint, lorsque la colonne G indique "Archiver" et qu'on clique sur le bouton "Archivage", l'ensemble de la fiche est copié puis collé dans la dernière feuille : "archivage".

J'aimerai modifié le code de la macro archivage, afin que les cellules ne soient pas liées à des formules mais que leurs valeurs soient figées.
Je m'explique : Si dans le fichier joint vous cliquez sur "Archivage", la fiche produit du code 21536 va se retrouver dans la feuille archivage, sauf que la date située en colonne F va continuer d'évoluer avec la fonction : "Aujourdhui". Je voudrais garder uniquement la valeur (type collage spécial : 123) qui est "21/03/2018".

Merci de votre aide,

Guillaume
VBA Copier - Coller valeur uniquement.xlsm
(902.89 Kio) Téléchargé 5 fois
M
MFerrand
Fanatique d'Excel
Fanatique d'Excel
Messages : 17'171
Appréciations reçues : 448
Inscrit le : 20 juillet 2015
Version d'Excel : 2010 FR

Message par MFerrand » 15 janvier 2018, 13:24

Bonjour,

Tes macros seraient concentrées dans un seul module on ne perdrait pas de temps à les chercher, multiplier les modules ne fait que générer de la dispersion et fait perdre un temps considérable sans aucun profit. Désolé mais je n'ai pas temps de m'amuser à aller débusquer tes macros. :)
A
Ahah
Jeune membre
Jeune membre
Messages : 20
Inscrit le : 5 décembre 2017
Version d'Excel : 2010 FR

Message par Ahah » 15 janvier 2018, 14:27

Bonjour,

J'ai rassemblé les macros dans le Module 2, la macro concernée a le nom "Sub Archive_GVS()".

Merci de votre aide,

Guillaume
VBA Copier - Coller valeur uniquement v1.xlsm
(900.49 Kio) Téléchargé 7 fois
M
MFerrand
Fanatique d'Excel
Fanatique d'Excel
Messages : 17'171
Appréciations reçues : 448
Inscrit le : 20 juillet 2015
Version d'Excel : 2010 FR

Message par MFerrand » 16 janvier 2018, 00:29

Bonsoir,

Tu essaies ceci, à intercaler après ton collage :
            oRange.Cut oSheetOUT.Cells(lRowArchivage, 1) 'On Copie/Colle
            With oSheetOUT.Cells(lRowArchivage, 1).Resize(cNbRows, cLastCol)
                .Value = .Value
            End With
Cordialement.
ahah_VBA Copier - Coller valeur uniquement v1.xlsm
(778.21 Kio) Téléchargé 11 fois
A
Ahah
Jeune membre
Jeune membre
Messages : 20
Inscrit le : 5 décembre 2017
Version d'Excel : 2010 FR

Message par Ahah » 16 janvier 2018, 08:56

Bonjour MFerrand,

J'ai essayé et ça fonctionne! EFFICACE!

Je vous remercie pour votre aide!

Bonne journée,

Guillaume
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message