|
|
| Другие темы раздела | ||||||||||||||||||
|
VBA Перевод чисел разделенных пробелами из шестнадцатеричной системы счисления в десятичную и наоборот
https://www.cyberforum.ru/ vba/ thread2000295.html Приветствую всех В столбце A в разных ячейках написаны числа в шестнадцатеричной системе счисления, разделенные пробелами, к примеру "48e eb 1c 11 10b 8c", "4a5 0 4d 14 136 8a", "466 12c 25 14 1f8 8a" и т.д. Нужно поочередно их перевести в десятичную систему счисления, так же разделить пробелами и написать в ячейках столбца B А в столбце C в разных ячейках написаны числа в десятичной системе... |
Нужно получить скриншот сайта VBA В Excel создана функция для получения заголовка с сайта WebPageTitle = IE.Document.Title Нужно cделать получение скрина самого сайта с выводом в соседнюю ячейку. Размер скрина разумеется сделать не большим. Есть ли возможности получить скрин средствами VBA? | |||||||||||||||||
|
VBA Отправить письмо нескольким адресатам из списка
https://www.cyberforum.ru/ vba/ thread1999919.html Добрый день! Пытаюсь написать макрос для отправки писем нескольким адресатам из диапазона не пустых ячеек, просмотрел много форумов, ничего не нашел. Outlook не установлен (компьютер рабочий). Отправка письма адресату из одной ячейки происходит. Использую этот код. Помогите) Sub Send_Mail() Const CDO_Cnf = "http://schemas.microsoft.com/cdo/configuration/" Dim oCDOCnf As Object,... |
VBA Как выражения прописываются в регулярке?
https://www.cyberforum.ru/ vba/ thread1999855.html здравствуйте, чтобы не плодить в коде регулярки 'любую цифру и запятую меняем эту же цифру и точку, то есть разделителем будет не запятая, а точка reg.Pattern = "0," SelectionRange = Trim$(reg.Replace$(SelectionRange, "0.")) 'Debug.Print SelectionRange 'любую цифру и запятую меняем эту же цифру и точку, то есть разделителем будет не запятая, а точка reg.Pattern =... | |||||||||||||||||
|
VBA Поиск значений По заданию мне необходимо найти название игрушек, цена которых не превышает N рублей и которые подходят детям X лет. В UserForm`e я создал 2 textbox`a в которые будут вводиться данные для поиска и создал кнопку, которая будет выполнять этот самый поиск. Помогите написать код для кнопки поиска этих данных,а то сам я в vba почти совсем не разбираюсь и работаю с ним несколько дней. |
VBA Find и Select
https://www.cyberforum.ru/ vba/ thread1999797.html Добрый день! Помогите, пожалуйста. Когда-то использовала такую конструкцию Range("...").Find("...").Select А сейчас почему-то не получается. Set C1 = Sheets.Item(1).Range("A1:A100") Set C2 = C1.Find("№") По идее в переменной C2 должен быть диапазон ячейки, содержащей №. А там значение ячейки, содержащей №. Поэтому к C2 не получается применить Select. Как выделить ячейку, содержащую № или как... | |||||||||||||||||
| VBA ошибка "Метод paste из класса worksheet завершен неверно" Private Sub CommandButton1_Click() Dim b As String Dim str As String b = Mid(Cells(2, 2), 3, 8) Range("A1:M120").Select Selection.Copy ChDir ThisWorkbook.Path https://www.cyberforum.ru/ vba/ thread1999752.html |
Функция: вернуть значение, равное удвоенной сумме переданных параметров, деленной на 33 VBA Написать функцию Func_33, которая принимает два числа с плавающей точкой в качестве параметров и возвращает число с плавающей точкой, равное удвоенной сумме переданных параметров, деленной на 33. Слагаемые должны вводится при помощи окна InputBox. Результат должен быть выведен при по- мощи окна MsgBox Помогите | |||||||||||||||||
|
VBA Вывод всех строк,содержащих введенное слово
https://www.cyberforum.ru/ vba/ thread1999599.html У меня есть форма и на ней есть 2 текстбокса. В один я ввожу строку для поиска,а во вторую выводится сообщение о содержании данной строки в ячейке А. Оно только находит одну строку,а другие не выводит.Подскажите,пожалуйста,как сделать так,чтобы выводило все ячейки,в которых содержится слово,которое надо найти? Option Explicit Sub Find(Find_Str As String) Dim i As Integer Dim Row As Integer... |
VBA Определить номер строки,номер столбца элемента aij=3 Пусть дана матрица размерности m=29, n=3. Определить номер строки,номер столбца элемента aij=3. Нужна программа.Помогите,пожалуйста.Вопрос жизни и двойки на экзамене. https://www.cyberforum.ru/ vba/ thread1999484.html | |||||||||||||||||
|
VBA Решение системы уравнений методом Гаусса (чуть-чуть поправить) Всем привет. Задача решить систему уравнений. Получилось следующее. ПРоблема заключается в том, что для некоторых значений происходит деление на 0, из -за чего падает программа. Помогите, пожалуйста, исправить. Завтра последний день сдачи. Закоменченный код - попытка исправить положение, но ни к чему дельному она не привела. Для этой Private Sub CommandButton3_Click() Const n = 4 Dim a(1 To n,... |
VBA Используя алгоритм Евклида, найти наибольший общий делитель
https://www.cyberforum.ru/ vba/ thread1999471.html Алгоритм Евклида нахождения наибольшего общего делителя (НОД) неотрицательных целых чисел основан на следующих свойствах этой величины. Пусть тип — одновременно не равные нулю целые неотрицательны
Наверх
| |||||||||||||||||
Сообщение от Alex77755
