Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Passage de variable

Passage de variable

2 réponses
Avatar
Brat'ac
Bonsoir,

Sur les deux lignes de code suivantes je galère dur pour faire passer
la variable
DernLigne à la place de D3:D200

DernLigne = Range("D" & Rows.Count).End(xlUp).Row
ActiveCell.FormulaLocal = "=SOMME_SI_COULEUR(Relevés! D3:D200
;Relevés!E7) *-1"


Merci de l'aide
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
isabelle
bonjour Brat'ac,
DernLigne = Range("D" & Rows.Count).End(xlUp).Row
ActiveCell.FormulaLocal = "=SOMME_SI_COULEUR(Relevés! D3:D" & DernLigne &
";Relevés!E7) *-1"
isabelle
Le 2017-03-15 à 15:10, Brat'ac a écrit :
Bonsoir,
Sur les deux lignes de code suivantes je galère dur pour faire passer la variable
DernLigne à la place de D3:D200
DernLigne = Range("D" & Rows.Count).End(xlUp).Row
ActiveCell.FormulaLocal = "=SOMME_SI_COULEUR(Relevés! D3:D200 ;Relevés!E7) *-1"
Merci de l'aide
Avatar
Brat'ac
isabelle a couché sur son écran :
Bonjour,
Merci Isabelle c'est parfait.
bonjour Brat'ac,
DernLigne = Range("D" & Rows.Count).End(xlUp).Row
ActiveCell.FormulaLocal = "=SOMME_SI_COULEUR(Relevés! D3:D" & DernLigne &
";Relevés!E7) *-1"
isabelle