PickUp / Apply paragraph formatting in PowerPoint 2007

Question

In PowerPoint 2007, PickUp / Apply does not fix paragraph formatting, such as bullet formatting, when used programmatically (VBA). Adding the PickUp and Apply buttons to the Quick Access Toolbar (QAT), and trying this manually manually confirms this.

However, if you triple click on the marked paragraph and select PickUp from QAT, navigate to another brand in a different form, double-click it, then select "Apply" from QAT, marker formatting is successfully applied.

Programmatically, my approach was to select all paragraphs in the source form and use PickUp, then select all paragraphs in the target form and use Apply. This did not work. For example, I tried several options:

'oSource.TextFrame.TextRange.Select
oSource.TextFrame.TextRange.Paragraphs.Select
oSource.PickUp

'oTarget.TextFrame.TextRange.Select
oTarget.TextFrame.TextRange.Paragraphs.Select
oTarget.Apply

So, how can I get PopwerPowin 2007 to apply paragraph formatting in one form to another without copying each Paragraph property individually using PickUp / Apply or some other technique (in VBA, of course)?