Get The Shape Position In Microsoft PowerPoint

1. Type this following Microsoft Office PowerPoint VBA or macro in PowerPoint VBA Editor:
Sub getShapePosition()
'-- Declare variables
Dim oPPApp As New PowerPoint.Application
Dim oShp As PowerPoint.Shape


'-- Set an object variable to shape that index is 1
Set oShp = oPPApp.ActivePresentation.Slides(oPPApp.ActiveWindow.Selection.SlideRange.SlideIndex).Shapes(1)
'-- Print out the Shape position on Immediate window
Debug.Print oShp.Left
Debug.Print oShp.Top
End Sub
2. Run the above VBA code by click Run > Run Sub/User Form menu.

Related Post

Show The Developer Tab Of The Microsoft Office PowerPoint

Powerpoint Text Alignment

To Make My Slide Number Bigger In PowerPoint Classic

Learn PowerPoint Classic Workspace

Ribbon In Microsoft Word With Picture

VBA Word 1

Ribbon In Microsoft Word With Picture

VBA Microsoft Excel 1

How to know Microsoft Access Database File Version

Study About Microsoft Office 1

How To Type Accent In Computer 1

Visual Basic 6 Menu Control Design Table

Istilah Komputer dan Internet Dalam Bahasa Baku