Create calendar in Powerpoint 2010

JohnWilson · #3 09-22-2014, 04:24 AM

I would say it's just a PPT table and has been filled in manually (because the formatting is inconsistant)

If a function or macro was used it would likely say 03 - Mar NOT 3-Mar

If you know how to use a macro this will fill in a selected table with consequtive dates.

Code:

Sub fillTable()
Dim otbl As Table
Dim irow As Integer
Dim icol As Integer
Dim inc As Integer
On Error GoTo err
Set otbl = ActiveWindow.Selection.ShapeRange(1).Table
For irow = 2 To otbl.Rows.Count
For icol = 1 To otbl.Columns.Count
inc = inc + 1
With otbl.Cell(irow, icol).Shape.TextFrame2.TextRange
.Text = Format(Now + inc, "dd-mmm-yy")
.Font.Size = 12
End With
Next
Next
Exit Sub
err:
MsgBox "Have you got a TABLE selected?", vbCritical
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Create a windows 8-like scrolling in a powerpoint slide?	johan_lilje	PowerPoint	0	10-01-2013 07:34 AM
How to create a days countdown in powerpoint?	john.kelly11	PowerPoint	3	04-09-2013 09:56 AM
Help! Need VBA solution to create CSV file and export to Google Calendar	mister_audioman	Excel Programming	0	01-12-2012 01:07 PM
Sync Outlook 2010 Calendar to Sharepoint Calendar	paankadu	Outlook	0	12-08-2011 08:25 AM
Create calendar event	groegee	Outlook	1	12-05-2011 09:56 PM