Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Примитивный селект с ценами
 
Цитата
wowick написал:
Т.е. вы каждому помогающему предлагаете создать файл в котором заполнить таблицы двух столбцов минимум до 39 ячейки (78 значений) и на 2-м листе создать вам калькулятор???
на странице "Цены" - таблицы с ценами (2 колонки)
На странице "Калькулятор" - собственной происходит всё действо. Вопрос лишь в том, как в VB прописать вместо жёсткой цены (555 или 333) значение ячейки (например, С15) с другого листа? Я вроде ясно выражался...

Как в данном примере цифру 555 заменить на значение ячейки С15 со страницы Цены в этой же книге?

И что произойдёт, если на странице Цены я перемещу данную ячейку?
Изменено: Dorfman - 27.03.2018 17:03:32 (Добавил файл)
Примитивный селект с ценами
 
Цитата
vikttur написал:
Название темы должно отражать суть задачи. Уточните.
Селект, в котором при выборе товара будет подставляться цена с другого листа книги
Примитивный селект с ценами
 
Cells(39, 5) - это всего лишь ячейка, куда я вывожу данные на листе калькулятора. Частный пример.
Примитивный селект с ценами
 
Всем привет! Помогите плз с селектами.

Имеем на 1-м листе книги с ценами: массив (2 колонки) с данными:
А1 - Товар 1, В1 - цена товара 1
А2 - Товар 2, В2 - цена товара 2
А3 - Товар 3, В3 - цена товара 3
и т.д...

Нужно получить: на 2-м листе книги, где расположен калькулятор:
в определённой ячейке - селект с товаром, в определённой ячейке - цену данного товара, взятую из соответствующего значения на другом листе.

Если прописывать это "жёстко", то в режиме конструктора это выглядело бы так:
Код
Private Sub ComboBox1_Change()
   If ComboBox1.Value = "Профнастил, кв.м" Then
   Cells(39, 5) = 555 // Сюда вместо 555 нужно вставить данные ячейки С15 с другого листа
   Else: ComboBox1.Value = "Металлочерепица, кв.м"
   Cells(39, 5) = 333  // Сюда вместо 333 нужно вставить данные ячейки D15 с другого листа
   End If
End Sub

Как прописать вместо жёсткого значения ячейку (например, С15) с листа "Цены"?
Изменено: Dorfman - 27.03.2018 16:09:07
Страницы: 1
Наверх