Arrayin indisi değişken olunca.

[semih4]

Dim ac As Integer
ac = Sheet5.Cells(65536, "A").End(xlUp).Row - 1 'acticity sayisi'
Dim ST(ac) As Integer

Merhaba arkadaslar bur da bir hata veriyor ama sebebini anlamadım ? sabit sayı gereklidir gibi bir hata veriyor ne yapmam gerekiyor?

 

[Levent Menteşoğlu]

Diziyi çalışma anında boyutlandıracaksanız dim yerine redim kullanmanız gerekir.

Dim ST(ac) As Integer yerine ReDim ST(ac) As Integer şeklinde deneyin.

 

[semih4]

teşekkür ederim.