Vba to change font or fontstyle when inserting data from cells into a powerpoint Textbox

[colinduncan]

Hello all,
I have several cells in a worksheet which are exported to ppt using vba as per the snippet shown.
The issue I have, is that I wish to have one or more format changes in the textbox that is produced
Cell 1 has a Title which needs to be produced as say Bold in the ppt textbox
Cells 2, 4, 6, 8, 10 are subtitles and need to be Italic,
and cells 3, 5, 7 ,9, 11 are entry based and will return either a text string or message.

However, the code is also a part of a larger If which transfers many charts and text components, so I need to include the fix within the elseif component so as not to impact on that formatting, or in the event that other formatting is needed.
As the code below standes, it brings across the cell text, and if i include the reference to font bold line (1), then it does give me this. After that...well it is rather random!!

Thanks

Please Login or Register  to view this content.

[colinduncan]

ok figured it. I had read somewhere that insertafter required de-selection which had thrown me off track.
I changed out the font formatting to use paragraphs -

Please Login or Register  to view this content.