pandaexcel
XLDnaute Nouveau
bonjour, je cherche une macro permettant en A1 d'inputer
la valeur max (a2:a2000) + 1
une idée ?
la valeur max (a2:a2000) + 1
une idée ?
bonjour, je cherche une macro permettant en A1 d'inputer
la valeur max (a2:a2000) + 1
une idée ?
sub cartman
for i = 2 to 2000
if max < cells(i,1) then
max = cells(i,1)
endif
next i
cells(1,1) = max+1
end sub
Range("A1").Value = WorksheetFunction.Max(Range("A2:A" & Range("A65536").End(xlUp).Row)) + 1
Pourquoi une macro alors qu'une formule suffit ?
[edit]
Bon ben de toute façon j'arrive encore trop tard puisque le problème est résolu.
Bonne soirée.
[/edit]