Share via

Word belgesine düğme ekleme ve çalışma zamanında Click olayını atama

  • Makale
  • Şunlara uygulanır:
    Microsoft Word

Özet

Bu makalede, bir Microsoft Word belgesine program aracılığıyla denetim eklemek ve bu denetim için Click olay işleyicisi eklemek için Microsoft Visual Basic for Applications makrosunu nasıl kullanabileceğiniz gösterilmektedir.

Daha Fazla Bilgi

Aşağıdaki adımlarda, belgeye denetim ekleyecek ve çalışma zamanında bu denetimin Click olayını atayan bir Word makrosunu nasıl oluşturabileceğiniz gösterilmektedir. Adımlar Word içindir. Ancak, Microsoft Excel çalışma kitaplarındaki denetimleri program aracılığıyla işlemek için de aynı kavramları uygulayabilirsiniz.

Not

Bir Microsoft Office belgesinin Visual Basic Project'ini çalışma zamanında işleyebilme özelliği, Microsoft Visual Basic for Applications Genişletilebilirlik kitaplığına başvuru gerektirir.

Örneği oluşturma adımları

  1. Word'de yeni bir belge başlatın.

  2. Visual Basic Düzenleyicisi'ne gitmek için Alt+F11 tuşlarına basın.

  3. Araçlar menüsünde, Başvurular'a tıklayın.

  4. Microsoft Visual Basic for Applications Genişletilebilirliği için başvuruyu seçin.

  5. Yeni bir modül ekleyin ve aşağıdaki kod örneğini ekleyin.

    Sub Test()

'Add a command button to a new document
Dim doc As Word.Document
Dim shp As Word.InlineShape
Set doc = Documents.Add

Set shp = doc.Content.InlineShapes.AddOLEControl(ClassType:="Forms.CommandButton.1")
shp.OLEFormat.Object.Caption = "Click Here"

'Add a procedure for the click event of the inlineshape
'**Note: The click event resides in the This Document module
Dim sCode As String
sCode = "Private Sub " & shp.OLEFormat.Object.Name & "_Click()" & vbCrLf & _
        "   MsgBox ""You Clicked the CommandButton""" & vbCrLf & _
        "End Sub"
doc.VBProject.VBComponents("ThisDocument").CodeModule.AddFromString sCode

End Sub

  6. "Test" makrosunu çalıştırın.

  7. "Test" makrosunun çalışması tamamlandıktan sonra, yeni belgede yeni bir CommandButton denetimi görürsünüz. CommandButton denetimine tıkladığınızda, denetimin Click olayı tetikler.

Word 2002 ve Word 2003 için ek notlar

Varsayılan olarak, Word VBA projesine erişim devre dışı bırakılır. Devre dışı bırakıldığında, yukarıdaki kod '6068', "Visual Basic Projesine Programlı Erişim güvenilir değil" çalışma zamanı hatasını oluşturabilir. Bu hata ve bu hatayı nasıl düzeltebileceğiniz hakkında daha fazla bilgi için, Microsoft Bilgi Bankası'ndaki makaleyi görüntülemek üzere aşağıdaki makale numarasını tıklatın:

282830 Office VBA projesine program aracılığıyla erişim reddedildi