<div>
<div class="content wysiwyg-content">
I have a CommonDialog box in a PowerPoint application and was wondering if its possible to set the InitialDir to the DESKTOP instead of just the C Drive. &nbsp;Is this possible? 
 
Thanks! 
 
Code: 
 
Slide3172.CommonDialog1.CancelError = True 
Slide3172.CommonDialog1.Filter = &quot;PowerPoint Presentations (*.ppt)|*.ppt&quot; 
Slide3172.CommonDialog1.InitDir = &quot;c:\&quot; 
Slide3172.CommonDialog1.ShowSave 
DoEvents 
 
If Slide3172.CommonDialog1.FileName &lt;&gt;&nbsp;&quot;&quot; Then 
&nbsp; &nbsp; ActivePresentation.SaveAs FileName:=Slide3172.CommonDialog1.FileName 
&nbsp; &nbsp; DoEvents 
End If
</div>
</div>

I have a CommonDialog box in a PowerPoint application and was wondering if its possible to set the InitialDir to the DESKTOP instead of just the C Drive. Is this possible?

Thanks!

Code:

Slide3172.CommonDialog1.CancelError = True
Slide3172.CommonDialog1.Filter = "PowerPoint Presentations (*.ppt)|*.ppt"
Slide3172.CommonDialog1.InitDir = "c:\"
Slide3172.CommonDialog1.ShowSave
DoEvents

If Slide3172.CommonDialog1.FileName <> "" Then
 ActivePresentation.SaveAs FileName:=Slide3172.CommonDialog1.FileName
 DoEvents
End If

Powerpoint VBA: Set default CommonDialog path to DESKTOP

Microsoft Office is an integrated suite of applications that includes Outlook, Word, Excel, Access, PowerPoint, Visio and InfoPath, along with a number of tools to assist in making the individual components work together. Coding within and between the projects is done in Visual Basic for Applications, known as VBA.