| Код |
|---|
Sub Новая строка
Dim i&, lrow&
Rows(2).Insert
Sheets("2").Range("A2:F2").Copy Range("A2")
lrow = Range("a" & Rows.Count).End(xlUp).Row
ReDim arr(1 To lrow - 1, 0)
For i = 1 To UBound(arr)
arr(i, 0) = i
Next i
Range("a2").Resize(lrow - 1) = arr
End Sub
|
Запуск макроса из строки с созданием файла из ячейки
Запуск макроса из строки с созданием файла из ячейки
Создание формы заказа VBA для предприятия, VBA форма
Создание формы заказа VBA для предприятия, VBA форма
|
19.02.2017 10:22:22
Здравствуйте
Ищу исполнителя для выполнения работы по созданию VBA скрипта. Производство дверей.
На данный момент не нашли идеальной системы полностью удовлетворяющую наши требования от чего принято решения делать под себя. Жду предложений. |
|
|
|
|