Otomatik Sipariş Numarası Oluşturma.

Katılım
27 Şubat 2010
Mesajlar
25
Excel Vers. ve Dili
Office 2003 Türkçe
Arkadaşlar merhabalar

çalıştığım firmada amirim benden siparişlere numara oluşturmamı istedi numaraların sıralı artmasını istiyorum sipariş tablosu her açıldığında sipariş numarasının otomatik olarak +1 şeklinde artmasını istiyorum bide sipariş numarasının biraz firmama özgü bir şey olmasını istiyorum firmamım ismi Marca Bella ve MB ile başlaması mümkün mü sipariş numarasının? Birde bu sipariş numaralarıyla daha sonra siparişi nebime işlicem nebimde karekter sınırı var en fazla 9 satır oluyor buna uygun olması lazım.

Sipariş formunun örnek dosyasını ekliyorum sol köşede olcak sipariş numarası
yardımlarınızı bekliyorum.
 

Ekli dosyalar

Necdet

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

Sipariş föyü sayfasında D8 hücresine İsteğe Uyarlanmış

Kod:
"MB" 000000
olarak biçimlendiriniz.

ThisWorkbook'un kod sayfasına da aşağıdaki kodu yazınız

Kod:
Private Sub Workbook_Open()
Sheets("sipariş föyü").Select
[D8] = [D8] + 1
End Sub
Dosya her açılışta D8 hücresinin değeri 1 artacaktır.
 

Ekli dosyalar

Katılım
27 Şubat 2010
Mesajlar
25
Excel Vers. ve Dili
Office 2003 Türkçe
dostum çok teşekkür ederim ellerine sağlık Allah razı olsun.
 
Katılım
8 Temmuz 2011
Mesajlar
1
Excel Vers. ve Dili
excel 2010
Sipariş Numarası Verme

Merhaba ekte bulunan dosyada sipariş numarasının otomatik ilerlemesini istiyorum. Daha önceki yazılara bakarak yapmaya çalıştım ama olmadı yardımcı olursanız çok sevinirim. Teşekkürler...
 

Ekli dosyalar

Katılım
19 Mayıs 2011
Mesajlar
1
Excel Vers. ve Dili
excel2007
Merhaba,

Sipariş föyü sayfasında D8 hücresine İsteğe Uyarlanmış

Kod:
"MB" 000000
olarak biçimlendiriniz.

ThisWorkbook'un kod sayfasına da aşağıdaki kodu yazınız

Kod:
Private Sub Workbook_Open()
Sheets("sipariş föyü").Select
[D8] = [D8] + 1
End Sub
Dosya her açılışta D8 hücresinin değeri 1 artacaktır.


Necdet bey selamlar ,

Thisworkbook sayfasına nereden girebilirim. Yardımcı olursanız sevinirim.

Saygılar teşekkürler
 
Üst