Cách thêm 'Dán liên kết' > 'Đối tượng Trang tính Microsoft Excel" vào Thanh công cụ Truy cập Nhanh PowerPoint
Câu trả lời:
Đây là một macro sẽ làm những gì bạn muốn:
Sub PasteExcelLink() Dim oSlide As Slide Set oSlide = ActivePresentation.Slides(ActiveWindow.Selection.SlideRange.SlideIndex) On Error Resume Next oSlide.Shapes.PasteSpecial(DataType:=ppPasteOLEObject, Link:=msoTrue).Select End Sub
Nếu macro trong bản trình bày đang được chỉnh sửa, macro này sẽ hoạt động như cũ. Nếu bạn đặt nó trong một bài thuyết trình hỗ trợ macro riêng biệt, thì bài thuyết trình đó sẽ phải được mở khi bạn nhấp vào nút QAT. Bạn cũng có thể lưu tệp ở định dạng Phần bổ trợ, đây là trang của Microsoft về cách thực hiện điều đó: Thêm hoặc tải phần bổ trợ PowerPoint
Comments
Post a Comment