Microsoft 365 Incrémentation valeur cellule selon une variable

xls_62 · 3 Février 2022

Bonjour à tous,
Je recherche une formule ( ou macro) qui me permettra d'incrémenter la valeur cellules de ma colonne comme ci dessous :

Fichier en Pièce jointe.

Merci d'avance.

herve62 · 4 Février 2022

J'ai mis des chiffres pour exemple au PIF !! suffit de remettre tes chiffres et il ne peut pas y avoir d'erreur puisque c'est juste une copie de données des colonnes

herve62 · 5 Février 2022

Ben oui , mais quand on travaille avec un autre onglet il faut le préciser à chaque fois qu'on a affaire avec !!
donc pour ici :

VB:

Select Case V
Case 1
Range("B3:B" & dl1).Value = Sheets("variable").Range("D3:D" & dl1).Value
Case 2
Range("B3:B" & dl2).Value = Sheets("variable").Range("E3:E" & dl2).Value
Case 3
Range("B3:B" & dl3).Value = Sheets("variable").Range("F3:F" & dl3).Value
Case 4
Range("B3:B" & dl4).Value = Sheets("variable").Range("G3:G" & dl4).Value
End Select

xls_62 · 5 Février 2022

herve62 à dit:
Ben oui , mais quand on travaille avec un autre onglet il faut le préciser à chaque fois qu'on a affaire avec !!
donc pour ici :

VB:

Select Case V Case 1 Range("B3:B" & dl1).Value = Sheets("variable").Range("D3:D" & dl1).Value Case 2 Range("B3:B" & dl2).Value = Sheets("variable").Range("E3:E" & dl2).Value Case 3 Range("B3:B" & dl3).Value = Sheets("variable").Range("F3:F" & dl3).Value Case 4 Range("B3:B" & dl4).Value = Sheets("variable").Range("G3:G" & dl4).Value End Select

ooh oui vous avez bien raison, ça fonctionne parfait
Encore Merci beaucoup de votre patience et aide.

Microsoft 365 Incrémentation valeur cellule selon une variable

xls_62

XLDnaute Junior

Pièces jointes

herve62

herve62

XLDnaute Barbatruc

xls_62

XLDnaute Junior

Discussions similaires