Помогите правильно разместить данные в Excel-e - VB

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

Подскажите, как автоматом из моей программы вызывать Excel и внести в вызваном документе Excel формата Определенные данные в определённые ячейки Excel-файла? Заранее благодарен

Решение задачи: «Помогите правильно разместить данные в Excel-e»

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

                            Dim AppExcel
Dim wsH As Worksheet
Dim wbO As Workbook
 
    Set AppExcel = CreateObject('Excel.Application')
    Set wbO = AppExcel.Workbooks.Open(TekFol & ' ' & TekFil)
    AppExcel.DisplayAlerts = False
    AppExcel.AlertBeforeOverwriting = False
    Set wsH = AppExcel.Sheets('стр4')
 
wsH.Range('P14').Value = 12
 
    Set wbO = Nothing
    Set wsH = Nothing
    AppExcel.Save
    AppExcel.Quit
    Set AppExcel = Nothing
                        