Leaving Even Pages Blank

@Linda:
Additional note: the comment in the section that inserts the section breaks suggests to remove a line there to process only from the cursor to the end of the document will not work, as the initial check for the manual page breaks already moves the cursor to the very start of the document.

Hi @Linda:
I have created a macro you asked for. The main part of the macro is quite simple, but it has a possibility to run in an endless loop, therefore I added some check before the actual insertion of breaks is done. Please read the comment lines inside the macro.
Let me know if it worked for you, and do not hesitate to contact me via e-mail (disclosed in this post) or post a comment here if you need any additional help or modification.
'===========================
Sub InsertMyBreaks()
'
' InsertMyBreaks Macro
' This will insert Odd-Page section breaks at the end of all pages, except the last one.
' The main par of the macro would run in an infinite loop, if you have any section breaks or any manual page breaks.
' Because of that the macro will first check for section breaks and for any manual page breaks and exit whent there are any.
' you can use find and replace to remove section breaks and or manual page breaks,
' or use associate macros: RemoveSectionBreaks RemoveManualPageBreaks.


'check for section breaks:
    If ActiveDocument.Sections.count > 1 Then
        MsgBox "Remove sections before running this macro"
        Exit Sub
    End If

' check for manual page breaks:
    Selection.HomeKey Unit:=wdStory
    
    ' Configure the Find operation
    With Selection.Find
        .ClearFormatting
        .Text = "^m" ' The special character code for a manual page break
        .Forward = True
        .Wrap = wdFindContinue ' Continue searching from the start/end of the document
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
        
        ' Execute the Find operation and count occurrences
        If .Execute = True Then
            MsgBox "Remove manual page breaks before running the macro again"
            Exit Sub
        End If
        
    End With

' Insert Odd-Page Section Breaks:
    Selection.HomeKey Unit:=wdStory 'remove this line if you want to process
                                    'only lines after the current insertion point
    Do
        Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, count:=1, Name:=""
        Selection.MoveLeft Unit:=wdCharacter, count:=1
        Selection.InsertBreak Type:=wdSectionBreakOddPage
    Loop Until Selection.Information(wdActiveEndPageNumber) = Selection.Information(wdNumberOfPagesInDocument)
End Sub
'===============================================================================
Sub RemoveSectionBreaks()
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "^b"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub
'========================================================
Sub RemoveManualPageBrakes()
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "^m"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub

@Tony Nixon:
You are right for the printed document, but not if you want the training material to be used on the computer?

I am creating a booklet in which I want each new page to start on the right side. I know I can do this with Section breaks, but my "chapters" are only one page long each. It's a specialty booklet similar to a recipe book concept. Using Section breaks for 45 or 50 pages would "create a lot of complexity to the document" according to Microsoft MVP help. You mention there is a macro that might do something like this. I don't know how to write that, but I'm sure you or someone here does. :) I'd really appreciate it if someone has time! Thank you!

an obvious answer perhaps, but doesn't single sided printing provide a blank page for notes opposite every page of text?