Searched refs:aPres (Results 1 – 5 of 5) sorted by relevance
100 Dim aPres As Presentation117 Set aPres = Presentations.Open(fileName:=fileName, ReadOnly:=True)128 SetDocProperties mAnalysis, aPres, fso130 Analyze_SlideIssues aPres131 Analyze_Macros mAnalysis, userFormTypesDict, aPres143 aPres.SaveAs preparedFullPath149 If Not aPres Is Nothing Then 'If Not IsEmpty(aDoc) Then150 aPres.Saved = True151 aPres.Close153 Set aPres = Nothing
30 Dim aPres As Presentation variable31 Set aPres = Presentations("_OOoDocAnalysisPPTDriver.ppt")32 ppStrings.InitStringData (GetResourceDataFileName(aPres.path))
141 Dim aPres As Presentation variable142 Set aPres = Presentations("_OOoDocAnalysisPPTDriver.ppt")143 ppStrings.InitStringData (GetResourceDataFileName(aPres.path))
132 Any aPres = xProp->getPropertyValue(sPreservePropertyName); in ResolveId() local134 xProp->setPropertyValue(sPreservePropertyName, aPres); in ResolveId()
2665 Dim aPres As PowerPoint.Presentation2679 If Not CheckForAccesToPPVBProject(pp, aPres) Then2696 Set aPres = pp.Presentations(1)2698 Set ppSlideHidden = aPres.Slides(2)2732 Set aPres = Nothing
Completed in 37 milliseconds