Microsoft Office Forums

Go Back   Microsoft Office Forums > >

Reply
 
Thread Tools Display Modes
  #1  
Old 01-26-2012, 07:39 AM
mejasmine mejasmine is offline PowerPoint 2007- Reapply Master to Notes Page but Not to the Text within the Textbox/ Windows XP PowerPoint 2007- Reapply Master to Notes Page but Not to the Text within the Textbox/ Office 2007
Novice
PowerPoint 2007- Reapply Master to Notes Page but Not to the Text within the Textbox/
 
Join Date: Jan 2012
Posts: 1
mejasmine is on a distinguished road
Default PowerPoint 2007- Reapply Master to Notes Page but Not to the Text within the Textbox/

Hi, Please help me. I have to re-apply master to the notespage view in powerpoint 2007 and at times the the slide count is huge. I want the macro to reapply master to all slides but not to the text as the text contains special formatting like, bold, italics, hyperlinks, underline and bullets. I found a re-apply master macro made by David Foster, but it formats the text also, Please help.

The manual steps we follow in the notes page view are:



First , if there is a text box and it has text then Copy and cut the text (so that the text formatting is not lost), then right click outside and go to notes layout and tick all the three options (Image, Body and Reapply Master.) and click OK, this will reapply master to the slide. Then paste the text back into the text box; and the re-apply master is also done for slides without text boxes where we just right click ad apply re-apply master.


Below is a Macro to re-apply master which I found on Internet. It will reapply Master BUT also removes the formatting from the Text BOX. Which I do not want. Please help with the coding.


Sub ApplyMasterToNotes()

' Modified version of code originally posted to

' msnews.microsoft.com public newsgroups by

' David Foster in May of 1999

Dim ctl As CommandBarControl

Dim oSl As Slide

' 700 is the control ID for Layout

Set ctl = CommandBars.FindControl(Id:=700)

ActiveWindow.ViewType = ppViewNotesPage

If (ctl Is Nothing) Then

MsgBox "command not available"

Exit Sub

End If

For Each oSl In ActivePresentation.Slides

' go to the current slide

ActiveWindow.View.GotoSlide (oSl.SlideIndex)

DoEvents

' Bring up the dialog

ctl.Execute

DoEvents

' send it the needed keystrokes

SendKeys "%r{enter}"

DoEvents

Next

End Sub
Reply With Quote
Reply

Thread Tools
Display Modes


Similar Threads
Thread Thread Starter Forum Replies Last Post
How to center text vertically in rectangle/ textbox alexcalgary Word 4 12-06-2021 01:03 AM
PowerPoint 2007 Textbox Lock / Form Issues LTechie12 PowerPoint 0 01-08-2012 02:08 PM
PowerPoint 2007- Reapply Master to Notes Page but Not to the Text within the Textbox/ powerpoint 2007 slide master portia PowerPoint 1 11-22-2011 03:03 AM
Word 2003 - Textbox being moved by text cyberpaper Word 0 10-06-2010 11:49 PM
PowerPoint 2007- Reapply Master to Notes Page but Not to the Text within the Textbox/ Textbox & Edit Paste text MikeWM Word VBA 1 08-20-2009 06:21 PM

Other Forums: Access Forums

All times are GMT -7. The time now is 02:39 AM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2023, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2023 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft