Etendre formules plage variable vba
Valkiwi
Messages postés
2
Statut
Membre
-
cs_Le Pivert Messages postés 8437 Statut Contributeur -
cs_Le Pivert Messages postés 8437 Statut Contributeur -
Bonjour,
Je souhaiterais obtenir de l’aide pour un code VBA qui me permettrait de :
Etendre les formules sur une plage jusqu’à la dernière ligne de mon tableau.
Mon souci est que la ligne de début est une variable et la ligne de fin est une variable.
Je ne peux donc pas utiliser le type de code ci-dessous car tous mes indices sont des variables :
Exemple de mon fichier : Il y a des formules dans les colonnes T/U/V/W/X/Y/Z et je souhaiterais étendre ces formules vers le bas jusqu’à la dernière ligne de la colonne S.

Pourriez-vous m’aider svp ?
Je vous remercie par avance !
Je souhaiterais obtenir de l’aide pour un code VBA qui me permettrait de :
Etendre les formules sur une plage jusqu’à la dernière ligne de mon tableau.
Mon souci est que la ligne de début est une variable et la ligne de fin est une variable.
Je ne peux donc pas utiliser le type de code ci-dessous car tous mes indices sont des variables :
Dim DernLigne As Long
DernLigne = Range("S" & Rows.Count).End(xlUp).Row
Range("T6").AutoFill Destination:=Range("T6:Z" & DernLigne)
Exemple de mon fichier : Il y a des formules dans les colonnes T/U/V/W/X/Y/Z et je souhaiterais étendre ces formules vers le bas jusqu’à la dernière ligne de la colonne S.

Pourriez-vous m’aider svp ?
Je vous remercie par avance !
A voir également:
- Etendre formules plage variable vba
- Etendre ecran pc - Guide
- Formules - Télécharger - Études & Formations
- Image manchot plage pix - Forum Graphisme
- Formules excel de base - Guide
- Image plage pix ✓ - Forum Google Chrome
4 réponses
Bonjour,
Tout simplement sélectionner la plage "$T$2:$Z$2" puis tirer la plage jusqu'à la fin de votre plage de données. Se qui va prendre moins de 60 secondes
Tout simplement sélectionner la plage "$T$2:$Z$2" puis tirer la plage jusqu'à la fin de votre plage de données. Se qui va prendre moins de 60 secondes
Aha excellente réponse Le Pingou :)
Ma question était de le faire en VBA. (comme précisé au 1er message).
C'est surement ce que je finirai par faire si je ne trouve pas de code.
Ma question était de le faire en VBA. (comme précisé au 1er message).
C'est surement ce que je finirai par faire si je ne trouve pas de code.
Bonjour,
essaie ceci:
et cela
https://forum.excel-pratique.com/excel/etendre-formules-plage-variable-vba-148640
essaie ceci:
Option Explicit
Sub ExtensionFormule()
Dim DernLigne As Long
With Worksheets("Feuil1") 'adapter feuille
.Range("T6").FormulaR1C1 = "=TEXT(RC[-1],""mmm"")" ' adapter la formule
DernLigne = .Range("S" & .Rows.Count).End(xlUp).Row
.Range("T6").AutoFill Destination:=.Range("T6:Z6"), Type:=xlFillDefault
.Range("T6:Z6").AutoFill Destination:=.Range("T6:Z" & DernLigne), Type:=xlFillDefault
End With
End Sub
et cela
https://forum.excel-pratique.com/excel/etendre-formules-plage-variable-vba-148640