Örnek makrolar için CommandBar denetim KIMLIĞI dönmek için

Makale çevirileri Makale çevirileri
Makale numarası: 162814 - Bu makalenin geçerli olduğu ürünleri görün.
Hepsini aç | Hepsini kapa

Bu Sayfada

Özet

Id özelliği CommandBar</a0> nesnesi için her yerleşik menü çubuğu, kısayol menü çubuğu, alt, menü öğesi veya araç çubuğu için benzersiz bir numara kullanır. Komut çubuğundaki bir denetime başvuruda bulunacağınız zaman kimliği, genellikle gerekli değildir. Visual Basic for Applications makro örnekleri bu makalede, çeşitli Commandbar Denetim Kimliği döndürür.

Daha fazla bilgi

Ek bilgi için, Microsoft Bilgi Bankası'ndaki makaleyi görüntülemek üzere aşağıdaki makale numarasını tıklatın:
159466XL97: Yerleşik bir komut çubuğu denetimlerini KIMLIĞI numaraları listesi

Microsoft, programlama örneklerini yalnızca gösterim amacıyla sağlar; örtülü veya açık garanti vermez. Buna satılabilirlik veya belirli bir amaca uygunluk zımni garantileri de dahildir, ancak bunlarla sınırlı değildir. Bu makale, gösterilen programlama dilini ve yordamları oluşturmak ve hata ayıklamak amacıyla kullanılan araçları kullanmayı bildiğinizi varsayar. Microsoft destek mühendisleri, belirli bir yordamın işlevselliğinin açıklanmasına yardımcı olabilir, ancak gereksinimlerinizi karşılamaya yönelik olarak ek işlevsellik sağlamak veya yordamlar geliştirmek amacıyla bu örnekleri değiştirmezler.

Menü çubuğundaki bir menü

Aşağıdaki makro örneğini kimliği için yerleşik - grafik menü çubuğundaki Araçlar menüsünü verir:
   Sub File_Id

      Dim x as Object
      set x = CommandBars("Chart Menu Bar").Controls("Tools")
      MsgBox x.Caption & Chr(13) & x.Id

   End Sub
				

Menü, menü komutu

Aşağıdaki makro örneği, yerleşik çalışma sayfası menü çubuğundaki Dosya menüsünde Exit için kimliği verir:
   Sub FileExit_Id()

      Dim x as Object
      set x = CommandBars("Worksheet Menu Bar").Controls("File") _
      .Controls("Exit")
      MsgBox x.Caption & Chr(13) & x.Id

   End Sub
				

Bir ShortCut menüsü, menüdeki komutu

Aşağıdaki makro örneğini kimliği hesaplanmış öğe</a0> komutu için Özet Tablo formüllerini alt menüsünde döndürür kısayol menü çubuğu:
   Sub SubMenu_Command_Id()

      Dim x as Object
      set x = CommandBars("PivotTable Context Menu").Controls("Formulas") _
      .Controls("Calculated Item...")
      MsgBox x.Caption & Chr(13) & x.Id

   End Sub
				
aşağıdaki makro örneği, kısayol menü çubuğunu Özet tablo formüllerini alt menüsündeki tüm öğelerin kimliği döndürür:
   Sub GetAll_Submenu_Ids()

      Dim ctrl as Object
      For Each ctrl in CommandBars("PivotTable Context Menu") _
      .Controls("Formulas").Controls
         MsgBox ctrl.Caption & Chr(13) & ctrl.Id
      Next ctrl

   End Sub
				

Referanslar

Komut çubukları, Visual Basic Düzenleyicisi'nde Office Yardımcısı, özelleştirme menüleri yazın'programlı olarak özelleştirme hakkında daha fazla bilgi için Ara ' yı tıklatın ve sonra "Genel görünümünü komut çubukları." olarak görüntülemek için tıklatın.

Not Yardımcı gizliyse tıklatın Office Yardımcısı standart araç çubuğu düğmesinde. Microsoft Visual Basic Yardımı bilgisayarınızda yüklü değilse, Microsoft Knowledge Base'de aşağıdaki makaleye bakın:
120802Office: bir tek bir Office programı veya bileşeni Ekle/Kaldır nasıl

Özellikler

Makale numarası: 162814 - Last Review: 19 Ocak 2007 Cuma - Gözden geçirme: 4.2
Bu makaledeki bilginin uygulandığı durum:
  • Microsoft Office Excel 2003
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Excel 97 Standard Edition
Anahtar Kelimeler: 
kbmt kbhowto kbprogramming KB162814 KbMttr
Machine-translated Article
ÖNEMLİ: Bu makale, bir kişi tarafından çevrilmek yerine, Microsoft makine-çevirisi yazılımı ile çevrilmiştir. Microsoft size hem kişiler tarafından çevrilmiş, hem de makine-çevrisi ile çevrilmiş makaleler sunar. Böylelikle, bilgi bankamızdaki tüm makalelere, kendi dilinizde ulaşmış olursunuz. Bununla birlikte, makine tarafından çevrilmiş makaleler mükemmel değildir. Bir yabancının sizin dilinizde konuşurken yapabileceği hatalar gibi, makale; kelime dağarcığı, söz dizim kuralları veya dil bilgisi açısından yanlışlar içerebilir. Microsoft, içeriğin yanlış çevrimi veya onun müşteri tarafından kullanımından doğan; kusur, hata veya zarardan sorumlu değildir. Microsoft ayrıca makine çevirisi yazılımını sıkça güncellemektedir.
Makalenin İngilizcesi aşağıdaki gibidir:162814

Geri Bildirim Ver

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com