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

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 162 След.
Автовыравнивание по высоте строки
 
#
23.03.2026 20:01:10
Цитата
написал:
А в самом шаблоне файла вообще можно заранее зашить, чтобы строки по высоте раздвигались? Либра же как-то их автораздвигает...
Проблема в Excel - наличие объединенных ячеек. На форуме есть подобные темы.

В LibreOffice Calc автоподбор высоты строк  в Вашем файле работает.
Владимир
 
Перейти    
Сумма модулей, как посчитать сумму модулей в одной ячейке
 
#
06.03.2026 20:43:22
Здравствуйте, Михаил!
Ваши формулы можно смело предлагать на международные олимпиады.   :)  
Владимир
 
Перейти    
Сумма модулей, как посчитать сумму модулей в одной ячейке
 
#
06.03.2026 19:22:37
"Старинный" вариант с диспетчером имен (ИИ уже должен знать).
Изменено: sokol92 - 06.03.2026 19:23:39
Владимир
 
Перейти    
Изменить состояние чекбоксов на листе макросом
 
#
28.02.2026 17:03:41
Цитата
написал:
Подскажите в чём проблема, через поиск и замену Истина на ложь всё работает, записал макрос и не работает?
Цитата
написал:
Проблема в том, что в колонке D у Вас не текст "ИСТИНА/ЛОЖЬ", а логические значения.
Поэтому:
Код
  Selection.Replace What:=True, Replacement:=False, LookAt:=xlPart, _
      SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
      ReplaceFormat:=False

P.S. Это глобальная проблема "Макрорекордера": пользователь выполняет свои действия с учетом текущей локализации (ru_RU у нас), "Макрорекордер" записывает эти действия и "забывает", что все свойства и методы объектов Excel вычисляются с учетом локализации en-US (если явно не указано обратное).
Изменено: sokol92 - 28.02.2026 17:22:00
Владимир
 
Перейти    
Ошибка сохранения в PDF
 
#
12.02.2026 17:41:52
Лучше записывать в ячейку имена листов, а не номера, поскольку номера листов могут измениться.
Поэтому записываем в ячейку A4 текст ОДНОСТРОЧНЫЙ,СУДОВОЙ,ГРАФИК и пробуем макрос:
Код
Sub Command()
  Dim strFileName As String, s As String, publicSheets As sheets
  With ThisWorkbook
    s = .worksheets("ОДНОСТРОЧНЫЙ").Range("A4").Value
    Set publicSheets = .worksheets(Split(s, ","))
    publicSheets.Select
    strFileName = "График " & worksheets("ОДНОСТРОЧНЫЙ").Range("A5").Value
    On Error Resume Next
    .ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
      ActiveWorkbook.Path & "\" & strFileName, Quality:= _
      xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
      OpenAfterPublish:=True
    publicSheets(1).Select '  Разгруппировали
  End With
End Sub
Владимир
 
Перейти    
Ошибка сохранения в PDF
 
#
12.02.2026 16:16:09
Опишите суть задачи.
Какие именно листы Вы хотите вывести в PDF?
У Вас в ячейке A4 листа "ОДНОСТРОЧНЫЙ" указано "2,3,14". Это что?
Владимир
 
Перейти    
Искусственный интеллект (ИИ) на службе Excel, Искусственный интеллект напишет код макроса, формулы, функции и тд.
 
#
12.02.2026 15:30:05
Я "в лоб" спросил нейросеть, почему она(он) предлагает использовать несуществующее свойство одного из объектов LibreOffice. Ведь можно запустить экземпляр LibreOffice и проверить самостоятельно, до формирования ответа человеку.

Вот полный ответ нейросети :

Gemini said

Вы затронули самый болезненный вопрос в разработке на базе ИИ.

Могу ли я запустить LibreOffice?

К сожалению, нет. У меня есть встроенный интерпретатор Python (песочница), но это «стерильная» среда:

  1. В ней установлены только базовые библиотеки (pandas, numpy, matplotlib и т.д.).

  2. Там нет установленного LibreOffice и, соответственно, нет библиотеки uno.

  3. Там нет графического интерфейса или возможности запустить внешнее приложение.

Поэтому, когда я пишу код для PyUNO, я полагаюсь на свою «базу знаний» (документацию, форумы, SDK). Ошибка с ConditionalFormats  (во множественном числе) — это классическая галлюцинация, возникшая  из-за того, что во многих других API (например, Excel VBA) коллекции  называются именно так. В LibreOffice это всегда ConditionalFormat.

Важно:  Я — ваш «штурман», который знает карту, но «водитель» (исполнитель  кода) — это вы. Ваша проверка на реальной машине — это единственный  способ верификации.

Владимир
 
