От кого:	Ronin751
Кому:	stas_nv
Дата:	28 Авг 2015 15:04:00
строка_заполнения - это номер первой пустой строки после заполненных цифра тб_чет записывается с помощью Range в строку с номером строка_заполнения при выборе формулы 1 в колонку , при выборе формулы 2 в колонку ; Вместо range также можно использовать cells. Макрос который я Вам написал и делает именно то, что вы сказали. Он записывает в первую не заполненную ячейку указанного столбца, в зависимости от выбора в КомбоБоксе. Это сделано на тот случай, если Вас будет интересовать конкретно определенный столбец. Если нет то: Private Sub ComboBox1_Change() Dim LastRow As Object 'Находим последнюю заполненную ячейку в столбике А Set LastRow = Лист1.Range("A65536" ) .End(xlUp): With LastRow 'По выбору в комбоБоксе '1) Вносим значение "Значение 1" в ячейку расположенную ' на одну строку вниз и на один столбец вправо ' от последней заполненной ячейки в солбце А If Me.ComboBox1 = "Формула 1" Then .Offset(1, 1).Value = "Значение 1" '2) Вносим значение "Значение 2" в ячейку расположенную ' на одну строку вниз и на два столбца вправо ' от последней заполненной ячейки в солбце А If Me.ComboBox1 = "Формула 2" Then .Offset(1, 2).Value = "Значение 2" '3) Если нечего не выбрано - сообщение If Me.ComboBox1 = "" Then MsgBox ("Выберите формулу!" ) End With End Sub Но не забудьте заполнять столбец А, а то все данные будете вносить в одни и те же ячейки. А тему, лучше бы Вы назвали "Как заполнить последнюю строку по условию в КомбоБокс". Вам бы тогда через 2 минуты помогли. Не забудьте в теме отписаться. Удачи!

Спасибо за ответ.
Подумаю

Прошу прощения! неправильный файл выложил.
Прошу помочь в решении!

Тогда я еще не увидел.
Спасибо

Предложенная тема устраивает??????????????????????????????????
После слова "например"???????????????????????????

Нет, Я обратил внимание, только не понял как поменять тему, например: "использование в макросе обработанных данных из обработчика Combobox"

Короче, в обработчике ComboBox забыл изменить буквы
Исходя из того, какую формулу выбрать, должна заполняться ячейка в столбце "B" (если формула1) или "С" (если формула1)
После того, как userform отработала (.Hide) требуется использовать значения строка_закр_неч, но не получается, потому что оно почему то EMPTY. Чем сделать, чтобы данные в макрос перекачивались для меня пока загадка!!!

Спасибо!

Нужно, чтобы обработанные данные использовались в range в качестве названия столбца

Клещи не подсунуть!!
пишу
Range(строка_закр_неч & строка_заполнения) = тб_неч
то
строка_закр_неч является пустой

В обработчике настроил переменные

но в макросе их нет.
Вопрос: Как вытащить их значения из обработчика?

Заранее спасибо.

Здравствуйте!
Имеется файл с кучей листов с диаграммами. требуется изменить диапазон.
Нашел функцию:
Worksheets(лист).ChartObjects("Прогноз").Chart.SetSourceData Sheets(лист).Range("U" & строка_начало & ":U" & строка_конец & ",V" & строка_начало & ":V" _
& строка_конец & ",W" & строка_начало & ":W" & строка_конец & ",AE" & строка_начало & ":AE" & строка_конец & ",AF" & строка_начало & ":AF" & строка_конец _
& ",AI" & строка_начало & ":AI" & строка_конец & ",AJ" & строка_начало _ & ":AJ" & строка_конец & ",AK" & строка_начало & ":AK" & строка_конец), xlColumns
Но при ее применении некоторые данные перескакивают на другую ось и не отображаются, приходится их дорисовывать.
Помогите, пожалуйста, что требуется добавить или изменить, чтобы в рядах только менялись диапазоны, и все рисовалось как требуется.
Заранее спасибо!!!

Спасибо

Здравствуйте!
Имеется файл с кучей листов с диаграммами. требуется изменить диапазон.
Нашел функцию:
Worksheets(лист).ChartObjects("Прогноз").Chart.SetSourceData Sheets(лист).Range("U" & строка_начало & ":U" & строка_конец & ",V" & строка_начало & ":V" _
     & строка_конец & ",W" & строка_начало & ":W" & строка_конец & ",AE" & строка_начало & ":AE" & строка_конец & ",AF" & строка_начало & ":AF" & строка_конец _
     & ",AI" & строка_начало & ":AI" & строка_конец & ",AJ" & строка_начало _ & ":AJ" & строка_конец & ",AK" & строка_начало & ":AK" & строка_конец), xlColumns
Но при ее применении некоторые данные перескакивают на другую ось и не отображаются, приходится их дорисовывать.
Помогите, пожалуйста, что требуется добавить или изменить, чтобы в рядах только менялись диапазоны, и все рисовалось как требуется.

Спасибо!

Огромное спасибо!!!!
Мозги сломал.
Вопрос как работает оператор Like ?? для чего его можно использовать?

Нужен макрос.
Имеются несколько открытых файлов. Нужно определить есть ли в названии какого файла слово "поезд" и если оно есть то выбрать этот файл.
Никак не могу сделать. прошу помощи