Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 121 След.
Почему я считаю что Google Sheets лучше чем Excel?, Монопоиля Excel как на безальтернативый табличный редактор.
 
Насколько корпоративные заказчики готовы доверить свои конфиденциальные данные корпорации Google?
Владимир
Не корректно работает формула ПРПЛТ, При выборе остаточного платежа!
 
Цитата
Dima99994 написал:
то ест как бы банк платит проценты
Так и есть - в последний месяц (последние месяцы) банк Вам должен, а не Вы ему.
Посмотрите на графу "Осталось выплатить".
Изменено: sokol92 - 16.06.2021 18:55:28
Владимир
Избавление от "символа-разделителя" на символ GS, Коды получены из типографии, ни один метод не помогает избавиться от пробела. Информация нужна для прогрузки в программу "Честный знак"
 
Выделите все ячейки и выполните макрос:
Код
Sub Del29()
  Selection.Replace Chr(29), ""
End Sub
Владимир
Прошу помощи по макросу "Обновление связей", Несколько книг со связями
 
Некоторые функции не работают с закрытыми книгами (и начинают работать,  если эти книги открыть): СУММЕСЛИ, СУММЕСЛИМН, СЧЕТЕСЛИ, СЧЕТЕСЛИМН,  СМЕЩ, ... См. также здесь.
Владимир
Обход ошибки из двоичной в десятичную систему
 
К #12: 2^40 вполне может быть. :)  
Изменено: sokol92 - 15.06.2021 14:43:54
Владимир
Обход ошибки из двоичной в десятичную систему
 
Цитата
Виталина Филатова написал:
У меня ексель 2019
Функция ПОСЛЕД доступна только в Excel для Microsoft 365.
Владимир
Обход ошибки из двоичной в десятичную систему
 
Можно так (формулисты, возможно, оптимизируют):
Код
=СУММПРОИЗВ(ПСТР(A1;СТРОКА(A1:ИНДЕКС(A:A;ДЛСТР(A1)));1)*(2^(ДЛСТР(A1)-СТРОКА(A1:ИНДЕКС(A:A; ДЛСТР(A1))))))
Изменено: sokol92 - 15.06.2021 13:57:08 (Убрал пробелы)
Владимир
Принудительное изменение средствами VBA внешнего вида указателя курсора мыши при нажатии на кнопку подключенной надстройки, Подключение файла вида курсора мыши из списка, расположенного в каталоге C:\Windows\Cursors
 
В Excel выбор невелик.
Владимир
копирование из редактора VBA русского текста в буфер обмена, попытка использовать sentKey для решения задачи, неудачно
 
Цитата
Михаил написал:
иметь расширенную латиницу не особо актуально
Здравствуйте, Михаил! Посмотрите, сколько на форуме вопросов о том, что неправильно открываются файлы, полученные от / подготовленные для "датчан и разных прочих шведов". Если Вы на своем компьютере будете только писать "скрипты на кириллице" (и пользоваться из всех программ исключительно Excel), то можете подменить кодовую страницу.
Владимир
После того как было удалено одно слово из ячейки, Excel (Excel 2010) автоматически зачем-то создаёт какой-то отступ снизу
 
Цитата
Широков написал:
не работает команда "Автоподбор высоты строки"
Команда работает - сильно увеличьте высоту строки и примените автоподбор высоты. Высота станет меньше, но, возможно, останется пустое место. Точнее сказать, что Вас (нас) не устраивает результат работы этой команды.
Владимир
Меню из макросов, как создать
 
Посмотрите, например, как это сделано в надстройке PLEX Николая Павлова.
Владимир
После того как было удалено одно слово из ячейки, Excel (Excel 2010) автоматически зачем-то создаёт какой-то отступ снизу
 
Вряд ли Вы уберете "пустоты" - они возникают при определенных сочетаниях ширины столбца и текста в ячейке. Подвигайте ширину столбца и пустоты будут исчезать и появляться.

