Thanks. In the mean time I found a really nice little VB for Applications routine at ( http://www.aeverett.btinternet.co.uk/tips_powerpoint.htm ) that did the trick. The code follows for anyone needing such a tool. Works for .jog files. All you need to do is change the MyPath value. Took about 20 seconds to create all 73 slides and also format them. The site has tons of nice tips for PowerPoint.
-Todd C.
-----------------------------------------------------
Sub GetPictures()
Dim myPhotos, myPath As String
myPath = "<place your files location here>"
myPhotos = Dir(myPath + "*.jpg")
Call PlacePicture(myPath, myPhotos)
Do Until myPhotos = ""
myPhotos = Dir
If myPhotos <> "" Then
ActiveWindow.View.GotoSlide Index:=ActivePresentation.Slides.Add(Index:=1, Layout:=ppLayoutBlank).SlideIndex
Call PlacePicture(myPath, myPhotos)
End If
Loop
End Sub
Sub PlacePicture(myPath, myPhotos)
ActiveWindow.Selection.SlideRange.Shapes.AddPicture(FileName:=myPath + myPhotos, LinkToFile:=msoFalse, SaveWithDocument:=msoTrue, Left:=72, Top:=78, Width:=640, Height:=480).Select
ActiveWindow.Selection.ShapeRange.Align msoAlignCenters, True
ActiveWindow.Selection.ShapeRange.Align msoAlignMiddles, True
End Sub
-----Original Message-----
From: Brandon Murch [mailto:bmurch@...]
Sent: Monday, January 17, 2005 10:21 AM
To: vantage@yahoogroups.com
Subject: RE: [Vantage] [OT] PowerPoint - Bulk Picture Import
If he insists on using PowerPoint, there is a program called Image
Importer Wizard. I believe there is a free trial period. The website
is http://skp.mvps.org/iiwdnload.htm I have never used it personally,
but have some colleagues who recommend it.
Hope this helps,
Brandon R Murch
Supervisor of Information Technology
WindStone Medical Packaging
406.259.6387
bmurch@... <mailto:bmurch@...>
-----Original Message-----
From: Todd Caughey [mailto:caugheyt@...]
Sent: Monday, January 17, 2005 8:30 AM
To: vantage@yahoogroups.com
Subject: [Vantage] [OT] PowerPoint - Bulk Picture Import
Our president just came back from a business trip with 73 pictures he
wants made into a PowerPoint (2000) presentation. Anyone know of a
method to "bulk" import the .jpg files as slides? Otherwise it gets a
really tedious creating each new slide and inserting a picture. All he
really needs is a slideshow where he can click "next" and then talk
about the picture but he wants it to be PowerPoint if possible..
Thanks,
Todd Caughey
Harvey Vogel Mfg. Co.
[Non-text portions of this message have been removed]
Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must
have already linked your email address to a yahoo id to enable access. )
(1) To access the Files Section of our Yahoo!Group for Report Builder
and Crystal Reports and other 'goodies', please goto:
http://groups.yahoo.com/group/vantage/files/.
< http://groups.yahoo.com/group/vantage/files/>
(2) To search through old msg's goto:
http://groups.yahoo.com/group/vantage/messages
(3) To view links to Vendors that provide Vantage services goto:
http://groups.yahoo.com/group/vantage/links
_____
Yahoo! Groups Links
* To visit your group on the web, go to:
http://groups.yahoo.com/group/vantage/
* To unsubscribe from this group, send an email to:
vantage-unsubscribe@yahoogroups.com
<mailto:vantage-unsubscribe@yahoogroups.com?subject=Unsubscribe>
* Your use of Yahoo! Groups is subject to the Yahoo! Terms of
Service < http://docs.yahoo.com/info/terms/> .
[Non-text portions of this message have been removed]
Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must have already linked your email address to a yahoo id to enable access. )
(1) To access the Files Section of our Yahoo!Group for Report Builder and Crystal Reports and other 'goodies', please goto: http://groups.yahoo.com/group/vantage/files/.
(2) To search through old msg's goto: http://groups.yahoo.com/group/vantage/messages
(3) To view links to Vendors that provide Vantage services goto: http://groups.yahoo.com/group/vantage/links
_____
Yahoo! Groups Links
* To visit your group on the web, go to:
http://groups.yahoo.com/group/vantage/
* To unsubscribe from this group, send an email to:
vantage-unsubscribe@yahoogroups.com <mailto:vantage-unsubscribe@yahoogroups.com?subject=Unsubscribe>
* Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service <http://docs.yahoo.com/info/terms/> .
[Non-text portions of this message have been removed]
-Todd C.
-----------------------------------------------------
Sub GetPictures()
Dim myPhotos, myPath As String
myPath = "<place your files location here>"
myPhotos = Dir(myPath + "*.jpg")
Call PlacePicture(myPath, myPhotos)
Do Until myPhotos = ""
myPhotos = Dir
If myPhotos <> "" Then
ActiveWindow.View.GotoSlide Index:=ActivePresentation.Slides.Add(Index:=1, Layout:=ppLayoutBlank).SlideIndex
Call PlacePicture(myPath, myPhotos)
End If
Loop
End Sub
Sub PlacePicture(myPath, myPhotos)
ActiveWindow.Selection.SlideRange.Shapes.AddPicture(FileName:=myPath + myPhotos, LinkToFile:=msoFalse, SaveWithDocument:=msoTrue, Left:=72, Top:=78, Width:=640, Height:=480).Select
ActiveWindow.Selection.ShapeRange.Align msoAlignCenters, True
ActiveWindow.Selection.ShapeRange.Align msoAlignMiddles, True
End Sub
-----Original Message-----
From: Brandon Murch [mailto:bmurch@...]
Sent: Monday, January 17, 2005 10:21 AM
To: vantage@yahoogroups.com
Subject: RE: [Vantage] [OT] PowerPoint - Bulk Picture Import
If he insists on using PowerPoint, there is a program called Image
Importer Wizard. I believe there is a free trial period. The website
is http://skp.mvps.org/iiwdnload.htm I have never used it personally,
but have some colleagues who recommend it.
Hope this helps,
Brandon R Murch
Supervisor of Information Technology
WindStone Medical Packaging
406.259.6387
bmurch@... <mailto:bmurch@...>
-----Original Message-----
From: Todd Caughey [mailto:caugheyt@...]
Sent: Monday, January 17, 2005 8:30 AM
To: vantage@yahoogroups.com
Subject: [Vantage] [OT] PowerPoint - Bulk Picture Import
Our president just came back from a business trip with 73 pictures he
wants made into a PowerPoint (2000) presentation. Anyone know of a
method to "bulk" import the .jpg files as slides? Otherwise it gets a
really tedious creating each new slide and inserting a picture. All he
really needs is a slideshow where he can click "next" and then talk
about the picture but he wants it to be PowerPoint if possible..
Thanks,
Todd Caughey
Harvey Vogel Mfg. Co.
[Non-text portions of this message have been removed]
Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must
have already linked your email address to a yahoo id to enable access. )
(1) To access the Files Section of our Yahoo!Group for Report Builder
and Crystal Reports and other 'goodies', please goto:
http://groups.yahoo.com/group/vantage/files/.
< http://groups.yahoo.com/group/vantage/files/>
(2) To search through old msg's goto:
http://groups.yahoo.com/group/vantage/messages
(3) To view links to Vendors that provide Vantage services goto:
http://groups.yahoo.com/group/vantage/links
_____
Yahoo! Groups Links
* To visit your group on the web, go to:
http://groups.yahoo.com/group/vantage/
* To unsubscribe from this group, send an email to:
vantage-unsubscribe@yahoogroups.com
<mailto:vantage-unsubscribe@yahoogroups.com?subject=Unsubscribe>
* Your use of Yahoo! Groups is subject to the Yahoo! Terms of
Service < http://docs.yahoo.com/info/terms/> .
[Non-text portions of this message have been removed]
Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must have already linked your email address to a yahoo id to enable access. )
(1) To access the Files Section of our Yahoo!Group for Report Builder and Crystal Reports and other 'goodies', please goto: http://groups.yahoo.com/group/vantage/files/.
(2) To search through old msg's goto: http://groups.yahoo.com/group/vantage/messages
(3) To view links to Vendors that provide Vantage services goto: http://groups.yahoo.com/group/vantage/links
_____
Yahoo! Groups Links
* To visit your group on the web, go to:
http://groups.yahoo.com/group/vantage/
* To unsubscribe from this group, send an email to:
vantage-unsubscribe@yahoogroups.com <mailto:vantage-unsubscribe@yahoogroups.com?subject=Unsubscribe>
* Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service <http://docs.yahoo.com/info/terms/> .
[Non-text portions of this message have been removed]