makro formul

[senerozun]

Merhaba arkadaslar. Ben excelde makro kullanarak A1 sutununa sıra numarası vermek istiyorum. mesela: B1 sutununda parsel numaraları yazılı. ben B1 sutunun karşısındaki A1 hücresine sıra numarası vermek istiyorum. bunun için makro formullu nasıl oluşturabilirim. yardımcı olabilirseniz sevinirim.

 

[altanson]

aşağıdaki formülü dener misiniz?

=EĞER(B2="";"";BAĞ_DEĞ_DOLU_SAY($B$2:B2))

 

[Ali]

Sub sırano()
satir = 0
For i = 2 To 1355
Cells(i, 1) = ""
If Cells(i, 2) <> "" Then
satir = satir + 1
Cells(i, 1) = satir
End If
Next
End Sub