Здравствуйте.
Мозг себе сломал и не нашел решения.
есть такая строка
myDoc.tables(3).cell(100+z,y).Range.Text = WB.Worksheets(1).cells(j2,y) & "-----" & WB.Worksheets(1).cells(j2 +1,y)
беру данные из excel, из двух ячеек, вставляю их в таблицу в Word, и нужно чтобы между ними была вместо "-----"
горизонтальная черта InLineShapes.AddHorizontalLineStandart
Заранее спасибо.
Мозг себе сломал и не нашел решения.
есть такая строка
myDoc.tables(3).cell(100+z,y).Range.Text = WB.Worksheets(1).cells(j2,y) & "-----" & WB.Worksheets(1).cells(j2 +1,y)
беру данные из excel, из двух ячеек, вставляю их в таблицу в Word, и нужно чтобы между ними была вместо "-----"
горизонтальная черта InLineShapes.AddHorizontalLineStandart
Заранее спасибо.