Bu dosya, Excel hücreleri üzerinde barkod deseni oluşturmayı gösteren bir örnektir. Tür, üretici ve ürün numarasını girdiğinizde makro, rakamları ikili (0/1) koda çevirir ve sonucu "barcode" sayfasındaki hücrelere yazar. Barkod çubukları bu hücrelerdeki 0 ve 1 değerleriyle oluşturulur.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
Dosyada "barcode" adında tek bir sayfa vardır.- Giriş alanı (B2:B9): Type (5), Manufacturer (90067), Product (65011) ve Modulo check (4) değerleri. Bu alanlar typeNumber, leftNumber, rightNumber ve moduloCheck adlarıyla tanımlıdır.
- Barkod alanı (H12:CR14): Sol koruma çubuğu (left guard), L2, L4, L6 grupları, sağ taraftaki R1, R3, R5 grupları ve sağ koruma çubuğu (rt guard) başlıkları yer alır. Altındaki satırlarda 0 ve 1 değerleri görünür.
- Tanımlı adlar: leftArray (H12:AW12) ve rightArray (BC12:CR12) makronun sonucu yazdığı aralıklardır.
- Sayfada 3 veri doğrulama kuralı vardır.
Kullanılan formüller
- B9:
MOD,MID,LEFTveRIGHTile modulo kontrol hanesini hesaplar. Üretici ve ürün numarasındaki tek sıradaki rakamlar 3 ile çarpılır, diğerleriyle toplanır ve toplam 10'a tamamlanır. - D14, V14, AJ14, BJ14, BX14: Tür numarasını ve sol/sağ numaraların belirli hanelerini
MIDile alarak ilgili hücrelerde gösterir. - CL13:
=CL12ile üstteki hücrenin değerini alır.
Makrolar
- CreateBarcode (Module1): Her rakam için sol ve sağ taraf ikili kod tablolarını (7 bitlik diziler) tanımlar. Tür numarası ile üretici numarasının hanelerinden sol diziyi, ürün numarası ile modulo kontrol hanesinden sağ diziyi oluşturur. Ardından bu dizileri leftArray ve rightArray aralıklarına yazar. Hata olursa BarCodeError etiketine yönlenir.
- Worksheet_Change (Source sayfa kodu): typeNumber, leftNumber veya rightNumber hücresi değiştiğinde CreateBarcode makrosunu otomatik çalıştırır.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- "barcode" sayfasında Type, Manufacturer ve Product hücrelerine kendi numaralarınızı girin.
- Hücre değeri değiştiğinde makro otomatik çalışır ve barkod alanı güncellenir.
- Modulo check değerini B9'daki formül hesaplar, ayrıca girmeniz gerekmez.