PPT97: Slide Images on Notes Pages Don't Print

• Microsoft PowerPoint 97 For Windows

SYMPTOMS

If you open a Microsoft PowerPoint version 4.0 presentation in Microsoft PowerPoint 97 for Windows and then attempt to print the Notes pages, the slide images on the Notes pages may not print. In addition, if you click Black And White on the View menu, the slide images may disappear from the Slide Miniature window.

CAUSE

The slide images on the Notes pages do not contain border formatting.

WORKAROUND

To work around this behavior, use one of the following methods:

Method 1: Download and Run a Macro to Print the Images on Notes Pages

Prntimg.exe

http://www.microsoft.com/downloads/search.asp

Method 2: Add a border to the slide images in PowerPoint 97

1. On the View menu, point to Master, and then click Notes Master.



2. Click the slide image to select it.



3. On the Format menu, click Colors And Lines.



4. In the Color list, select any color sample other than No Line or White.
   
   NOTE: If you select white as the color sample, you will not receive the desired results.



5. Click OK.



6. On the View menu, click Notes Page.



7. Repeat steps two through five for each individual Notes page in the presentation.

STATUS

Microsoft has confirmed this to be a problem in the Microsoft products listed at the beginning of this article.

MORE INFORMATION

Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft Support professionals can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific needs. If you have limited programming experience, you may want to contact the Microsoft fee-based consulting line at (800) 936-5200. For more information about the support options available from Microsoft, please see the following page on the World Wide Web:

http://www.microsoft.com/support/supportnet/overview/overview.asp

''''''''''''''''''''''''''''''''''''''''''''''''
'
' If you imported a presentation from PowerPoint 4.0
' that contains Notes pages with images, they may not
' print. However, you can use the following macro to
' work around this problem and print the Notes pages.
'
' For additional information, please see the following
' article in the Microsoft Knowledge Base:
'
' ARTICLE-ID: Q171328
' TITLE     : PPT97: Slide Images on Notes Pages Don't Print
'
''''''''''''''''''''''''''''''''''''''''''''''''
Sub CorrectNotesPages()
'
' Macro recorded 2/27/98 by David Craig
'
    Dim shpShape As Shape
    Dim lSlideCount As Long
    
    ' Change the view to Notes Page view.
    ActiveWindow.ViewType = ppViewNotesPage
    
    ' Loop though each slide in the presentation.
    For lSlideCount = 1 To ActiveWindow.Presentation.Slides.Count
        ' Select the slide.
        ActiveWindow.View.GotoSlide Index:=lSlideCount
        
        ' Select all shapes on the slide.
        ActiveWindow.Selection.SlideRange.Shapes.SelectAll
        
        ' Loop though all selected shapes.
        For Each shpShape In ActiveWindow.Selection.ShapeRange
            With shpShape
                ' If the shape is a place holder...
                If .Type = msoPlaceholder Then
                    ' and it is a title placeholder...
                    If .PlaceholderFormat.Type = ppPlaceholderTitle Then
                        ' then apply line formatting to it.
                        .Line.Visible = msoTrue
                        .Line.ForeColor.SchemeColor = ppForeground
                        .Line.BackColor.RGB = RGB(255, 255, 255)
                        .Line.Style = msoLineSingle
                        .Line.DashStyle = msoLineSolid
                        .Line.Weight = 1#
                    End If
                End If
            End With
        Next shpShape
    Next lSlideCount
End Sub 

Additional query words: powerpnt kbprint kbusage upgrade migrate 4.00 ppt4 ppt8 ppt8.0 8.00 missing blank empty space notes print mac

Keywords : kbgraphic kbinterop kbdta kbconversion
Version : WINDOWS:97
Platform : WINDOWS
Issue type : kbprb