There seems to me some MSoftie Weirdness though.
Try this
Start with say a three slide pres
ctrl click slide 1
Next ctrl click Slide 3
Run this
Sub What()
Dim osld As Slide
Set osld = ActiveWindow.Selection.SlideRange(1)
osld.Shapes.AddLabel(msoTextOrientationHorizontal, 10, 10, 100, 10) _
..TextFrame.TextRange = "Right Slide??"
End Sub
Any idea why? I've just had to solve this in a custom add in by detecting
the ctrl key state and making adjustments but this can't be the best answer
--
john ATSIGN PPTAlchemy.co.uk
Free PPT Hints, Tips and Tutorials
http://www.pptalchemy.co.uk/powerpoint_hints_and_tips_tutorials.html
PPTLive Atlanta Oct 11-14 2009