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

[ Resolu ] Copier des cellules ( Cells / Range / Nom de plage ) en valeur ...

  • Initiateur de la discussion Initiateur de la discussion Garth69
  • 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 !

Garth69

XLDnaute Occasionnel
Bonjour @ tous !

Un truc bête, mais qui me pose problème en tant que "Total débutant" 😛 ...

Quelle lignes de commande saisir pour "Copier en valeur" des cellules, des plages de cellules, ou des Nom de plage[/B ( Sans que ceux ci soient ensuite réaffectés par les modifications apportées aux champs d'origine ... )

Ce genre de ligne ( Qui ne doit pas fonctionner en plus 🙁 ... ) :
Code:
Sheets("NomFeuille").Range.value("NomZone"  / Plage "Axx:Zxx").copy Sheets("NouvelleFeuille").Range("NouvelleZone"  /  NouvellePlage "Axx:Zxx")

Me pose toujours problème 🙁 ...

L'utilisation de l'enregistreur de Macro, me recrache de multiples lignes, que j'ai du mal à simplifier ( J'essaie d'être le plus "sobre" possible ds mon projet ... ).
Kk'un aurait en tête les 3 lignes à saisir pour ces 3 cas de figure ( Cells / Range / Nom de plage ) 😕 ?


( J'dois vraiment être une "bille" 😛 ... )
 
Dernière édition:
Re : Copier des cellules ( Cells / Range / Nom de plage ) en valeur ...

Bonjoyur Garth69,
Si j'ai bien compris:
Pour copier une plage vers une autre plage, en partant du principe que ces plages comportent le même nombre de celluiles:
VB:
Sub test()
Sheets("NouvelleFeuille").Range("NouvelleZone").Value = _
Sheets("NomFeuille").Range("NomZone").Value
End Sub
Pour copier par l'adresse des cellules:
VB:
Sub test2()
Sheets("NouvelleFeuille").Range("A1:A3").Value = _
Sheets("NomFeuille").Range("A1:A3").Value
End Sub
Cordialement

EDIT : J'avais oublié la version Cells
VB:
Sub test3()
Dim F1 As Worksheet, F2 As Worksheet
Set F1 = Sheets("NomFeuille")
Set F2 = Sheets("NouvelleFeuille")
F2.Range(F2.Cells(1, 1), F2.Cells(3, 1)).Value = _
F1.Range(F1.Cells(1, 1), F1.Cells(3, 1)).Value
End Sub
 
Dernière édition:
Re : Copier des cellules ( Cells / Range / Nom de plage ) en valeur ...

Merci Efgé

C'est bien ce que je recherchais comme information ( C' tait finalement si simple ... )



Et moi qui cherchais du "Copy / Paste" ... Pfff ... J'suis pas doué 😛 !
 
Dernière édition:
Re : Copier des cellules ( Cells / Range / Nom de plage ) en valeur ...

Bonjour Garth69,
Le "= _" est un retour à la ligne dans une ligne de code.
Est tu sûr qu'il ne se passe rien ou ne vois tu rien se passer ?
En allant sur la feuille2, tu retrouvera les données présentent sur la feuille1.
Si non, met un fichier exemple avec ce que tu veux faire.
Cordialement
EDIT Je pencherai donc pour la solution "ou ne vois tu rien se passer ?" 😉
 
Re : Copier des cellules ( Cells / Range / Nom de plage ) en valeur ...

C'est bon Efgé, je te remercie ...

Tes quelques lignes de code marchent bien, et ca me convient très bien ...
Je peux les exploiter et m'en resservir( Au départ c'est le saut de ligne qui m'induisait en erreur ... )
 
- 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

L
Réponses
35
Affichages
3 K
Léraud Florian
L
C
  • Question Question
Réponses
8
Affichages
1 K
clarouche33
C
B
Réponses
2
Affichages
771
bzhjenny
B
C
Réponses
2
Affichages
1 K
CHARPENTIER
C
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…