Làm cách nào để kích hoạt hoạt ảnh nếu một siêu liên kết trên một slide khác được nhấp vào?


3

Tôi muốn biết nếu có thể, để kích hoạt một hình động trên một slide cụ thể, nếu một siêu liên kết nhất định trên một slide khác của cùng một bản trình bày được theo dõi.


Lý lịch:

Hiện tại, tôi sử dụng PowerPoint2016 để tạo các slide cho trò chơi PowerPoint Karaoke . Tôi đã bắt đầu với một slide chọn trong đó năm biểu tượng nhỏ đại diện cho mỗi năm bộ slide, tôi đã chuẩn bị. Mỗi biểu tượng là một siêu liên kết đến slide đầu tiên của bộ tương ứng.
Sau khi bộ slide kết thúc, một slide có siêu liên kết trở lại slide chọn được hiển thị và biểu tượng tương ứng được loại bỏ (đạt được thông qua một hình ảnh động được kích hoạt bằng cách nhấp vào biểu tượng với siêu liên kết).
Là một slide cuối cùng, bây giờ tôi muốn bao gồm một slide biểu quyết, hiển thị tất cả các biểu tượng của các bộ slide, được sử dụng trong suốt trò chơi. Nói chính xác: Nếu ba trong số năm bộ slide được sử dụng, tôi muốn slide biểu quyết chỉ bao gồm ba biểu tượng này thay vì cả năm.
Ý tưởng của tôi bây giờ là kích hoạt một hình ảnh động trên slide biểu quyết tùy thuộc vào siêu liên kết nào được nhấp trong trò chơi.

Tôi rất đánh giá cao bất kỳ ý tưởng nào về cách tôi có thể đạt được hành vi được mô tả ở trên, cũng có thể sử dụng một cách tiếp cận hoàn toàn khác. Xin vui lòng cho tôi biết, nếu có thông tin bị thiếu.

Câu trả lời:


1

Mặc dù tôi không thể tìm ra cách đạt được trình kích hoạt hoạt hình trên một slide khác với bản thân, nhưng tôi đã có thể giải quyết vấn đề của mình bằng mã VBA sau.

Option Explicit
Private Const VotingSlideAs Integer = 5
Private Const TargetSlideNumber As Integer = 3


Sub FirstIcon()
  Dim myPresentation As Presentation
  Dim mySlide As Slide
  Dim myImageBox As Shape
  Dim myTextBox As Shape

  Set myPresentation = ActivePresentation
  Set mySlide = myPresentaion.Slides.Item(VotingSlide)
  Set myImageBox = mySlide.Shapes.AddPicture("filename", msoCTrue, msoCTrue, 100, 100, 85, 85)

  With SlideShowWindows(1).View
         .GotoSlide (TargetSlideNumber)
  End With

End Sub

Đoạn mã trên được gán cho một biểu tượng trên slide chọn qua insert action. Khi nhấp vào biểu tượng, mã sẽ chèn hình ảnh filenamevào vị trí đã chỉ định của slide biểu quyết và kích hoạt một bước nhảy tới slide được xác định bằng TargetSlideNumber(bắt đầu của bộ slide tương ứng). Lặp lại mã tương tự cho tất cả các biểu tượng trên slide chọn cuối cùng sẽ dẫn đến hành vi mong muốn.

Khi sử dụng trang web của chúng tôi, bạn xác nhận rằng bạn đã đọc và hiểu Chính sách cookieChính sách bảo mật của chúng tôi.
Licensed under cc by-sa 3.0 with attribution required.