• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Excel tablo ile otomatik numaralandırma proğramı

M

MURATSrh

Katılım
25 Haziran 2017
Mesajlar
12
Excel Vers. ve Dili
2007 Türkçe
Selamun aleyküm. Hayırlı günler.

Burdan istediğim proğramın hangi sınıfa girdiğini bilmediğim için buraya açtım. Umarım yanlış bölüm değildir.

Geleyim konuya;

İşyerinde resim numarası vermek için excell ile yapılmış bir proğram var. Zaman içinde düzeni bozulmuş oldukça karışık bir hale geldi. Proğram şöyle başlıyor.

image.png


Burdaki butona tıklayınca aşağıdaki pencere açılıyor.

image.png


yukardaki beyaz kutucuklara kapasite bilgisi , yanındakine yapım kodu ve en sağda tarih bilgileri elle giriliyor.

aşağıdaki numaralar ise o anki duruma göre seçilen numaralar tik ile işaretlenip ;

önce NUMARA EKLE
sonra NUMARA GÖSTER

butonlarına tıklayınca aşağıdaki gibi oluyor.

image.png



Buraya atılan numaralar belli bir numaradan başlayacak ve sıra ile artarak her defasında kendi sayfasına eklenecek. Karışık durum şöyle.

image.png


bu bir kutucuğa ait bilgiler.

image.png


Burdaki ama binlerce resim arasında bir numarayı başka bir resme vermemek. sıradan numaralandırmaya devam edecek.

D-10
D-11

...

gibi seçenek çok olduğundan bunların hepsini bir tek sayfaya yanyana ekleyince içinden çıkılmaz hale geliyor. Hergün sürekli resim numarası ekleniyor.

Böyle bir proğramı ve her numarayı ayrı sayfada gösterip kaydedecek şekilde yapacak bir arkadaşım var mı ?

Bu konuda yardımcı olacak arkadaşa minnettar kalırız. Gerekirse daha iyi anlatabilmek için bilgisayarıma bağlanıp birebir şekil üzerinde de tarif edebilirim. Acilen cevabınızı ve yardımınızı bekliyorum.

Teşekkürler.
 
Arkadaşlar konuyu inceleyen var mı acaba? İlgilenen arkadaşlar varsa bekleyeyim. Konu çok acil. Bu tabloyla verilecek numaralar iş akışını etkiliyor.

Yapabilecek arkadaşların cevabını bekliyorum.
 
1- Numaraların A sütununda olduğunu varsaydım.
2- Numaralarının sırasının herhangi bir şekilde bozulmadığını varsaydım
3- Sayfa adlarını User formunda nerede ve nasıl belirlediğinize göre kodlara eklemeniz gerekiyor.
Kod: 
Sub Makro1()
SAY = Range("A65536").End(3).Row
    Range("A" & SAY).AutoFill Destination:=Range("A" & SAY & ":A" & SAY + 1), Type:=xlFillDefault
    MsgBox "Yeni Numara " & Range("A" & SAY + 1)
End Sub
 
Öncelikel teşekkür ederim. Yalnız excell bilgim yok. Bu kodları nereye ve nasıl ekleyeceğimi bilmiyorum. Bana tarif ettiğim proğramın kendisi lazım. Daha net ve düzenlenmiş hali ile. Bu kodlar şu an nasıl bir etki verecek bilemiyorum.

Proğramın kendisini yapma imkanınız varsa sevinirim. Tekrar teşekkür ederim.
 
Şu anda kullandığınız dosyayı fikir verecek kadar kısaltıp eklerseniz yardımcı olmaya çalışayım.
 
Eklenti yetkisi yok. Buraya ekledim. Bu linkten indirip inceleyebilirsiniz.
Yalnız , daha önce verilen numaralar var. Her bölüm yani
D-10
D-11
...

gibi bölümler her biri farklı numaralardan devam etmeli. Kaldığımız yerden devm etmek için. Burda tek sayfada , eğer her numarayı ayrı sayfalarda yapabilirsek çok çok güzel olacak.

Estetik ve görünüm olarak ta sizin zevkinize kalmış. Renk tonları ve tasarımı daha güzel yapacağınıza inanıyorum.

Tekrar teşekkürler. Link burda .. Buyrun..

http://s7.dosya.tc/server5/d9ivvv/Dagitim_Resim_Numaralandirma1.rar.html
 
Verilerin ayrı sayfada olması isteğinizi sonradan gördüm. Yeni hali aşağıdaki linkte
http://s7.dosya.tc/server5/olytlq/Sayfasi1.zip.html
1- Seri listesinden seçimlerinizi yapın
2- Seri listesinden çıkışınızda Numaralar listesine seçtiğiniz serilere ait yeni verilecek numaralar gelecek.
3- Diğer bilgileri girip KAYDET tuşuna basınca kayıtlar yapılıp imleç seri listesine gelip yeni kayıt için hazır olacak.
4- Eğer Yeni seri sayfası oluşturursanız, (Mesela D-74) bu sayfanın formatı ve başlıkları aynı şekilde olsun. form açıldığında bu seri sayfasını da seri listesine dahil edecektir.
 
Son düzenleme:
Alicimri Hocam,
Öncelikle Ellerine sağlık. Emek verdiniz , zaman harcadınız.

Yalnız ; örnek verdiğim dosya fikir amaçlıydı. Resim numaraları direk sayfalara kaydetmeden önce benim görebilmem lazım. Toplu olarak. Numara göster butonuna basınca bütün numaraları aynı ekranda görüp , sonra kaydediyorum. Bu şelkikde kaydettikten sonra sayfalara tek tek girip bakmak lazım ki, benim verdiğim örnekteki numaralar kadar yani 99 dahil olmalıydı. Müsaadenizle bu sisteminizi biraz geliştirmeye çalışalım. Araştırma yaparak sizin mantığınızla ilerlemek belki daha güzel olacak.

Sonsuz teşekkürler. Ellerinize sağlık. Eyvallah.

Bir sorun olur ilerleyemezsek sizi tekrar rahatsız ederim müsaadenizle.
 
Zaten dediklerinizi yapıyor. Dosyayı ve Yukarıda #9 nolu mesajda yazdıklarımı iyi inceleyin
 
alicimri' Alıntı:
http://s7.dosya.tc/server5/7npmhq/Sayfasi2.zip.html
Form üzerinden Sayfayı ekleyin. Yeni halinin linki üsttte
Genişletmek için tıkla ...

Selamun Aleyküm.

Alicimri hocam , maalesef olmadı. Ana pencere yok bu dosyada. Ve sayfalar eksik.

Bu proğramdaki amaç sayfalara girmeden ana sayfa da açılan pencereden numaraları verip kaydetmek. alt sayfalara kendisi kaydedip arşiv yapacak .

Burdan tam olarak ifade edilmiyor. Burdaysanız , yada hafta sonu pc ye bağlanabilir misiniz teamla. Direk proğram üzerinden tarif edeyim. Daha çabuk halledersiniz o zaman.
 
Ekliyor................
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst