Có một số loại sự kiện cho phép chạy macro bất kỳ khi nào một người vào một trang trình bày hoặc rời khỏi trang trình bày không?Làm thế nào để chạy macro "OnEnterSlide" hoặc "OnLeaveSlide" trong Powerpoint VBA?
Trả lời
SlideShowNextSlide hoặc OnSlideShowPageChange
Bạn có thể tìm thấy danh sách đầy đủ tại mẫu Mã http://officeone.mvps.org/vba/events_version.html
từ http://msdn.microsoft.com/en-us/library/aa211571%28office.11%29.aspx
Ví dụ này xác định vị trí trượt cho slide sau sự kiện SlideShowNextSlide.
Nếu trang chiếu kế tiếp trượt ba, ví dụ thay đổi loại con trỏ thành bút và bút màu đỏ.
Private Sub App_SlideShowNextSlide(ByVal Wn As SlideShowWindow)
Dim Showpos As Integer
Showpos = Wn.View.CurrentShowPosition + 1
If Showpos = 3 Then
With ActivePresentation.SlideShowSettings.Run.View
.PointerColor.RGB = RGB(255, 0, 0)
.PointerType = ppSlideShowPointerPen
End With
Else
With ActivePresentation.SlideShowSettings.Run.View
.PointerColor.RGB = RGB(0, 0, 0)
.PointerType = ppSlideShowPointerArrow
End With
End If
End Sub
Tôi muốn thêm sự kiện đó để sử dụng thực sự phụ thuộc vào phiên bản PowerPoint. Đối với tôi (PP 2007) sự kiện tiếp theo hoạt động khá ổn định:
Sub OnSlideShowPageChange(ByVal objWindow As SlideShowWindow)
Debug.Print objWindow.View.Slide.SlideIndex ' you can use this to check which slide invokes the event
End Sub
Mã này không cần cấu trúc lớp bổ sung (PPTEvent). Nhưng nếu bạn dự định sử dụng các sự kiện khác, bạn nên đặt khởi tạo lớp này thành OnSlideShowPageChange.
Xin lưu ý, mã này đối phó với phần đầu tiên của nhiệm vụ được đưa ra - nhập trang trình bày. Bạn có thể hỏi "Còn về việc rời đi?". Vâng, đây là vấn đề tương đối rộng. nhập cho một trang chiếu nào là cùng một lúc để lại cho một trang khác. Chỉ cần sử dụng objWindow.View.Slide.SlideIndex để theo dõi trang trình bày hiện tại, so sánh nó với chỉ mục trang trình bày trước đó và quyết định xem bạn có vừa rời khỏi trang cần thiết hay không.
- 1. EXcel VBA: Excel Macro để tạo bảng trong PowerPoint
- 2. Powerpoint VBA App_SlideShowBegin
- 3. Làm cách nào để Powerpoint gọi chương trình con VBA của tôi trong một hoạt ảnh?
- 4. Macro VBA trong Excel để chạy câu lệnh Chèn SQL
- 5. Excel VBA - Chạy macro trước khi lưu
- 6. Làm thế nào để thiết lập một thử nghiệm đơn vị trong VBA Excel Macro?
- 7. Gọi macro từ nút trong chế độ chỉnh sửa trong khi ở PowerPoint
- 8. Làm thế nào để dừng mã VBA đang chạy?
- 9. Làm thế nào để áp dụng bố trí cụ thể trong powerpoint bằng cách sử dụng vba?
- 10. Tùy chỉnh Dải băng PowerPoint lúc Chạy-Thời gian
- 11. Làm thế nào để tạo các biến Excel VBA có sẵn cho nhiều macro?
- 12. Phân nhánh trang trình bày trong PowerPoint (VBA)
- 13. Chuyển đổi macro Excel 4 thành VBA
- 14. Làm cách nào để gán lối tắt bàn phím cho macro VBA trong Outlook 2007?
- 15. Làm thế nào để bạn tìm thấy Leapyear trong VBA?
- 16. Làm thế nào để tạo macro NSString?
- 17. Làm thế nào để bạn chọn toàn bộ bảng tính excel với Phạm vi sử dụng Macro trong VBA?
- 18. VBA Macro trên nhiều trang tính
- 19. Tôi bắt đầu với VBA và lập trình macro trong Word 2007 ở đâu?
- 20. Làm thế nào để tránh mất macro trong PHPExcel?
- 21. Tài liệu cho các macro Excel VBA
- 22. làm cách nào để mở TẤT CẢ các tệp excel từng cái một và chạy macro
- 23. Làm thế nào để đệ quy gọi macro trong jinja2?
- 24. Làm thế nào để tránh macro ẩn trong Clojure?
- 25. Làm thế nào để làm tròn một số trong VBA đến 5 gần nhất? (hoặc 10 hoặc X)
- 26. Tôi không thể thấy macro VBA của mình trong hộp chọn 'chạy tập lệnh'
- 27. Làm thế nào để bạn redimension một mảng trong VBA?
- 28. Excel & VBA: Bỏ qua công thức tính toán trong Macro
- 29. Làm thế nào để gọi một hành động trong khi trình chiếu powerpoint theo trình tự?
- 30. Làm thế nào để Thêm Ngày Picker Để VBA UserForm
Đó chỉ là để tham gia. Tôi không biết nếu có sự kiện về "rời khỏi" –
Tôi cố kích hoạt nó bằng cách thực hiện http://stackoverflow.com/questions/2979950/how-to-automatically-trigger-the-app-object-initialization này -in-powerpoint trong cửa sổ thực thi nhưng dường như không hoạt động. Tôi có nghịch ngợm gì đó không? – user310291
Đã trả lời trong câu hỏi khác –