Metin ve Sayı otomatik numaralandıma

[KORAY SUGUR]

.............A.............
1..........ALİ............
2.......ALİ/001.........
3.......ALİ/002.........
4.......ALİ/003.........

A1 hücresine girilen metine ek olarak ve artan şekilde otomatik numaralandırma yapmak istiyorum (Tutup çekerek arttırmak istemiyorum yaklaşık 50.000 satır olacak ve artacak devamlı)

Şimdiden teşekkür eder, İyi çalışmalar dilerim.

 

[temat1100]

isteğinizi daha ayrıntılı yazmalısınız.
İlk üç harfi aynı olanları mı sıralayacak yoksa sonunda 7001 7002 gibi rakamlar varsa mı kendi arasında sıralayacak. Ne yapmak istediğiniz anlaşılmıyor

 

[KORAY SUGUR]

Numaranın başına "a1" hücresindeki metni koyacak daha sonrada artan şekilde ve 3 basamaklı (001,002,003,005, .... gibi)sıralandırma yapacak.

Teşekkürler

 

[Ömer BARAN]

Numaranın başına "a1" hücresindeki metni koyacak daha sonrada artan şekilde ve 3 basamaklı (001,002,003,005, .... gibi)sıralandırma yapacak.

Teşekkürler

Merhaba.

A2 hücresine aşağıdaki formülü uygulayın sonra, aşağı doğru ihtiyaç kadar kopyalayın.

=$A$1&"/"&METNEÇEVİR(SATIR()-1;"000")

 

[Ömer BARAN]

Kod ile yapmak isterseniz;
belgeniz açıkken alt tarfta sayfa adına fareyle sağ klik yapıp->Kod Görüntüle'yi seçin ve aşağıdaki kodu karşınıza açılan ekranın sağ tarafındaki boş alana yapıştırdıktan sonra aynı ekranda üst tarafta ortadaki (Debug kelimesinin hemen altında) İLERİ simgesine 1 kez tıklayın.

Sub numaralandır()
For i = 2 To 100
    Cells(i, 1) = Cells(1, 1).Value & "/" & i - 1
Next
End Sub

 

[KORAY SUGUR]

Teşekkürler