Otamatik numara verme

Katılım
10 Mart 2005
Mesajlar
50
Arkadaşlar merhaba
ben excelde yapmış olduğum ekteki listede fiş numarasının her açılışta (1) bir artırarak gelmesini nasıl sağlarım.
İlginiz için şimdiden teşekkür ederim.
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,372
Excel Vers. ve Dili
Ofis 365 Türkçe
Merhaba,

Aşağıdaki kodları ThisWorkook a kopyalayınız

Kod:
Private Sub Workbook_Open()
Sheets("Sayfa1").[D2] = Sheets("Sayfa1").[D2] + 1
End Sub
 
Katılım
10 Mart 2005
Mesajlar
50
Sayın Necdet Yesertener öncelikle ilginiz için teşekkür ederim,
fakat ben yapamadım, eğer mümkünse ekteki listeye uygulama yaparsanız çok memnun olurum.
Teşekkür ederim.
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,372
Excel Vers. ve Dili
Ofis 365 Türkçe
Merhaba Sayın dilteks,

Dosya ekte
 
Üst