Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro pour collage spécial valeur [RESOLU]

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion mecdu01
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
M

mecdu01

XLDnaute Nouveau
Bonjour,

J'ai besoin de votre aide sur un fichier excel.

J'ai 5 colonnes (A, B, C, D, E) dans mon fichier.

Les colonnes A, B, C = les colonnes où sont renseigné les données
La colonne D fait la concaténation des données A, B, C.

Je souhaite copier les formules de concaténation (cellule D) et les coller en "collage spécial / valeurs" dans la cellule E

J'arrive à faire cela manuellement.

MAIS ce que je souhaite, c'est que le "copier" de la cellule Dxx puis le "collage spécial / valeurs" dans la cellule Exx soit fait automatiquement.
Il faudrait que la macro se déclenche quand la cellule Cxx est supérieur à "a".

J'espère avoir bien résumé mon problème, pour que vous compreniez ce que je souhaite.

Je vous remercie par avance de vos réponses, en ayant bien consciense du temps que cela peut vous prendre.

Je vous joint mon fichier dans ce message.

PS IMPORTANT !!! J'ai une version Excel 2003 ANGLAIS, mais je peut me débrouiller pour transformer moi-même les fonctions sous le format anglais.
 

Pièces jointes

Dernière édition:
Trier par date Trier par votes
Re : Macro pour collage spécial valeur

Bonjour,

supérieure à "a" cela veut dire quoi ? pour moi une valeur est inférieure ou supérieure à une autre si elle est numérique...

bon après midi
@+
 
Vote positif 0 Vote négatif
Re : Macro pour collage spécial valeur

Re,

un exemple à adapter qui teste du numérique..
Code: 
Dim i As Integer
For i = 35 To 55
    If Cells(i, 2).Value > 10 Then Cells(i, 5).Value = Cells(i, 4).Value
Next i
 
Vote positif 0 Vote négatif
Re : Macro pour collage spécial valeur (EDIT)

En faite c'est une cellule où j'ai du texte dedans, mais elle est en format "général". Enfin dés que la cellule est rempli, il faudrait que ca execute la macro.
 
Vote positif 0 Vote négatif
Re : Macro pour collage spécial valeur (EDIT)

Merci Pierrot93 pour ton exemple, il fonctionne. Par contre il faut que je "run" la macro pour chaque ligne.
Est-ce possible d'automatiser le déclenchement de cette macro ?
 
Vote positif 0 Vote négatif
Re : Macro pour collage spécial valeur (EDIT)

Bonjour le fil 🙂,
A mettre dans le module de la feuille
Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Target.Offset(0, 2).Value = Target.Offset(0, 1).Text
End If
End Sub
Bonne journée 😎
 
Vote positif 0 Vote négatif
Re : Macro pour collage spécial valeur [RESOLU]

Re,

une autre proposition qui évite la concaténation par formule, est faite dans le code :
Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 2 Or Target.Count > 1 Then Exit Sub
Application.EnableEvents = False
If Not IsEmpty(Target) Then Target.Offset(0, 4).Value = "SMP_" & Target.Offset(0, 2).Value & "_" & _
        Target.Offset(0, 1).Value & "_" & Target.Offset(0, 3).Value
Application.EnableEvents = True
End Sub
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Résolu(e)
Autres Collage spécial. Ajout d'une courbe sur un graphique existant.
Réponses
7
Affichages
128
CISCO
D
  • Question Question
Microsoft 365 Problème Option de Collage
Réponses
10
Affichages
375
duduche62
D
  • Question Question
XL 2021 Copier coller qui ajoute une référence absolu Toute seule
2
Réponses
22
Affichages
181
TooFatBoy
  • Résolu(e)
Microsoft 365 Transposé des nombres
2 3 4
Réponses
48
Affichages
837
Electron24
  • Résolu(e)
XL 2016 « Ctrl » s'affiche lors d'un collage spécial (en l'occurrence de Commentaires)
Réponses
2
Affichages
178
lfacq34
I
  • Question Question
Microsoft 365 Atteindre la première case vide après collage
Réponses
5
Affichages
126
job75
J
  • Résolu(e)
Microsoft 365 lettre suivante
Réponses
5
Affichages
472
sylvanu
E
  • Question Question
XL 2016 Formule MFC
Réponses
7
Affichages
116
excelnoober
E
D
  • Question Question
Microsoft 365 Récupérer une valeur présente dans un autre fichier dont le chemin et le nom est présent dans une cellule
Réponses
6
Affichages
177
wDog66
P
  • Résolu(e)
Microsoft 365 activer macro après collage
Réponses
6
Affichages
91
pat66
P
U
  • Question Question
Autres [RÉSOLU] Compléter la macro mais comment et où?
Réponses
2
Affichages
248
un internaute
U
C
  • Résolu(e)
XL 2010 Collage valeur dans formulaire avec Userform
Réponses
4
Affichages
232
ChTi160
U
  • Question Question
Autres Je vais tenter d'expliquer ce que je veux
Réponses
11
Affichages
301
un internaute
U
L
  • Résolu(e)
XL 2016 macro pour parcourir les lignes d'une colonne et a chaque changement extraire les donnees specifiques des colonnes adjacentes
Réponses
6
Affichages
175
Dranreb
M
  • Résolu(e)
XL 2016 changement de formule
Réponses
2
Affichages
87
marc94600
M
  • Résolu(e)
XL 2021 tri par lignes
2
Réponses
19
Affichages
253
rastafouette
A
  • Question Question
XL 2016 Mise en forme conditionnelle et valeur égale à 0...
Réponses
5
Affichages
173
sylvanu
A
  • Résolu(e)
XL 2019 Macro Excel recherche par occurrence Macro déjà créer juste modifications
2
Réponses
25
Affichages
360
Aeroberto0099bis
A
B
  • Question Question
Microsoft 365 RESOLU Message d'erreur "La méthode 'range' de l'objet '_global ' a échoué "
2
Réponses
16
Affichages
431
job75
  • Résolu(e)
XL 2019 Problème de Tri de nombres avec des points
2 3
Réponses
40
Affichages
974
patricktoulon
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…