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

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 43 След.
Защита ячеек от копирования, Запретить пользователю копирование нескольких ячеек листа
 
Есть один трюк, родившийся на форуме.
Владимир
Вертикальная полоса прокрутки не подстраивается под текущее количество ячеек
 
Болезнь и методы лечения описаны ZVI здесь.
Изменено: sokol92 - 20 Фев 2019 22:36:08
Владимир
Форматирование символов текста в зависимости от их цвета
 
Да, вы с XML аккуратнее обходитесь, чем разработчики любимой программы.
Изменено: sokol92 - 17 Фев 2019 20:43:50
Владимир
Форматирование символов текста в зависимости от их цвета
 
Так и я, вроде, тоже (про XML в Excel). Очень интересный XML получается, если сохранить файл, обработанный макросом из #29.
Владимир
Форматирование символов текста в зависимости от их цвета
 
Цитата
Андрей VG написал:
разработка заранее предполагала, что кто-то может так порезвиться.
Здравствуйте, коллеги! Не уверен - см. #29
Владимир
Форматирование символов текста в зависимости от их цвета
 
Цитата
vikttur написал:
Спасибо, Владимир.
Это Вам спасибо, я раньше такого тоже не замечал.

Похоже, следующий макрос, примененный к ячейке 12 34 56
сводит с ума любую версию Excel 2007-2016 (в т.ч. англоязычные):
Код
Sub test()
  Dim i As Long
  For i = 1 To Len(ActiveCell) - 1
    With ActiveCell.Characters(Start:=i, Length:=1).Font
      If .Color = vbRed Then
        .Italic = True
      End If
    End With
  Next i
End Sub

Старина Excel 2003, кажется, этой болезни не подвержен.
Изменено: sokol92 - 16 Фев 2019 20:04:38
Владимир
Форматирование символов текста в зависимости от их цвета
 
Цитата
Chr(160)
Off. Наверняка, от Нимфов (туды их...) Word
Владимир
Форматирование символов текста в зависимости от их цвета
 
#21. Да, похоже на ошибку Excel (все версии), возникающую при форматировании отдельных символов ячеейки.
Владимир
Форматирование символов текста в зависимости от их цвета
 
Цитата
Юрий М написал:
Эй, кто-нибудь прочитал #18? ))
#19. Chr(160) между некоторыми словами.
Изменено: sokol92 - 16 Фев 2019 18:50:55
Владимир
Форматирование символов текста в зависимости от их цвета
 
Код
Sub ShowSymbols()
  Dim i As Long, s As String
  For i = 1 To Len(ActiveCell)
    s = Mid(ActiveCell, i, 1)
    Debug.Print i, s, Asc(s), AscW(s)
  Next i
End Sub
Владимир
Автоматическое обновление связей в Excel 2016 г.
 
Думаю, что для установления причины нужен файл.
Владимир
Как удалить пробелы в числе, чтобы оно превратилось из текста в число, VBA макрос удалить пробелы в числе, чтобы оно превратилось из текста в число
 
Если использовать макросы, то поэкспериментируйте с Cdbl. Эта функция довольно умная. :)  
Владимир
Как можно по ФИО прописать автоматически правильное окончание слова больной либо больная
 
А Кузьмич, Ильич (и их сестры)?
Изменено: sokol92 - 13 Фев 2019 23:50:09
Владимир
Преобразование текста мм/дд/гггг в дату
 
Макрос из #4 (исправленный) корректно обрабатывает тексты вида мм/дд/гггг при любых региональных настройках.
Владимир
Преобразование текста мм/дд/гггг в дату
 
Согласен, большое спасибо! Исправил на другую "экзотическую" конструкцию, которая, надеюсь, работает.
P.S. А ведь уже зарекался не писать без Excel :(  
Изменено: sokol92 - 13 Фев 2019 22:08:34
Владимир
Преобразование текста мм/дд/гггг в дату
 
Или так (выделите ячейки с датами):
Код
Sub test()
  'Selection.Replace "/", "/" не работает
  Selection.Value = Selection.Value
End Sub
Изменено: sokol92 - 13 Фев 2019 22:05:30
Владимир
Ошибка в макросе импорта в vcf файл
 
Успехов!
Владимир
Ошибка в макросе импорта в vcf файл
 
Текст макроса #1 выводит файл в кодировке win-1251 (точнее, в кодировке Windows по умолчанию). Программы импорта в других операционных системах ожидают кодировку utf-8.
Изменено: sokol92 - 13 Фев 2019 14:20:42
Владимир
[ Закрыто] Альтернатива РАЗНДАТ обычными формулами
 
Здравствуйте, коллеги! Не может быть никакой логики для разности в месяцах, если ее нет для суммы.
Код
Sub test()
  Debug.Print DateAdd("m", 1, DateSerial(2019, 1, 28))   ' возвращает 28.02.2019
  Debug.Print DateAdd("m", 1, DateSerial(2019, 1, 31))   ' также возвращает 28.02.2018
    
  Debug.Print DateAdd("m", 1, DateSerial(2019, 2, 28))   ' возвращает 28.03.2019
  Debug.Print DateAdd("m", 2, DateSerial(2019, 1, 31))   ' возвращает 31.03.2019
End Sub

Например, добавляя два раза по месяцу к 31.01.2019, мы получаем результат, отличающийся от добавления двух месяцев сразу на три дня.
P.S. Особая благодарность Юлию Ц. и Августу :)  
Изменено: sokol92 - 11 Фев 2019 19:06:39
Владимир
TRIM CLEAN для VBA
 
