Generalизверг (07.03.2025 09:13, просмотров: 101) ответил Andreas на Спросил дика ЗЫ: ну не понимаю, как код тут оформить, со всякими
тегами вставлял. ЗЗЫ: попросил на основе таблицы сделать -
переписал послушно и тоже разумно.Нажимаешь кнопку
Брижит Бардо в купальнике выглядит талантливее, чем Фаина Раневская @Гайдай
выскакивает поле
вставляешь в него код
-
- Чтобы изменить формат ячейки на **формат даты** после удаления
лишних символов, нужно добавить в макрос строку, которая изменяет
формат ячейки. Вот обновленный код: ```vba Sub
TrimLastFourCharsAndFormatAsDate() Dim rng As Range Dim cell As
Range Dim maxLength As Integer Dim selectedColumn As Range ' Задаем
максимальное количество символов maxLength = 10 ' Измените это
значение на нужное ' Проверяем, выделен ли один столбец LordN(2102 знак., 07.03.2025 09:38)
- вот такая фгня - LordN(07.03.2025 09:38)
- Еще пример из дика по этой методе: вставились пустые строки и удалены пробелы форматирования кода. Причем если этот код копируешь и в VScode вставляешь, то форматирование ессно он исправляет, а пустые строки остаются. Поэтому имхо проще без кнопки вставлять и можно пример в редакторе с автоформатированием посмотреть без пустых строк. Firefox, win7. Andreas(3448 знак., 07.03.2025 09:38)
- Этот же код из дика просто вставленный в тупой редактор FAR Andreas(1 знак., 07.03.2025 09:34, картинка)
- Чтобы изменить формат ячейки на **формат даты** после удаления
лишних символов, нужно добавить в макрос строку, которая изменяет
формат ячейки. Вот обновленный код: ```vba Sub
TrimLastFourCharsAndFormatAsDate() Dim rng As Range Dim cell As
Range Dim maxLength As Integer Dim selectedColumn As Range ' Задаем
максимальное количество символов maxLength = 10 ' Измените это
значение на нужное ' Проверяем, выделен ли один столбец LordN(2102 знак., 07.03.2025 09:38)
