Надо изучить методы COM-объекта Excel https://docs.microsoft.com/ru-ru/office/vba/api/excel.oleobject и через OLE дёргать нужные в каком нибудь IC, или компонент сделать.
https://forum.mista.ru/topic.php?id=265330
Dim objExcel, objWorkbook, objRange
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
Set objWorkbook = objExcel.Workbooks.Open("%1")
Set objWorksheet = objWorkbook.Worksheets(1)
objWorksheet.Activate
' тут с верхних точек подставляй нужные значения
Set objRange = objExcel.Range("A1","A1")
objRange.Font.Size = 14
objRange.Font.Color = RGB(0, 0, 255) ' RGB(red, green, blue)
Set objRange = objExcel.Range("A2","A5")
objRange.Interior.ColorIndex = 36
Set objRange = objExcel.ActiveCell.EntireColumn
objRange.AutoFit()
Поиск
Друзья
Администрация