Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » Апострофф
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 27 След.
Господа, форум жесточайше тормозит.
 
#
18.03.2025 13:57:39
Есть проблема, подтверждаю.
И есть выход - пункт Обновления работает оперативнее.
Правда, не показывает просмотренные темы.
https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=active
 
Перейти    
VBA Знает ли макрос, какой внешний файл его запустил.
 
#
08.03.2025 15:40:37
Нет. Макрос не знает даже, какой макрос из его же проекта его вызвал.
Единственно - он может угадать, какая кнопка его запустила. И то не всегда.
 
Перейти    
Файл с базой данных
 
#
17.02.2025 17:37:09
Пишу в л/с.

Сделано, оплачено.
Изменено: Апострофф - 28.02.2025 12:18:42
 
Перейти    
Собрать несколько листов на один с постоянным обновлением, Собрать несколько листов на один с постоянным обновлением
 
#
31.01.2025 22:42:38
Здравствуйте.
Пишу в л/с...
В работе.
В расчете.
Можно иметь дела! :)
Изменено: Апострофф - 02.02.2025 15:48:58
 
Перейти    
Вставка даты введя только день месяца
 
#
24.01.2025 08:03:23
Цитата
Kuzmich написал:
   Application.EnableEvents = False
If Target.Count > 1 Then Exit Sub
Местами бы поменять эти строки?
И у Сани та же беда.
Можете без обработчика событий остаться.
Изменено: Апострофф - 24.01.2025 08:06:41
 
Перейти    
Что не так при записи книги без сохранения?, После изменения Sheet закрываю WorkBook без сохранения, но записывает с изменение
 
#
08.01.2025 10:01:06
Zolotko, в приведенном коде ошибок вроде нет (кроме бесконечного цикла с неизменным sFiles).
Для предметной помощи лучше приложите проблемный файл с макросом.
 
Перейти    
Легкий макрос для шаблона.
 
#
12.12.2024 15:16:52
Если что - я ни при чём.
Очередная крыса отписаться забыла?
 
Перейти    
Легкий макрос для шаблона.
 
#
12.12.2024 10:15:00
Здравствуйте.
Пишу в Л/С.
Изменено: Апострофф - 12.12.2024 15:19:30
 
Перейти    
При выходе из InputBox переходит в ручной режим пересчета формул
 
#
16.11.2024 10:52:14
Код
Если ПохожеНаЧисло(Y) то
  вычисляем Y
Иначе
  выход
КонецЕсли
Изменено: Апострофф - 16.11.2024 10:54:14
 
Перейти    
При выходе из InputBox переходит в ручной режим пересчета формул
 
#
16.11.2024 10:29:33
Код
If IsNumeric(Y) Then

вместо
Код
If Y <> "" Then

и будет ещё краше :)
Изменено: Апострофф - 16.11.2024 10:31:21
 
Перейти    
При выходе из InputBox переходит в ручной режим пересчета формул
 
#
16.11.2024 10:05:09
Строка
Код
With Application: .ScreenUpdating = True: .EnableEvents = True: .DisplayAlerts = True: End With

не выполнится при
Код
Exit Sub

и опять появятся вопросы?

Так бы я сделал-
Скрытый текст
Изменено: Апострофф - 16.11.2024 10:10:31
 
Перейти    
Перебор вариантов двух списков, Требуется перебрать все варианты из двух столбцов
 
#
03.11.2024 21:54:50
Цитата
BATYA_Kirov написал:
Списки конечно значительно длиннее.
Ну это уточнение в корне все меняет.
Мое решение никаким образом подогнать не получится, ведь надо будет менять пределы циклов и RRR :cry:
Изменено: Апострофф - 03.11.2024 22:08:05
 
Перейти    
Перебор вариантов двух списков, Требуется перебрать все варианты из двух столбцов
 
#
03.11.2024 21:49:09
Код
RRR = 9
For R = 3 To 5
  For RR = 3 To 5
    Cells(RRR, 1) = Cells(R, 1)
    Cells(RRR, 2) = Cells(RR, 2)
    RRR = RRR + 1
  Next RR
Next R
 
Перейти    
Сделать сводную таблицу с помощью Power Pivot/Power Query
 
#
10.10.2024 23:53:02
http://www.excelworld.ru/forum/6-53793-1#351078
 
Перейти    
Вакансия разработчика VBA, Ищу помощника в разработке макросов на постоянной или проектно/постоянной основе
 
#
06.10.2024 13:56:56
Здравствуйте!
Цитата
Татьяна Агафонова написал:
с возможностью по запросу приехать в офис
Насколько часты будут запросы?
Как быстро надо будет приехать?
Транспортные расходы (6000-8000р за вызов) будут оплачены?
 
Перейти    
Как выделить определенное число строк вниз, Как выделить определенное число строк вниз
 
