стоимость ремонта квартиры . / freelander / металлочерепица москва .
'если
наименование товара по прайсам не совпало, то вносим товар и цену новой фирмы
в соответствующие им ячейки
'это и делает подпрограмма. лежащая ниже
Sub цена2_нов()
'переходим на одну строку вниз
ActiveCell.Cells(2).Activate
'вставляем наименование товара
ActiveCell.Value = товар
'переходим на три ячейки вправо
ActiveCell.Cells(, 3).Activate
'вставляем цену
ActiveCell.Value = цена
'возвращаемся в исходное положение
ActiveCell.Cells(, -1).Activate
End Sub
станок деревообрабатывающий муравей СД-1. / Всю информацию об этом замена стекла iphone Ремонт.
Скачать исходник для проверки работы. РАБОЧИЙ ИСХОДНИК :