Listview Üzerinde Sağ Tıklamayla Menü Oluşturma

Bu dosya, bir UserForm üzerindeki ListView nesnesine sağ tıklandığında Windows API ile açılır menü oluşturmayı gösterir. Örnek, "veri" sayfasındaki üretim kayıtlarını ListView içinde listeler ve menüyü bu liste üzerinde çalıştırır.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. ListView, Excel VBA'nın yerleşik nesnesi olmadığı için bilgisayarda kayıtlı (register) olmalıdır; 64 bit Office sürümlerinde desteklenmez.

Dosyanın içeriği​

• veri: A1:AZ362 aralığında üretim kayıtları. Başlıklar: Üretim no., Tarih, Ana Ürün, Ana Ürün Miktarı, Formatı, Sayfa, Miktarı, Notlar ve duruş/sıkışma sütunları (KBA Duruş, ROS-3 Sıkışma, MSD Duruş).
• Sayfa1: Formu açan bir komut düğmesi içerir.
• Üretim (UserForm): Kayıtların gösterildiği aulv isimli ListView ve üç ComboBox.

Dosyada sayfa formülü yoktur; hesaplamalar makro içinde yapılır.

Makrolar​

• Workbook_Open: Dosya açılırken Üretim formunu gösterir.
• CommandButton1_Click (Sayfa1): Üretim formunu modsuz olarak açar.
• aulv_MouseUp: Sağ fare düğmesine basıldığında CreatePopupMenu, AppendMenu ve TrackPopupMenuEx ile imleç konumunda "Tüm veriyi kopyala" ve "Seçilen hücreyi kopyala" seçeneklerini içeren menü açar. Seçime göre tumsatir veya secilihucre çalışır; bu iki prosedür örnek olarak yalnızca bilgi mesajı gösterir, kopyalama kodu kullanıcı tarafından eklenir.
• UserForm_Initialize: Form boyutunu Excel penceresine göre ayarlar ve ListView görünümünü hazırlar.
• Üretim_Form_Kod: "veri" sayfasını okuyarak üretim numarası başına toplam yaprak, miktar, ağırlık, ortalama hız ve arıza/duruş değerlerini hesaplar, ListView'e satır satır yazar. ComboBox1, ComboBox2 ve ComboBox3 değiştiğinde yeniden çalışır.
• ListView1_ColumnClick: Sütun başlığına tıklandığında sıralamayı artan/azalan olarak değiştirir.
• sirala_txt, sirala_sayi: Metin ve sayı dizilerini sıralayan yardımcı fonksiyonlar.

Kodda dosya silme veya dışarıya bağlantı işlemi bulunmaz; yalnızca user32 kütüphanesinin menü ve pencere fonksiyonları çağrılır.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin; Üretim formu otomatik görüntülenir.
2. Form kapatılırsa Sayfa1'deki komut düğmesiyle yeniden açın.
3. ListView üzerinde sağ tıklayın ve menüden bir seçenek belirleyin.
4. Menü seçeneklerine kendi işleminizi bağlamak için tumsatir ve secilihucre prosedürlerindeki MsgBox satırlarını kopyalama kodunuzla değiştirin.