Автоматический пересчет при сортировке
Автоматический пересчет при сортировке) необходимо написать формулы для пересчета итоговых данных в шапке таблицы (строки с 11 по 66) при сортировке фильтрами в строке 82
Автоматический пересчет при сортировке) необходимо написать формулы для пересчета итоговых данных в шапке таблицы (строки с 11 по 66) при сортировке фильтрами в строке 82
Как настроить автоматический пересчет при сортировке на vba или как событие?
Локальная версия Onenote Нужно добавить дату и время создания страницы в название страницы Прочитав энное количество ресурсов в Интернете и ИИ, выяснилось, что поддерживает скрипт…
Подскажите как проверить, что текст в ячейке таблицы помещается в одну строку? Нижеподанный код работал, но почему-то 2 дня как выдает один и тот же результат, несмотря на значени…
У меня есть макрос Function GetHTTPResponse(ByVal sURL As String) As String On Error Resume Next Set oXMLHTTP = CreateObject("WinHttp.WinHttpRequest.5.1") With oXMLHTTP …
По нажатию кнопки "Следующий", активная строка копируется ниже с определенными изменениями. Всё хорошо, кроме того, что в свойствах чекбокса при копировании указывается …
В тексте документа надо найти и передать в переменную ФИО. Критерий ФИО: 3 слова: первое слово все ЗАГЛАВНыЕ, второе и третье - первая буква заглавная, остальные строчные. Из текс…
Есть вопрос, какими методами можно воспользоваться, чтобы сделать такой функционал? Вложить в одну ячейку несколько элементов из раскрывающегося списка (нажимаешь галочки и выбира…
Пишу макрос для CorelDraw 2022. Сделал UserForm, добавил туда картинку (light), написал функцию для смены иконки: Sub ChangePicture(im as Image) im.Picture = .... End Sub При вызо…
Не создается новый рабочий лист в excel через vba из приватной книги, только из личной. Может, кто знает, можно ли создать новый рабочий лист из частной настройки кнопки на ленте?…
Private Sub Open_xml(Path, FileName, Sheet, Cell As String) Dim strTargetFile As String Dim wb strTargetFile = Path & "\" & FileName Set wb = Workbooks.OpenXML(F…
Private Sub Open_xml(Path, FileName, Sheet, Cell As String) Dim strTargetFile As String Dim wb strTargetFile = Path & "" & FileName Set wb = Workbooks.OpenXML(Fi…
есть такая формула Range("Db23:Db" & Cells(Rows.Count, 1).End(xlUp).Row).FormulaR1C1 = _ "=VLOOKUP(RC[" & -(lastCol - Col_KD + 1) & "],'*путь …
Всем привет. В программировании не силен, но представляю классы и объекты на более-менее поверхностном уровне. Класс (в котором описаны свойства и методы) - Объекты (к которым мы …
столкнулся с проблемой при экспортировании с помощью VBS скрипта xml-файла, структура имеет данный вид: <?xml version="1.0" encoding="windows-1251"?> <…
Имеется MS Access и формуляр с элементом управления WebBrowser. WebBrowser отображает страницу, которая содежит ссылки с атрибутом открытия в новом окне (target="_blank"…
При использовании оператора Put возникает странная ситуация - размер записываемого в файл массива 10 байт, однако в конец файла всегда добавляется 1 нулевой байт. Как это исправит…
я столкнулся со следующей проблемой: В рамках автоматизации обновления данных из подключения для Эксель я написал макрос, который сначала обновляет подключения, а затем сразу обно…
Нужно подсчитать количество значений в столбцах с разных листов книги, использовал следующий код Sub аа() Dim a As String Dim b, c As Double a = Worksheets("январь 2023 факти…
После запуска макроса открывается первый документ на обновление связей. В процессе работы закрываются и макрос, и документ, который нужно обновить. При этом в Debug'е при последов…
Как с помощью VBA подсчитать сумму цифр размерных линий AutoCad выделив их в чертеже?
Цикл проходит, а значение не берется :( Подскажите, как можно обратиться к соседней ячейкe(из колонки J) Dim i As Long, n As Long With Columns("I") n = .Cells.Count For …
Пример: в ячейке "A1" содержится формула "=A2+A4+A6" Мне необходимо, с помощью VBA, в ячейку B1 поместить эту формулу но с литерой "B". Есть ли спосо…
Всем привет! Подскажите пожалуйста как "запустить" формулу массива для vba. Сейчас выдает ошибку 13: Type: mismatch Sub Match_Example1() Dim TTBank As Long Dim Value1 As…
Excel при первом вводе функции выдает ошибку: "Приложению Microsoft Excel не удается вычислить формулу. В открытой книге обнаружена циклическая ссылка, однако не получается о…
необходимо программным способом узнать о существовании объекта на Форме n=0 name = "TextBox_" While Not (Me.Controls(name & CInt(n)) Is Nothing) msgbox "форма с…
Подскажите, пожалуйста, как исправить ошибку. Пытаюсь настроить автосохранение вложений в outlook 2016, скрипт работает, но иногда выполняется с неизвестными ошибками, не знаю с ч…
Хотел добавить пункт в меню по вызову через правую кнопку мышки, который бы вставлял сегодняшнюю дату, в ячейку. Вот такой код Private Sub Workbook_SheetBeforeRightClick(ByVal Sh …
После переноса данных из Excel в отчет Word мне надо выстроить их столбцом для удобства восприятия. После вставки значения гуляют как лесенка. Все дело в начальных пробелах. Для р…
Не могли бы вы помочь найти ошибку: я реализовал метод Крамера для вычисления корней системы линейных уравнений (в виде функции). Если использовать эту функции в строке формул, то…