Чтобы окончательно запутать: ;)


Код
Sub test()
  Dim v
  v = CallByName(Application.WorksheetFunction, "Trim", VbGet, Array("1  2", "3   4  "))
  Debug.Print v(1), Len(v(1)), v(2), Len(v(2))
End Sub
Изменено: sokol92 - 11 Фев 2019 16:01:00
Владимир
Разбиение числа на части и умножение, алгоритм
 
Может быть, так (менять ячейку желтого цвета)? На всякий случай, дополнительно округлил до копеек.
Владимир
vba фильтр при использовании SelectNodes
 
Здравствуйте, Андрей! Для любителей позднего связывания:
Код
    Dim pDoc As Object, pItems As Object, pItem As Object
    Set pDoc = CreateObject("Msxml2.DOMDocument.6.0")
Владимир
Пересчет валютных обязательств в рубли
 
Цитата
lindarka написал:
как прописать в одной строчке, чтобы отбирать и кредиты и перемножать на курсы валюты
Пока нет налога на использование строк Excel лучше рублевые эквиваленты валютных заимствований показывать явно (в отдельных строках).
Владимир
Как макросом изменить выборку для автофильтра, Нужно задавать значения автофильтра макросом
 
Боюсь, что макрорекордер в этом случае - плохой советчик (если, конечно, кодовая таблица по умолчанию не 1252). Условия выборки для дат лучше указывать как номер дня:
Код
   ActiveSheet.Range("$A$1:$A$33").AutoFilter Field:=1, Criteria1:= _
        ">=" & CDbl(DateSerial(2019, 1, 1)), Operator:=xlAnd, Criteria2:="<=" & CDbl(DateSerial(2019, 12, 31))
 
Изменено: sokol92 - 7 Фев 2019 18:03:44
Владимир
Группировка строк тормозит в Excel 2016 по сравнению с Excel 2013
 
Цитата
Roomon написал:
что проблема в 32-битном Excel 2016 на 64-битном Windows
В #2 именно такая конфигурация
Владимир
А как ты кодишь?
 
Для меня практически любая программа Андрея (см. #10) - эталон продуманности, алгоритмического изящества и стиля (красиво написал :) )
Замечательные учебные материалы у Дмитрия Щербакова на сайте и у "владельца" нашей Планеты.
Ну и, разумеется, читаем и перечитываем классику сообщения ZVI.

"Формулисты" - виртуозы в этой теме уже отметились (частично).
Изменено: sokol92 - 6 Фев 2019 17:38:15
Владимир
Группировка строк тормозит в Excel 2016 по сравнению с Excel 2013
 
Дополнительно проверил на конфигурации Win10, Excel 2016 (64-, En). Проблем нет.

Попробуйте перезагрузить компьютер и открыть файл из #1 (c Яндекс-диска). Если "виснет", то, боюсь, придется ждать специалиста, у которого эта ситуация воспроизводится.
Владимир
Виснет excel-2010 при копировании ячейки
 
Согласен с представителем подрастающего поколения. Меню: Главная/Условное форматирование/Управление правилами.
Показать правила форматирования для: Этот лист

Попробуйте просто посчитать, сколько там правил.
Владимир
Группировка строк тормозит в Excel 2016 по сравнению с Excel 2013
 
Несколько раз свернул и развернул приложенный файл - задержек нет. Excel 2016 (32), Win 10.
Владимир
Неверно считает сумму в последнем месяце в кредитном калькуляторе
 
Проверяйте, что если остаток кредита после рассчитанного текущего платежа меньше единицы, то текущий платеж равен кредиту минус сумма предыдущих платежей.
Владимир
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 43 След.
Наверх