Discussion :

[tarantino]

Bonjour,

je sais que j'ai déjà vu la solution à mon probleme sur le forum mais je ne la retrouve plus.

j'ai une feuille avec X noms de matériaux. Je veux en ajouter un en X+1
Quel code VBA dois-je utiliser pour trouver X?

Merci beaucoup.

[chipster008]

Bonjour,

Je suis pas une pro mais perso je me sers de ce code et pour moi il marche.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Selection.Cut
Sheets("feuill1 ").Select
r = ActiveSheet.UsedRange.SpecialCells(xlLastCell).End(xlToLeft).Row + 1
Cells(r, 1).Select
ActiveSheet.Paste

[chyps]

Bonjour,
il existe plusieurs façons de faire, voici un exmple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
'iLig = ligne de début de ta liste
'iCol = Colonne correspondante à ta liste
 
While Cells(iLig, iCol).Value <> ""
    iLig = iLig + 1
Wend
iDerniereLigneRemplie = iLig - 1

[tarantino]

merci de vos réponses.

résolu