a1:a65000 hücreleri içerisindeki maksimum değeri b1'e yazmak

[mücahitayan]

merhaba arkaşlar.


Sheets("ROOT2").Range("B1").Value = Sheets("ROOT2").Max("A1:A65000")

TARZI BİRŞEY YAPMAYA ÇALIŞIYORUM AMA YARDIM EDEBİLİR MİSİNİZ?

 

[Orion1]

Sheets("ROOT2").Range("B1").Value = WorksheetFunction.Max(Range("A:A"))

 

[Ömer]

Merhaba,

Alternatif.

Sheets("ROOT2").Range("B1").Value = Application.Max(Sheets("ROOT2").[A:A])

.

 

[mücahitayan]

çok teşekkür ederim. Saolun