Macro Copie plage cellules sur autre feuille
cyr301
Messages postés
12
Statut
Membre
-
cyr301 Messages postés 12 Statut Membre -
cyr301 Messages postés 12 Statut Membre -
Bonjour,
Je possède un tableau Excel avec des cellules sommes en fin de tableau (cellules en D101 et de F101 à L101).
Je souhaiterai que la macro sélectionne ce deux plages de cellules et ne copie que les valeurs (pas la mise en forme) sur une autre feuille du classeur de C7 à J7.
Il faut savoir que les cellules somme de la première feuille ne sont pas fixes car je rajoute parfois des lignes par insertion dans mon tableau.
Pouvez-vous m'aider?
Merci d'avance.
Cyr301.
Je possède un tableau Excel avec des cellules sommes en fin de tableau (cellules en D101 et de F101 à L101).
Je souhaiterai que la macro sélectionne ce deux plages de cellules et ne copie que les valeurs (pas la mise en forme) sur une autre feuille du classeur de C7 à J7.
Il faut savoir que les cellules somme de la première feuille ne sont pas fixes car je rajoute parfois des lignes par insertion dans mon tableau.
Pouvez-vous m'aider?
Merci d'avance.
Cyr301.
A voir également:
- Macro Copie plage cellules sur autre feuille
- Copie cachée - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Super copie - Télécharger - Gestion de fichiers
- Copie écran samsung - Guide
- Copie disque dur - Guide
2 réponses
bonsoir
le plus simple est de donner un nom par exemple PlageSomme à la plage D101:F101
puis la macro
de cette façon, si tu inseres des lignes avant la ligne 101 PlageSomme suivra
bonne suite
le plus simple est de donner un nom par exemple PlageSomme à la plage D101:F101
puis la macro
Public Sub copie()
Dim k As Long
Sheets(2).Cells(7, 3).Value = Sheets(1).Range("PlageSomme").Cells(1, 1).Value
For k = 3 To 9
Sheets(2).Cells(7, 1 + k).Value = Sheets(1).Range("PlageSomme").Cells(1, k).Value
Next k
End Sub
de cette façon, si tu inseres des lignes avant la ligne 101 PlageSomme suivra
bonne suite
Bonjour,
Grâce à votre aide et à un petit peu de recherche personnelle, j'ai trouvé ce que je cherchais.
Voici le code:
Merci beaucoup.
Cyr301.
Grâce à votre aide et à un petit peu de recherche personnelle, j'ai trouvé ce que je cherchais.
Voici le code:
Sub Matin()
' Matin Macro
' Copie les valeurs nutritionnelles dans les repères du matin.
Sheets("Calories et nutriments").Select
Range("F65536").End(xlUp).Select
Range(ActiveCell, ActiveCell.Offset(0, 6)).Copy
Sheets("Repères Journée").Activate
Range("D2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Merci beaucoup.
Cyr301.
