Bonjour?
J'ai un code et j'aimerais bien qu'il s’exécute jusqu'au bas de mon tableau (prenant pour référence la fin de la colonne A)
Mais je ne sait pas comment faire j'ai lu la formule sur internet " end(xldown)"
Mais je ne sait pas du tout comment l'utiliser.
Voici mon code:
ET
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Sub Avec_NomPrenom_V2() Range("N2").FormulaLocal = "=RECHERCHEV(A2;WW!A:M;2;FAUX)" Range("N2").AutoFill Range("N2:N2652") Range("O2").FormulaLocal = "=RECHERCHEV(A2;WW!A:M;1;FAUX)" Range("O2").AutoFill Range("O2:O2652") End Sub
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Sub Si() Range("K2").FormulaLocal = "=SI(J2=""A-1"";""A 1 "";SI(J2=""A-2"";""A 2 "";SI(J2=""A-3"";""A 3 "";SI(J2=""B-1"";""B 1 "";SI(J2=""B-2"";""B 2 "";SI(J2=""B-3"";""B 3 "";SI(J2=""C-1"";""C 1 "";SI(J2=""C-2"";""C 2 "";SI(J2=""C-3"";""C 3 "";SI(J2=""D-1"";""D 1 "";SI(J2=""D-2"";""D 2 "";SI(J2=""D-3"";""D 3 "";SI(J2=""E-1"";""E 1 "";SI(J2=""E-2"";""E 2 "";J2))))))))))))))" Range("K2").AutoFill Range("K2:K2652") End Sub
Partager