Добавление новых значений в закрытый Excel - PullRequest
0 голосов
/ 30 апреля 2020

Пытался добавить значение к закрытому Excel, но я получил ошибку времени выполнения '91': переменная объекта или блок не установлен.

Код:

Dim xl0 As New Excel.Application

  Dim xlw As New Excel.Workbook

  Dim xlsh As Worksheet



  Set xlsh = Sheet3

  Set xlw = xl0.Workbooks.Open("\\Addition\RCA.xlsx")

  xl0.Worksheets.Add

  xl0.xlsh.Cells(1, 1) = RANGECheck

  xl0.xlsh.Cells(1, 2) = RCAInput

  xlw.save

  xlw.Close

  Set xl0 = Nothing

  Set xlw = Nothing

Также, выше код вводит значение в первую строку, что мы можем сделать, чтобы добавить значение после последней строки, имеющей значение?

...