chellinsky

Private Sub Roadmap_Click()

    On Error GoTo Err_Handler

    Dim db As Database, rs As Recordset
    Dim wdObj As Word.Application
    Dim wdDoc As Word.Document
    Dim lgNumRows As Long
    Dim iRow As Integer
    Dim iColumn As Integer