Dosya simgesi

Belirtilen Alanda Sağ Tuşa Özel Menüler Eklemek

Bu dosya, çalışma sayfasında belirli bir aralıkta fare sağ tuşuna basıldığında Excel'in standart kısayol menüsü yerine kendi hazırladığınız özel bir menünün açılmasını gösterir. Özel menüde hücre biçimlendirme iletişim kutularına giden altı komut bulunur. Menü ve sağ tuş davranışı VBA ile oluşturulduğu için dosya örnek bir uygulama ve kendi çalışmalarınıza taşınabilecek bir şablon olarak kullanılabilir.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

  • Sheet1: A1:H24 aralığını kapsayan sayfa. data adlı tanımlı ad Sheet1!$A$1:$H$17 aralığını gösterir ve özel menünün çalışacağı alanı belirler.
  • Dosyada formül, grafik, tablo veya özet tablo bulunmaz.

Makrolar​

  • Worksheet_BeforeRightClick (Sheet1): Sağ tıklanan hücre data aralığının içindeyse standart menüyü iptal eder ve MyShortcut adlı özel menüyü açar. Aralık dışında normal Excel menüsü çalışır.
  • Workbook_Open: Dosya açıldığında CreateShortcut makrosunu çalıştırarak özel menüyü oluşturur.
  • Workbook_BeforeClose: Dosya kapanırken DeleteShortcut ile özel menüyü siler.
  • CreateShortcut: Geçici bir açılır menü hazırlar ve şu altı düğmeyi ekler: Number Format, Alignment, Font, Borders, Fill, Protection. Borders düğmesinden önce ayırıcı çizgi bulunur.
  • ShowFormatNumber, ShowFormatAlignment, ShowFormatFont, ShowFormatBorder: İlgili Hücre Biçimlendir sekmesini ExecuteMso komutlarıyla açar.
  • ShowFormatPatterns ve ShowFormatProtection: Doldurma ve koruma pencerelerini Application.Dialogs ile açar.
  • ShowMyShortcutMenu: Özel menüyü Ctrl+Shift+M kısayoluyla fare kullanmadan açar.
Makrolarda dosya silme veya dışarıya bağlantı gibi zararlı bir işlem yoktur; yalnızca Excel'in komut çubuğu menüsü oluşturulur ve silinir.

Nasıl kullanılır​

  1. Dosyayı açın ve makroları etkinleştirin.
  2. Sheet1 üzerinde A1:H17 aralığındaki herhangi bir hücreye sağ tıklayın; özel menü açılır.
  3. Menüden istediğiniz biçimlendirme komutunu seçin, ilgili iletişim kutusu açılır.
  4. Aralığın dışındaki bir hücreye sağ tıkladığınızda Excel'in olağan menüsü görüntülenir.
  5. Menüyü klavyeden açmak için Ctrl+Shift+M tuşlarını kullanın.
  6. Kendi çalışmanızda uygulamak için data adının gösterdiği aralığı değiştirin ve CreateShortcut içindeki düğmeleri ihtiyacınıza göre düzenleyin.

Feyzullah tarafından daha fazla dosya

Detaylar
Yazar
Feyzullah
İndirme
12
Gösterim
2,189
İlk sürüm
Güncel
SHA-256
05f7eb046ab7385f43b23ee08a77b6a616e2d56a8366e8adddc3dd2b03e75926

Puanlar

5.00 Oylama 1 İnceleme

En son değerlendirmeler

Faydalı bir dosya, paylaştığınız için sağolun.
Geri
Üst