В качестве альтернативы попробуйте выравнивание ячейки по вертикали "распределенное".
Владимир
Проверка наличия символов в имени книги
 
Оператор сравнения "=" означает в VBA (и других языках) равенство строк . Для подстановочных символов используйте like.
Код
Sub TestBookName()
  Dim wbn As String
  wbn = ActiveWorkbook.Name
  If wbn Like "*Отчёт*" Then
    MsgBox "Это Отчёт"
  Else
    MsgBox "Это НЕ Отчёт"
  End If
End Sub

И с буквой "ё" аккуратнее, она не часто используется в именах файлов.
Изменено: sokol92 - 13.06.2021 17:23:39
Владимир
копирование из редактора VBA русского текста в буфер обмена, попытка использовать sentKey для решения задачи, неудачно
 
Код из #4, несомненно, использует Windows API. :)  
Владимир
копирование из редактора VBA русского текста в буфер обмена, попытка использовать sentKey для решения задачи, неудачно
 
Цитата
sokol92 написал:
Подмените на Windows 1251
Здравствуйте, Андрей! Ни в коем случае в нашем глобальном мире - иначе хана расширенной латинице и др. неприятности.

Такой код неожиданно работает - перехватывает и корректно обрабатывает команду Edit/Copy редактора VBE, нажатие соответствующей кнопки на инструментальной линейке, а также соответствующий пункт в контекстном меню. Ctrl+C не обрабатывает. Вставить в модуль книги личной книги макроса или надстройки.
Код
Option Explicit
#If VBA7 Then
Private Declare PtrSafe Function ActivateKeyboardLayout Lib "user32" (ByVal HKL As LongPtr, ByVal flags As Long) As LongPtr
#Else
Private Declare Function ActivateKeyboardLayout Lib "user32" (ByVal HKL As Long, ByVal flags As Long) As Long
#End If

Dim WithEvents CBar As CommandBarButton

Private Sub Workbook_Open()
   '  иные действия при открытии книги
   Set CBar = Application.VBE.CommandBars("Menu Bar").FindControl(, 19, , , True)
End Sub

Private Sub CBar_Click(ByVal Ctrl As Office.CommandBarButton, CancelDefault As Boolean)
   ActivateKeyboardLayout 68748313, 0  ' меняем раскладку клавиатуры на Ru
End Sub

Копировал код в редакторе с английской раскладкой. :)  
Изменено: sokol92 - 12.06.2021 16:41:56
Владимир
копирование из редактора VBA русского текста в буфер обмена, попытка использовать sentKey для решения задачи, неудачно
 
Цитата
malefactor написал:
Попытался сделать горячую клавишу
Сначала надо научиться создавать надстройки, которые работают в среде VBE (редактора кода). Заявленная в теме цель, на мой взгляд, не оправдает тех усилий, которые нужно на это потратить.
Альтернатива - перехватить команду Copy меню VBE Edit.
Если все-таки рискнете, то ключевым будет метод GetSelection.
Изменено: sokol92 - 12.06.2021 15:48:01
Владимир
Печать с нового ЛИСТА (но не страницы) при двусторонней печать
 
В Excel это сделать не просто. Самое очевидное - макросом отследить карточки с одной страницей печати и принудительно добавить вторую (пустую).
Альтернатива - (макросом) запускать на печать диапазон карточек, причем карточки с одной страницей печати пускать по одной (но тут могут быть проблемы со спулом печати при больших объемах).
Владимир
Отправить макросом лист из книги эксель в формате pdf на почту, через почтовую программу Mozilla Thunderbird
 
Была подобная тема.
Владимир
Частота встречаемости продуктов в заказах
 
Тут вряд ли формулы справятся. Можно по отдельности решать задачи: какие пары артикулов встречаются чаще всего, какие тройки артикулов встречаются чаще всего... При увеличении количества анализируемых вместе артикулов будет расти (и значительно) количество анализируемых данных.
В #4 коллега дал пример решения для пар и троек артикулов.
Изменено: sokol92 - 10.06.2021 16:27:43
Владимир
Удобное внедрение языка программирования "Python" в файл Excel на основе портативной сборки Python, Настроенный файл Excel для удобного вызова скриптов Python из Excel
 
