Powerpoint VisualBasic Script

Sub background()
    With ActivePresentation.HandoutMaster.Background
        .Fill.ForeColor.RGB = RGB(255, 255, 255)
        .Fill.BackColor.SchemeColor = ppAccent1
        .Fill.UserPicture "d:\n.jpg"
    End With
End Sub