|
||
---|---|---|
PowerPoint tips, hints and tutorials that will change your presentations for ever! | ||
Jigsaws |
Slide Thumbnails vba If you need slide images to paste into a document you can use the Save as jpg command. This code though will give you much smaller thumb images! Don't know what to do with the code see here for tutorial The code Sub thumbs() Dim SW As Long Dim SH As Long Dim i As Integer Dim strpath As String On Error Resume Next strpath = Environ("USERPROFILE") & "\Desktop\Slide_Pics\" MkDir strpath SW = ActivePresentation.PageSetup.SlideWidth SH = ActivePresentation.PageSetup.SlideHeight For i = 1 To ActivePresentation.Slides.Count ActivePresentation.Slides(i).Export _ strpath & "\MySlide" & CStr(i) & ".jpg", "JPG", SW / 2, SH / 2 Next i End Sub You will find the thumbnails in a folder (Slide_Pics) on the desktop. |
|
Articles on your favourite sport Free Microsoft PowerPoint Advice, help and tutorials, Template Links |