Добрый день! Метод Filter, указанный Михаилом в #99, работает синхронно (если не указывать специального флага) в отличие от многих других методов, относящихся к объектам от Shell.Application. Для больших папок (в тысячи файлов), особенно сетевых, он гораздо быстрее (даже при получении списка всех файлов), чем соответствующий метод от FSO (Folder.Files).
Изменено: sokol92 - 09.06.2021 17:55:03
Владимир
Замена "странных" символов
 
Редактор VBE в таких случаях только вводит в заблуждение, поскольку работает с номерами символов в кодовой таблице (Windows-1251), а не с Unicode.

Буква "И" c последующим символом U+0306  ̆  (Комбинируемое бреве (бревис, кратка), десятичное значение 774) с точки зрения юникода эквивалентна "Й". Но мало кто (включая Excel) эту точку зрения разделяет. Поскольку в таблицах юникода есть персональное место для "Й", вряд ли запись в виде двух символов оправдана.
Изменено: sokol92 - 09.06.2021 17:32:49
Владимир
Создание документа Word по шаблону из Excel
 
У Елены есть замечательное описание рассылки / слияния здесь.
Изменено: sokol92 - 09.06.2021 17:00:12
Владимир
Макрос, отключающий движения курсора на пару секунд
 
Понятно. Попробуйте так:
Код
#If VBA7 Then
Declare PtrSafe Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Declare PtrSafe Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)
#Else
Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)
#End If

Sub HideCursor()
  ShowCursor 0
  Sleep 3000
  ShowCursor 1
End Sub
Владимир
Макрос, отключающий движения курсора на пару секунд
 
Цитата
Сергей Юрьевич написал:
я могу перемещать курсор сразу после старта макроса
Можете, но не можете взаимодействовать с Excel (выделить ячейку и т.д.).
Владимир
Формат даты в функции ТЕКСТ для компьютеров с разной локацией
 
Здравствуйте, Игорь! Японский не знаю абсолютно. Подсмотрел в Libre Office. Google переводчик подтверждает. :)
Метод из #4 вполне жизнеспособен, если разрешены макросы. Аналогично можно также через Excel 4.0 Macro GET.CELL(53, cell), где в ячейке cell содержится дата в требуемом формате. Если макросы не разрешены, то не знаю, как выдать сокращенное локализованное название месяца.

Можно выдавать дату в ISO формате: 2021-06-08, тогда можно обойтись формулами.
Изменено: sokol92 - 08.06.2021 17:33:26
Владимир
Формат даты в функции ТЕКСТ для компьютеров с разной локацией
 
2021年6月8日
Владимир
Как вставить =СЕГОДНЯ() в текст?
 
Латинская "A" задействована к конструкциях типа A/P и a/p (до и после полдня). Еще часть букв используется при задании календарей, отличных от григорианского.
Владимир
Как вставить =СЕГОДНЯ() в текст?
 
Цитата
Ігор Гончаренко написал:
СЕГОДНЯ в текст нужно вставлять как
И в любой системе Windows c кодовой страницей по умолчанию, отличной от windows-1251, мы получим текст "ДД.ММ.ГГГГ".
Владимир
Как вставить =СЕГОДНЯ() в текст?
 
Чудеса "алхимии": коллега экранировал "с", чтобы не воспринималась как секунда. :)  
Изменено: sokol92 - 07.06.2021 13:18:14
Владимир
Как вставить =СЕГОДНЯ() в текст?
 
Чуть короче:
Код
="Выписано "&ТЕКСТ(ДЕНЬ(СЕГОДНЯ())*1000000+МЕСЯЦ(СЕГОДНЯ())*10000+ГОД(СЕГОДНЯ()); "00\.00\.0000")
Владимир
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 121 След.
Наверх