![]() ![]() StrSel = strSel & strTitle & str & vbNewLine Str = ActivePresentation.Slides(slideOrder(scount)).Shapes("Configuration"). StrTitle = ActivePresentation.Slides(slideOrder(scount)).Shapes("UseCase"). + ": " If ActivePresentation.Slides(slideOrder(scount)).Shapes.HasTitle Then ![]() 'Collect all the IDs of the selected slides VBA MAcro to generate "table of contents with hyperlinks" automatically in a ppt:įunction TableOfContent(count As Integer)ĭim strSel As String, strTitle As String, strb As String, strtemp As String, str As Stringĭim index As Integer, indexcount As Integer, slidecount As Integer
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |