Excel VBA creates PowerPoint Table - how to control bullet points?

fredalina

New Member
Joined
Sep 14, 2011
Messages
46
Right now I have code that creates a table in PowerPoint 3 rows x 2 columns. This is created from a worksheet in Excel, by copying a 2x3 range of cells. Within each cell are multiple lines of text. The problem I face is that the text in PowerPoint needs to be bulleted. I used the following code:
Code:
With oTbl.Cell(lRow, lCol).Shape.TextFrame.TextRange
.Character = 8226
End With

It works, except only the first line of each frame is bulleted. I guess it is treating the carriage returns as, well, carriage returns. Is there a way to overcome this? When I search for vbCrLf, nothing is returned.
 

Excel Facts

Fastest way to copy a worksheet?
Hold down the Ctrl key while dragging tab for Sheet1 to the right. Excel will make a copy of the worksheet.
Try searching for vbVerticalTab and replacing with vbCr, and then apply the bullets.
 
Upvote 0

Forum statistics

Threads
1,223,231
Messages
6,170,884
Members
452,364
Latest member
springate

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top