Recopier formule et valeur
dudulleray
-
lermite222 Messages postés 8724 Date d'inscription Statut Contributeur Dernière intervention -
lermite222 Messages postés 8724 Date d'inscription Statut Contributeur Dernière intervention -
Bonsoir a toutes et tous, forum bonsoir
excel 2007 VBA
Je souhaiterai effectuer copier des valeurs et des formules dans une autre plage
ci-joint lien pour petit programme exemple avec explications simples
Lien ci dessous
http://cjoint.com/?0JbsPMh8Ji4
Merci a vous pour votre aide
Bonne soirée a tous
Cordialement Ray
excel 2007 VBA
Je souhaiterai effectuer copier des valeurs et des formules dans une autre plage
ci-joint lien pour petit programme exemple avec explications simples
Lien ci dessous
http://cjoint.com/?0JbsPMh8Ji4
Merci a vous pour votre aide
Bonne soirée a tous
Cordialement Ray
A voir également:
- Recopier formule et valeur
- Formule si et - Guide
- Formule moyenne excel plusieurs colonnes - Guide
- Formule mathématique - Télécharger - Études & Formations
- Formule somme excel colonne - Guide
- Excel mise en forme conditionnelle formule - Guide
4 réponses
Bonjour,
Tu ne sais pas qu'il y a un éditeur de macros dans Ex ?
Ruban <Développeur> => Enregistrer une macro.
Ensuite tu exécute ce qu'il y a à faire.
1°) Sélectionner F10:F17 et copier -> Sélectionner G10 et copiage spécial valeur.
2°) Sélectionner D10:E17 et taper delete.
=>Arrêter la maco
Dans un module VBA tu aura le code.
Si tu ne veux pas de zéro ça se passe dans les paramètres de la feuille.
A+
Tu ne sais pas qu'il y a un éditeur de macros dans Ex ?
Ruban <Développeur> => Enregistrer une macro.
Ensuite tu exécute ce qu'il y a à faire.
1°) Sélectionner F10:F17 et copier -> Sélectionner G10 et copiage spécial valeur.
2°) Sélectionner D10:E17 et taper delete.
=>Arrêter la maco
Dans un module VBA tu aura le code.
Si tu ne veux pas de zéro ça se passe dans les paramètres de la feuille.
A+
Re,
Te fournir un code "tout cuit" ne t'aidera pas a avancer.
Poste déjà le code que tu a "pondu" avec l'éditeur de macros.
A+
Te fournir un code "tout cuit" ne t'aidera pas a avancer.
Poste déjà le code que tu a "pondu" avec l'éditeur de macros.
A+
Salut lermitte222
merci pour ta réponse
"Te fournir un code "tout cuit" ne t'aidera pas a avancer"
si tu savais le temps que je passe a programmer mais mes neurones de 61 ans
commencent a ramer aussi LOL
Ce que j'aimerai bien arriver a faire
(1) copier des formules sans effacer la valeur
(2) copier des valeurs sans effacer les formules
(3) copier des valeurs et les formules
voila mon but car a chaque fois que j'ai besoin je cherche comment faire
bonne soirée a toi et merci pour ton aide
Cordialement Raymond
Sub Macro2()
Range("F10:F17").Select
Selection.Copy
Range("G10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("D10:D17").Select
Application.CutCopyMode = False
Selection.ClearContents
Range("I22").Select
End Sub
merci pour ta réponse
"Te fournir un code "tout cuit" ne t'aidera pas a avancer"
si tu savais le temps que je passe a programmer mais mes neurones de 61 ans
commencent a ramer aussi LOL
Ce que j'aimerai bien arriver a faire
(1) copier des formules sans effacer la valeur
(2) copier des valeurs sans effacer les formules
(3) copier des valeurs et les formules
voila mon but car a chaque fois que j'ai besoin je cherche comment faire
bonne soirée a toi et merci pour ton aide
Cordialement Raymond
Sub Macro2()
Range("F10:F17").Select
Selection.Copy
Range("G10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("D10:D17").Select
Application.CutCopyMode = False
Selection.ClearContents
Range("I22").Select
End Sub
Beh voila... tu y est presque sauf que..
tu à sélectionné Range("D10:D17").Select pour effacer mais de ce fait tu n'efface qu'une partie des données, changer par Range("D10:E17").Select
et ça fonctionnera comme tu veux.
Oublie pas de modifier l'affichage des 0 dans les paramètres de la feuille.
Et 61 n'est pas une excuse.. un peu de volonté aide aussi, voir mon profil :-)
A+
tu à sélectionné Range("D10:D17").Select pour effacer mais de ce fait tu n'efface qu'une partie des données, changer par Range("D10:E17").Select
et ça fonctionnera comme tu veux.
Oublie pas de modifier l'affichage des 0 dans les paramètres de la feuille.
Et 61 n'est pas une excuse.. un peu de volonté aide aussi, voir mon profil :-)
A+
Oui tu as raison, je sais bien pour l'éditeur de macros.
j'ai fait pas mal d'essais et a vrai dire, je ne sais pas comment exposer le probleme
dont je souhaiterai avoir un code.
je ne sais pas quoi écrire pour faire comprendre a l'éditeur ce que je veux.
La, j'ai suivi pas a pas tes conseils, un peu merdouiller mais réussi quelque chose.
je vais peaufiner ca, une impression cependant je pense que l'éditeur balance des codes un peu
tordus c'est moi qui dit ca.
je n'ai pas résolu mon problème, alors je retourne voir ca.
Merci pour ton aide et pour le pas a pas.
Bonne journée a toi
Cordialement Ray