Makro Index?

[soulfest]

İyi günler verdiğim bu kodda geçen index kelimeleri ne anlama geliyor acaba yardımcı olabilir misiniz?Index diye birşey mi tanımlanmış?

teşekkürler

Private Sub btnHesapla_Click()
On Error GoTo ErrorHandler
Cells(41, 4) = ""
n = Cells(2, 3)

If (n > 0) Then
fkupOrtalama = WorksheetFunction.Average(Range(Cells(5, 5), Cells(n + 5, 5)))
fkupMin = WorksheetFunction.Min(Range(Cells(5, 5), Cells(n + 5, 5)))

If (n < 12) Then
Dim Index
For Index = 0 To 8 Step 1
If (fkupOrtalama >= 0.85 * Cells(6 + Index, 11) And fkupMin >= 0.85 * Cells(6 + Index, 10)) Then
Cells(41, 4) = Cells(6 + Index, 8)
End If
Next Index
Else
Dim top
top = 0
For Index = 0 To n - 1 Step 1
top = top + (fkupOrtalama - Cells(Index + 5, 5)) ^ 2
Next Index

For Index = 0 To 8 Step 1
S = (top / n - 1) ^ (1 / 2)
Z = fkupOrtalama - Cells(n + 7, 9) * S
If (Z >= 0.85 * Cells(6 + Index, 10)) Then
Cells(41, 4) = Cells(6 + Index, 8)
End If
Next Index
End If
End If
Exit Sub
ErrorHandler:
MsgBox "Hatali tablo verisi."
End Sub

 

[Orion1]

Evet
Dim ile index variant tipinde bir değişken olarak tanımlanmış.
Ama siz onu sayısal olarak kullanıyorsunuz.
Variant tipinde değişken bellekte en çok yer kaplayan değişken tipidir.
Long tanımlayabilirisniz mesela.

Dim Index as long

 

[soulfest]

biraz daha açıklayabilir misiniz acaba henüz acemiyimde.tanımlanan bu index nedir neresidir bu kodda?0 to 8 falan ne anlama geliyor?

 

[Orion1]

Bu konu 1-2 satırla anlatılacak bir şey değil.
Araştırmalar yapınız.
kaynak olarak kitaplarda kullanabilirsini<.
Aşaüğdaki linkteki bilgiler işinize yarayabilir.
istediğini< bir konuda bilgi lmak için forumun gelişmiş arama seçeneğini kullanabilirsiniz.
EXCEL & VBA Bilgileri TIKLAYINIZ