Перейти    
Не работают формулы в файле эксель (пустые ячейки), На одном компьютере работает, а на другом нет.
 
#
10.02.2026 16:57:00
Цитата
Тимофеев написал:
а вы раскройте скрытые столбцы - появятся и ошибки
Раскрыть столбцы для отладки - всегда правильно.
sokol3346 (почти тезка :)  ),  на листе "Шаг № 2 расчет" раскройте все столбцы, выделите все столбцы  с формулами и в диалоге "Формат ячеек" / Выравнивание установите "Выравнивание по горизонтали": "по значению". Для ячеек с числами выравнивание должно быть вправо.
Диагноз.
В столбце D это не так. Например, ячейка D2 содержит текст "3,6". У тех пользователей, у которых разделитель дробной доли запятая, этот текст может быть корректно преобразован в число, у остальных - нет.
Изменено: sokol92 - 10.02.2026 17:00:08
Владимир
 
Перейти    
Как макросом выполнить F2+Enter для диапазона ячеек с текстом/есть ли этому замена?
 
#
05.02.2026 20:24:44
Цитата
Старичок написал:
Вроде бы нормально работает.
Автор темы не высказывался по этому поводу...
Владимир
 
Перейти    
Как макросом выполнить F2+Enter для диапазона ячеек с текстом/есть ли этому замена?
 
#
05.02.2026 16:17:39
Если еще актуально, можем исследовать этот пример.

Поскольку в моей версии Excel (2016) последовательное нажатие на F2 / Enter  не приводит к визуальным изменениям в отображаемой информации, предлагаю следующий план:
1. Автор темы удаляет из проблемного файла все строки, кроме 606. Назовем новый файл "File1".
2. Автор темы преобразует "File1" путем последовательного нажатия на F2 / Enter и сохраняет как "File2".
В новое сообщение прикрепляются файлы File1 и File2.

Далее мы пытаемся составить макрос, который преобразует File1 в File2.
Владимир
 
Перейти    
Как макросом выполнить F2+Enter для диапазона ячеек с текстом/есть ли этому замена?
 
#
04.02.2026 20:58:15
Да, действительно, "странный" файл. Завтра вылечим макросом (если раньше никто не сделает).
Владимир
 
Перейти    
Как макросом выполнить F2+Enter для диапазона ячеек с текстом/есть ли этому замена?
 
#
04.02.2026 20:11:17
Укажите точные координаты проблемы (номер строки и столбца).
Где в Вашем файле из #3 адрес, содержащий "Циолковского" (первый рисунок из сообщения #7)?
Владимир
 
Перейти    
Как макросом выполнить F2+Enter для диапазона ячеек с текстом/есть ли этому замена?
 
#
04.02.2026 19:41:06
Выделите столбцы A:K. Далее Ctrl+1 ("Формат ячеек"), вкладка "Выравнивание", поставьте отметку "переносить по словам", OK.
Владимир
 
Перейти    
Как макросом выполнить F2+Enter для диапазона ячеек с текстом/есть ли этому замена?
 
#
04.02.2026 18:40:53
А с какими строками и столбцами у Вас проблема?
Совет. Выделите весь лист и в диалоге "Формат ячеек" на вкладке "Выравнивание" укажите Выравнивание по горизонтали: "по значению". Тогда Вы по выравниванию можете определить тип данных в ячейке (число / текст).
Владимир
 
Перейти    
Как макросом выполнить F2+Enter для диапазона ячеек с текстом/есть ли этому замена?
 
#
04.02.2026 18:12:12
Трудно ответить, не видя хотя бы фрагмента файла.
Попробуйте выделить прямоугольный диапазон проблемных ячеек и выполнить макрос:
Код
Sub Test()
  Selection.FormulaLocal = Selection.FormulaLocal
End Sub
Владимир
 
Перейти    
Ошибка буфера обмена
 
#
31.01.2026 19:49:42
Совет от ИИ: Системные настройки: Проверьте Параметры -> Система -> Буфер обмена в Windows, возможно, стоит отключить журнал или синхронизацию.
Владимир
 
Перейти    
Защита Листа Excel от удаления, VBA либо другим способом
 
#
29.01.2026 15:51:35
Можно в макросе из сообщения #6 после сообщения (Msgbox) вместо закрытия книги все-таки защитить структуру:
Код
Me.Protect Structure:=True, Windows:=False

Тогда лист не будет удален.
Снять защиту структуры можно по событию активации листа (или какому-нибудь еще).
Владимир
 
Перейти    
DateValue - Type Mismatch - как починить?, vba
 
#
14.01.2026 19:52:13
Кстати, если полагаться на неявное преобразование типов переменных, то можно почти любую функцию сделать зависящей от региональных настроек.  :)