#
01.10.2024 10:12:33
Код
ACTIVECELL.OFFSET(1818)=ACTIVECELL

Цитата
Как выделить определенное число строк вниз
А выделять зачем?
Изменено: Апострофф - 01.10.2024 10:15:22
 
Перейти    
Исправить макрос, для корректной работы. (заверешение макроса при закрытии файла)
 
#
16.08.2024 12:07:39
Пишу в л/с.

Проблема решена.
Изменено: Апострофф - 16.08.2024 14:09:37
 
Перейти    
Проект VBA., Есть не большой проект, нужен специалист автоматизировать работу с документами, ссылки для просмотра, ответы на них и т.д.
 
#
12.08.2024 10:35:34
Цитата
Parviz_01 написал:
бюджет думаю зависит от качества
Кто будет "мерять" качество?
 
Перейти    
Сделать макрос, Сделать макрос транспонирования
 
#
10.08.2024 11:25:34
ilya_515, здравствуйте.
Пишу в л.с
В работе.
Изменено: Апострофф - 10.08.2024 12:15:54
 
Перейти    
Написание макросов для Excel
 
#
31.07.2024 13:16:41
Пишу в л/с...

Заказ свободен, хотелок много, ясности мало :oops:
Изменено: Апострофф - 31.07.2024 17:17:16
 
Перейти    
Оценка кол-ва машин для перевозки груза
 
#
26.06.2024 18:43:27
insaidd, здравствуйте.
Пишу в л/с.
В работе.
Вопрос закрыт.
Изменено: Апострофф - 02.07.2024 12:19:30
 
Перейти    
Пополняемый открывающийся список в пользовательской форме VBA
 
#
09.06.2024 19:32:03
Добавляете TextBox и кнопку с одной строкой кода.
 
Перейти    
Астрология в Excel, положения астрономических тел
 
#
15.05.2024 21:47:02
deleted
Изменено: Апострофф - 15.05.2024 23:08:02
 
Перейти    
Как восстановить удалённую видеонстпукцию?
 
#
11.05.2024 22:23:24
Цитата
Счастливчик написал:
очистил, снова что-то удалил, опять очистил
FORMAT C: не пробовали?
 
Перейти    
Как заполнить числовой счет недостающими цифрами?
 
#
11.05.2024 17:47:14
Цитата
Excaz написал:
цифры (118, 130, 134, 139, и.т.д, их там много) . Я все изложил ясным русским языком (не на китайском же)
Excaz, в ясном русском языке всего 10 цифр.
И мне вообще кажется странным, что после откровенных наездов на отвечающих (типа вы бестолочи или чё?) вам ещё кто то отвечает.
Изменено: Апострофф - 11.05.2024 17:59:09
 
Перейти    
Замена однотипных задач на одну, Оптимизация макроса
 
#
02.05.2024 10:40:41
Кажется так -
Код
For C = 1 To 7
  Sheets("Доп").Cells(12 + C, N) = WorksheetFunction.Index((Sheets("Склады").Range("Y2:AG" & Cells(Rows.Count, 25).End(xlUp).Row)), _
                               (WorksheetFunction.Match(Sheets("Доп").Range("B" & N), Sheets("Склады").Range("Y2:Y" & Cells(Rows.Count, 25).End(xlUp).Row), 0)), _
                               (WorksheetFunction.Match(Sheets("Доп").Cells(12 + C, 2), Sheets("Склады").Range("Y1:AG1"), 0))) 'потребность по складу 1
Next C

Возможно, чего то недоглядел?
 
Перейти    
[ Закрыто] Что случилось с икрой Кижуча?
 
#
28.04.2024 22:42:56
Счастливчик, можно!
Как минимум один раз.
Завтра, если ещё захочешь - продолжай.
 
Перейти    
[ Закрыто] Что случилось с икрой Кижуча?
 
#
28.04.2024 22:18:56
Приятного аппетита!
 
Перейти    
Извлечь из исходной комбинации максимальных значений по заданным критериям., Пример: Извлечь из комбинации чисел 1 2 3 5 47 48 максимальных значений то есть 5 из 6
 
#
27.04.2024 18:18:39
Cristal, я не помогаю желающим обмануть спортлото из голого альтруизма.
Хотите разбогатеть - берите в долю, НО С АВАНСОМ!
 
Перейти    
Извлечь из исходной комбинации максимальных значений по заданным критериям., Пример: Извлечь из комбинации чисел 1 2 3 5 47 48 максимальных значений то есть 5 из 6
 
#
27.04.2024 17:30:00
Очень доходчиво! По ТЗ - 2, 3, 4, 5 из 6 для двух тиражей во вложении. Без макроса, простите :oops:
 
Перейти    
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 27 След.
Loading...