|
|
| Другие темы раздела | ||||||||||||||||||
|
VBA Копирование строк из одного листа в другой по заданому параметру
https://www.cyberforum.ru/ vba/ thread2311915.html уже ломаю голову третий день. помогите есть книга в ней 4 листа, нужно из первого листа в третить скопировать все строки 6я ячейка в которих равна 1 желательно макросом, в вба новичек, лет 10-12 назад в бейсике и паскале что-то пробовал писать, но за долгие годи все из голови улетучилось... сейчас очень трудно вспоминать.... |
Ошибка в типах данных?! VBA Есть строка вида 3е-07 15, разбиваю split и записываю значение в ячейку. Но записывается значение 3е-02. В чем мб проблема?! Добавлено через 16 минут Mid, left также вырезают с ошибкой. | |||||||||||||||||
| VBA Нужно определить количество определенных рабочих дней недели и или их комбинаций в интервале дат Здравствуйте! Не смог найти подходящую тему. Задача состоит в том, что-бы посчитать количество рабочих дней недели и их комбинации (понедельник; понедельник, среда, пятница; и т.д.) в интервале дат. При этом нужно учитывать праздничные дни. Нашел только как их по отдельности искать. https://www.cyberforum.ru/ vba/ thread2311850.html |
VBA AutoCAD: странное поведение массива
https://www.cyberforum.ru/ vba/ thread2284293.html Приветствую, уважаемый ALL! Сразу говорю - я далеко не спец, пишу исключительно для себя по необходимости и иногда имею длительные перерывы в программировании. Да и учился в основном на примерах. Ситуация следующая: есть 4 набора слоев в Автокаде - основной, сущ. приборы, новые приборы и комплектные приборы. В зависимости от ситуации приходится изменять цвета слоев: все серое, все цветное,... | |||||||||||||||||
|
VBA Выделение слова в тексте Добрый день! Необходимо выделить определенные заранее известные слова в ячейке с текстом. Нужно чтобы было что-то вроде: Sub slovo() slovo = "Рубашка" |
VBA Событие textbox_change не работает
https://www.cyberforum.ru/ vba/ thread2284253.html Private Sub barcode_Change() If Len(Me.barcode) >= 13 Then Call searchBtn_Click End If End SubМакрос должен считать длину строки и как только она станет = или больше 13, то вызвать функцию Вбиваю в поле дофига символов, ничего не происходит. Если выводить msgbox на каждом изменении, то сообщение выводится после каждого введённого символа. Кусок кода так же работает, в событии lostfocus. В... | |||||||||||||||||
|
VBA Считывание данных в двумерный массив из словаря
https://www.cyberforum.ru/ vba/ thread2284209.html Добрый день! Возникла следующая проблема: необходимо считать данные в двумерный массив, для того, чтобы далее вывести их в 2 столбца в ListBox. Программа работает, но по какой-то причине ListBox остаётся пустым. Private Sub CommandButton4_Click() Dim lr, m, r, t, sl: Set sl = CreateObject("Scripting.Dictionary") Dim sp() As Variant Workbooks.Open s m =... |
VBA Получение данных из сайта с getElementsByClassName Уважаемые знатоки Excel и vba. Я прошу предоставить мне пример получения данных из сайта с помощью getElementsByClassName. В сети много примеров, но у меня не работает ни один. Получаю ошибку "object doesn't support this property or method" на getElementsByClassName. Один из примеров: Const WolVidURL As String = "http://www.wiseowl.co.uk/videos/" Sub GetVideoPage() Dim XMLReq As... | |||||||||||||||||
| VBA Эксель и IE Искал, но не нашел ничего дельного, может ли кто-то доступным языком объяснить как можно открывать браузер и нажимать там различные кнопки? хотелось бы именно понять принцип, а не просто сделать и все. Все что нашел на форуме у меня не работает, как определять какие кнопки нажимать через ID, name, value? А если чего-то нет, то что делать? Хотел разобраться на примере вот этих полей и кнопок,... https://www.cyberforum.ru/ vba/ thread2284100.html | VBA Не найдена библиотека Может кто сталкивался или столкнется ... стоит 14 офис ... где-то по компании стали ставить 16 ... причем, в где-то в 16 есть acedao.dll, а где-то она в 14ом ... Итог: - часть приложений запускается спокойно без препонов (находя новую acedao от 16го) - часть ругается на отсутствие библиотеки и из тех что ругается: -- у ряда приложений миссинг на DAO -- у ряда приложений НЕТ ДАЖЕ... https://www.cyberforum.ru/ vba/ thread2284086.html | |||||||||||||||||
|
"Тихая" печать идет не на принтер по умолчанию, а на другой VBA Доброго всем времени суток. В общем вопрос вот в чём. Я запускаю книгу Excel сторонней программой. Запускается макрос, который отправляет на печать форму с заполненными данными. При этом Excel на экран не выводится, то есть просто делает "тихую" печать. Но вот загвоздка в том, что печать идёт не на принтер по умолчанию, а на какой-то другой в системе. Раньше на другой ОС (Windows 7) всё отлично... |
VBA Сложение одинаковых записей по нескольким условиям
https://www.cyberforum.ru/ vba/ thread2284047.html Господа, нужна помощь. Не могу сложить значения по нескольким критериям. По одному можно так, проблем нет: Sub hr() Dim Uniq As New Collection, Lastrow As Long, i As Long, j As Long, Arr(), Arr2() Lastrow = Cells(Rows.Count, 5).End(xlUp).Row Range(Cells(2, 5), Cells(Lastrow + 1, 6)).Clear Lastrow = Cells(Rows.Count, 1).End(
Наверх
| |||||||||||||||||