Вот один из примеров (можно попробовать решить без Excel, а затем проверить себя и объяснить результаты).
Что выдаст следующий фрагмент для локализации ru_RU:
Код
  Debug.Print Left("abcd", "2,5")
  Debug.Print Left("abcd", "3,5")
А для локализации en_US?

Ответы
Изменено: sokol92 - 14.01.2026 20:28:41
Владимир
 
Перейти    
DateValue - Type Mismatch - как починить?, vba
 
#
14.01.2026 18:51:53
Цитата
Дмитрий(The_Prist) Щербаков написал:
DateValue  там не упоминается, кстати
Да, приведенный список функций VBA, которые работают с учетом региональных настроек, разумеется, не является полным.
Владимир
 
Перейти    
DateValue - Type Mismatch - как починить?, vba
 
#
14.01.2026 18:33:26
Я когда-то написал "шпаргалку" по созданию приложений, эксплуатация которых предполагается на компьютерах с различными региональными настройками.
В частности, п. 3.6, не следует использовать функции VBA, которые зависят от региональных настроек (DateValue в их числе).
Владимир
 
Перейти    
DateValue - Type Mismatch - как починить?, vba
 
#
14.01.2026 15:13:29
Цитата
KUDRIN написал:
вообще странно, что за столько лет такой ошибки ни у кого не возникало
Боюсь, у Вас необычный формат "краткой даты" (в региональных настройках MS Windows). VBA преобразует  дату в текст в соответствии с форматом "краткой даты".
Обычный формат краткой даты: 14.01.2026
Про настройки форматов см., например, здесь, "Настройка формата даты и времени вручную".
Изменено: sokol92 - 14.01.2026 15:21:13
Владимир
 
Перейти    
DateValue - Type Mismatch - как починить?, vba
 
#
14.01.2026 14:37:04
Увидел Ваши картинки.
Интересно, в Вашей конфигурации дата неявно преобразована в текст как "Ср 12.06.24 9:42:15". Такой текст функция DateValue "забракует".
А что у Вас указано в настройках Windows в разделе Регион:
Изменено: sokol92 - 14.01.2026 14:37:47
Владимир
 
Перейти    
DateValue - Type Mismatch - как починить?, vba
 
#
14.01.2026 14:08:18
Добавьте в макрос Дмитрия после присвоения переменной a
Код
Debug.Print a


Скопируйте текст из окна Immediate (Ctrl+G в VBE) и поместите в сообщение
Владимир
 
Перейти    
Сильно тормозит небольшой по объему файл
 
#
14.01.2026 13:26:17
В этой теме Владимир (ZVI) показывал, как бороться с этим злом.
Владимир
 
Перейти    
VBA: данные из xml-файла сразу в массив или Recordset, Макросом загрузить данные из xml-файла без выгрузки на лист
 
#
14.01.2026 13:15:00
Здесь - замечательная статья о работе с XML в VBS (для VBA также актуально).
Владимир
 
Перейти    
Ошибка команды MkDir, Выдает ошибку на MkDir
 
#
11.01.2026 15:48:21
Обсуждалось здесь.

P.S. Как справедливо заметил выше уважаемый Hugo (и это есть в документации), архаичная функция MakeSureDirectoryPathExists не поддерживает юникод, поэтому надо использовать SHCreateDirectoryExW.
Изменено: sokol92 - 11.01.2026 17:00:01
Владимир
 
Перейти    
Как при инициализации формы в Texbox получить десятичное число через запятую
 
#
01.12.2025 16:51:39
Цитата
Вал Бал написал:
Me.TextBox1

Посмотрите еще сообщения этой темы.
Владимир
 
Перейти    
Не работает файл с макросами
 
#
28.11.2025 16:36:09
Первый подозреваемый в подобных случаях - антивирусные программы.
Владимир
 
Перейти    
Преобразовать экспоненциальный формат при импорте данных из интернета
 
#
20.11.2025 19:38:45
Цитата
domovenok1982 написал:
вставлена таблица, присланная по электронке
В каком формате эта таблица?
Владимир
 
Перейти    
проверка корректности написания кода ОКПД2, пользовательский формат
 
#
10.11.2025 19:49:49
Цитата
БМВ написал:
если на втором листе есть полный список, то проверить при вводе есть ли такой код - не проблема.
На этот вопрос ответ не получен.

Если "Список" полный (так должно быть по Постановлению Правительства 1352), то на листе "Главный" столбец "С" будет содержать формулу (ВПР). В столбце "B" можно сделать проверку значений по списку.
Полный Классификатор ОКПД 2 содержит порядка 20 тыс. позиций.
Изменено: sokol92 - 10.11.2025 19:53:02
Владимир
 
Перейти    
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 162 След.
Наверх