I have two simple macros in MS Word 2010:
Sub Home() ' Bound to C-a :) Selection.HomeKey Unit:=wdLine End Sub Sub End() ' Bound to C-e :) Selection.EndKey Unit:=wdLine End Sub
in the spirit of this old post.
Is there any way of having this type of functionality on PPT? I’ve done a fair amount of VBA on Excel but close to 0 on PPT and can’t figure this out. I was trying the following:
Sub Home() Set Parent = ActiveWindow.Selection.Parent Start = ActiveWindow.Selection.TextRange.Text = "changed" Line = 0 e = 0 Do While (e < Start) Line = Line + 1 e = e + Parent.TextForm.Lines(e, 1).Length Loop ->Parent.TextForm.Lines(e, 1).Select End Sub
I get an error on the indicated line. Is there a simpler (i.e., single command like in DOC) way to accomplish this.