ник: puzo
день добрый!
есть файл где-то sfile, до него путь spath
надо выковырять в наш файл кусок размером А91:AP106 при условии, что К91<>""
если делать
For i = 91 To 106
For j = 1 To 42
Cells(i - 90, j) = "='" & spath & "[" & sFile & "]" & "ТЗ'!R" & Trim(Str(i)) & "C" & Trim(Str(j))
Cells(i - 90, j).Value = Cells(i - 90, j).Value
Next j
Next i
то получается ооооочень долго ( файл тот - на серваке, не на нашем компе )
я думаю, что через Range должно быстрее работать, раз он берёт кусок целиком. можно ли ?
попробовал вот так :
Set wb = GetObject(spath & sFile)
Set rRomb = wb.Sheets("ТЗ").Range("A91:AP106")
wb.Close (False)
Range("A1").Value = rRomb.Value ' это я хочу в моём файле уже этот рейндж вставить
не работает, ругается.
что не так написано или на какой форум мне идти спрашивать с такими вопросами ?