Как отправить в Printer MSFlexGrid, без PrintForm? - VB

Формулировка задачи:

Как отправить в Printer MSFlexGrid, без PrintForm? т.е. я хочу подготовить отчёт для печати, состоящий из таблицы...

Решение задачи: «Как отправить в Printer MSFlexGrid, без PrintForm?»

textual
                            Листинг программы 
                        

                            Sub Макрос1()
'
' Макрос1 Макрос
' Макрос записан 08.06.01
 
    Workbooks.OpenText FileName:='D:Temp_Dol', Origin:=xlWindows, StartRow _
        :=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
        ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=True, Comma:=False, _
        Space:=False, Other:=False, FieldInfo:=Array(Array(1, 2), Array(2, 2), Array( _
        3, 2), Array(4, 2), Array(5, 2), Array(6, 2), Array(7, 2), Array(8, 2), Array(9, 2), Array(10 _
        , 2))
End Sub
                        