Excel Vba Forum - Excelce.Net

SORU ve CEVAPLAR (Yazılabilir) => Microsoft Excel, Vba, Makro, Formül vb. Soruları => Konuyu başlatan: okankg - 23 Mayıs 2017, 15:12:44

Başlık: EXCELDE NUMARALANDIRMA
Gönderen: okankg - 23 Mayıs 2017, 15:12:44
merhaba;
excelde A sütununa veri girdikçe B sütununda otomatik olarak sıralı numara vermesini istiyorum.
verileri girdiğim sıraya göre numaralndırmak istiyorum. bunu yapan formülü kuramadım

örnek: A1 hücresine veri girdiğimde B1 hücresine 1 yazmasını
          A9 hücresine veri girdiğimde B9 hücresine 2 yazmasını
          A3 hücresine veri girdiğimde B3 hücresine 3 yazmasını
Başlık: Ynt: EXCELDE NUMARALANDIRMA
Gönderen: hasan14 - 23 Mayıs 2017, 17:14:58
B1 Hücresine kopyala aşağı çek
Kod: [Seç]
=EĞER(A1="";"";BAĞ_DEĞ_DOLU_SAY($A$1:A1))
Başlık: Ynt: EXCELDE NUMARALANDIRMA
Gönderen: okankg - 24 Mayıs 2017, 10:13:34
Çok teşekkür ederim hasan14. Formül çalışıyor ama ufak bir eksik var
A1     hücresine veri girdiğimde B1     hücresine 1 yazıyor
A2     hücresine veri girdiğimde B2     hücresine 2 yazıyor
A10   hücresine veri girdiğimde B10   hücresine 3 yazıyor

Ama
A7   hücresine veri girdiğimde B10   hücresine 4 yazmıyor
B10 da 3 yazıyorken; A7   hücresine veri girdiğimde B10 daki sayıyı 4 yapıyor, B7 deki sayıya 4 yazıyor.

Benim istediğim farklı satırlara yazsamda sıra numarasının değpişmemesi
Yazdığım sıraya göre numaralandırma yapması

EXCELDE ekledim.tşkler
Başlık: Ynt: EXCELDE NUMARALANDIRMA
Gönderen: hasan14 - 24 Mayıs 2017, 11:01:02
Formülle istediğinizin nasıl yapılacağını bilmiyorum.Makro ile olabilir.Sayfa koduna kopyala
Kod: [Seç]
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Intersect(Target, Range("a2:a100")) Is Nothing Then Exit Sub
If Target = "" Then
Target.Offset(0, 1) = ""
Else
Target.Offset(0, 1) = WorksheetFunction.Max(Range("B2:B100")) + 1
End If
End Sub
Dosyanız;
Başlık: Ynt: EXCELDE NUMARALANDIRMA
Gönderen: okankg - 24 Mayıs 2017, 14:09:52
elinize sağlık.çok teşekkür ederim  :)
Başlık: Ynt: EXCELDE NUMARALANDIRMA
Gönderen: hasan14 - 24 Mayıs 2017, 14:21:32
Rica ederim.Kolay gelsin :bye
Başlık: Ynt: EXCELDE NUMARALANDIRMA
Gönderen: SahraS - 21 Mart 2020, 16:36:56
merhabalar
yazdığınız ikinci makro benim işime yarayan bir makro fakat kullanırken farkettim a hücresine veri girişini sildiğimde sıra numarası bir sonraki sıradan devam ediyor. şöyle örnek vereyim a2 hücresine veri girişi yaptım b2 hücresine 1 yazdı. a5 hücresine veri girişi yaptım b5 hücresine 2 yazdı. a2 hücresindeki veriyi sildiğimde b2 deki veri siliniyor b5 hücresindeki iki kalmaya devam ediyor. a3 hücresine veri girişi yaptığımda 3 den devam ediyor. ben a hücresindeki veriyi silsem bile 1 den başlayarak sıralamaya devam etmesini istiyorum yardımcı olma şansınız var mı acaba? şimdiden teşekkürler...