Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 1903 След.
[ Закрыто] Выпадающий список, Изменение в макрос для выпадающего списка
 
Цитата
Energo73 написал:
ак он и есть модератор, зачем просить
Всё верно - больше просить не буду.
[ Закрыто] Выпадающий список, Изменение в макрос для выпадающего списка
 
New, ну куда Вы опять спешите?
[ Закрыто] Выпадающий список, Изменение в макрос для выпадающего списка
 
Energo73, ведь не первый раз на форуме - что можно понять из такого названия темы? Предложите новое - модераторы поменяют.
Обновление 18.06
 
Опять у меня счётчик умыкнули ))
Подстановка данных в ячейку в зависимости от данных в искомом столбце
 
Дуmaxim.im, Вы на форуме по Excel и файлы здесь показывают соответствующие, а не картинки.
Перенос курсора на заданную ячейку по событию: нажатия на клавиатуре клавишу Enter
 
См. вариант.
Перенос курсора на заданную ячейку по событию: нажатия на клавиатуре клавишу Enter
 
А справка по Application.OnKey не помогает?
Перенос курсора на заданную ячейку по событию: нажатия на клавиатуре клавишу Enter
 
Цитата
Ramzyy написал:
3. Нажимаю на клавиатуре клавишу  Enter 4. Курсор перенеся на ячейку В2 (для примера)
Вижу два варианта:
1. Перехватывать нажатие Enter.
2. Отслеживать активацию ячейки А2.
Перенос курсора на заданную ячейку по событию: нажатия на клавиатуре клавишу Enter
 
Название поменял. А теперь отреагируйте  на #3 - Вам же перестанут помогать при таком отношении.
Перенос курсора на заданную ячейку по событию: нажатия на клавиатуре клавишу Enter
 
По шагам - это в сообщении. А я про название темы. Уточните - модераторы поменяютю
Перенос курсора на заданную ячейку по событию: нажатия на клавиатуре клавишу Enter
 
Цитата
Ramzyy написал:
Перенос курсора после на заданную ячейку
После чего?
Поиск совпадений по столбцам, Добрый день! Помогите с макросом)))
 
См. вариант.
И не нужно писать через строку - исправьте своё сообщение.
Передача параметров в в sql-запрос через NativeQuery
 
Цитата
Дмитрий Осипов написал:
Передача параметров
Откуда и куда? Предложите новое название темы - модераторы поменяют. И кол следует оформлять соответствующим тегом? ищите такую кнопку (см. скрин) и исправьте своё сообщение.
Номер строки с максимальным значением из диапазона, VBA
 
Цитата
New написал:
не знают, что такое циклы
Но тогда они не узнают ничего про Find )
А это быстрее.
Номер строки с максимальным значением из диапазона, VBA
 
Написал аналогичное - Карен опередил )
Цикл не нужен.
Заполнение пустых ячеек значениями с нижних ячеек с учетом обїединенніх ячеек
 
ПЖЛ.
Заполнение пустых ячеек значениями с нижних ячеек с учетом обїединенніх ячеек
 
Код
Sub Macro1()
Dim i  As Long, j As Long, x
    For j = 1 To 4
       x = Cells(21, j).Value
       For i = 7 To 20
        If Cells(i, j).Value = "" Then Cells(i, j) = x
       Next
    Next
End Sub
Заполнение пустых ячеек значениями с нижних ячеек с учетом обїединенніх ячеек
 
А Вы перечитайте свой пост:
Цитата
ГДВ написал:
Изобразите, как это будет в макросе.

Это приказ, а не просьба...
Заполнение пустых ячеек значениями с нижних ячеек с учетом обїединенніх ячеек
 
Разрешите приступить&
Заполнение пустых ячеек значениями с нижних ячеек с учетом обїединенніх ячеек
 
Вы опять поменяли исходные данные...
Тогда перебирать вложенным циклом строк. И, если ячейка пустая - присвоить значение из 21 строки.
Заполнение пустых ячеек значениями с нижних ячеек с учетом обїединенніх ячеек
 
Изменил макрос в #6/.
Заполнение пустых ячеек значениями с нижних ячеек с учетом обїединенніх ячеек
 
Код
Sub Macro1()
Dim LastRow As Long, j As Long
    For j = 1 To 4
        LastRow = Cells(21, j).End(xlUp).Row + 1
        If LastRow = 7 Then LastRow = 21
        If LastRow < 21 Then
            Range(Cells(LastRow, j), Cells(20, j)).Value = Cells(21, j)
        End If
    Next
End Sub
Заполнение пустых ячеек значениями с нижних ячеек с учетом обїединенніх ячеек
 
А нельзя было эти "некие уточнения" обговорить сразу? Да и в примере показать?
Заполнение пустых ячеек значениями с нижних ячеек с учетом обїединенніх ячеек
 
ГДВ, а зачем жать столько раз на Enter? Зачем в сообщении столько пустых строк? Приведите свой пост в порядок.

Вариант:
Код
Sub Macro1()
Dim LastRow As Long, j As Long
    LastRow = Cells(Rows.Count, 1).End(xlUp).Row
    For j = 1 To 4
        Range(Cells(8, j), Cells(LastRow - 1, j)).Value = Cells(LastRow, j)
    Next
End Sub
Использование техники в работах. Составить диаграмму Ганта
 
Добавлю: Borrusale,  рановато Вам ещё тут.
Заполнить макросом новую таблицу значениями из имеющейся таблицы
 
В работе.
Готово.
Управление диапазоном ссылки при помощи формулы ПОИСКПОЗ
 
IKor, тогда предложите новое название темы. Мне ведь неизвестно, важно для автора ПОИСКПОЗ или нет.
И часто ли Вы видите, чтобы я придирался к названиям? )
Управление диапазоном ссылки при помощи формулы ПОИСКПОЗ
 
Максим В., автору нужно с помощью ПОИСКПОЗ. Где в Вашем варианте ПОИСКПОЗ? Прикручивайте )
Управление диапазоном ссылки при помощи формулы ПОИСКПОЗ
 
ZakZak, а без цитат никак?  Да и не5 цитата это, а полная копия сообщения Михаила. Запомните: кнопка цитирования не для ответа!
Заполнить макросом новую таблицу значениями из имеющейся таблицы
 
С листа тяжело воспринимается задача. Можем поговорить в Скайпе?
Пишу в личку.
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 1903 След.
Наверх