ppt 制作海報 導出高分辨率圖片

用ppt做海報，導出圖片的時候，發現導出的圖片的分辨率只有96ppi,清晰度不太好。

怎么能這樣呢！

網上搜了一下，發現微軟提供了一個修改注冊表的方法，點擊這里訪問。不過那里講的最新只有2010，我的是2016版本的，按照上面說的做，發現沒用。

找找其他辦法吧。付費軟件PPtools，好像也能弄。不過，要錢，差評！

之后，看到一個博客[這里]，里面使用了宏來導出圖片，代碼如下

Sub ppt2pic()
'
' 宏由 zim 創建，日期 2012-10-5。
'
    Dim Nx     As Shape
    Dim X     As Long
    For X = 1 To ActivePresentation.Slides.Count
            '跳至指定的幻燈片
            'ActiveWindow.View.GotoSlide   X
            '獲取當前幻燈片編號
            'ActiveWindow.View.Slide.SlideIndex
            'ActiveWindow.Selection.SlideRange.Shapes
            For Each Nx In ActivePresentation.Slides(X).Shapes
                    If Nx.Type = 14 Or Nx.Type = 1 Then Debug.Print Nx.TextFrame.TextRange.Text
            Next
            '導出幻燈片到圖像
            ActivePresentation.Slides(X).Export "D:\" & X & ".JPG", ".JPG", 3072, 2304
    Next
 
End Sub

 

運行了一下，發現修改"D:\"權限不夠會報錯，改個目錄就行了。把3072, 2304改成其他更大更大的數，會溢出，最高ppi只有282ppi,不過比96ppi好多了。