VBA

Форум программистов и сисадминов Киберфорум

Войти

Другие темы раздела
VBA Сравнение двух диапазонов по последней строке https://www.cyberforum.ru/ vba/ thread1491752.html Здравствуйте, Проблема такова. Необходимо сравнить значения в последних строках двух диапазонов, находящихся на одной странице. Количество столбцов и диапазонах одинаковое. Диапазоны пополняющиеся... Подскажите пожалуйста, реально сделать или нет? Отвечаю на Ваш вопрос. Да, это вполне реально сделать.	VBA Импорт данных в несколько файлов в Excel Есть несколько файлов в ексель, в которые нужно всавить информацию, например название или имя работника. Попытался написать макрос с циклом, но что-то не получается... выдаёт ошибку "Run-time-error... Irbtim, а открывать файлы кто будет? :DSub Paste() Dim r As String, NFile As Long, SelectedFiles() As Variant r = InputBox("Data", "Inputs") SelectedFiles = Application.GetOpenFilename( _ ... https://www.cyberforum.ru/ vba/ thread1491747.html
VBA Процент совпадения значения в ячейках https://www.cyberforum.ru/ vba/ thread1491662.html Всем привет. Нужна помощь. Необходимо сравнить две ячейки на совпадения. Результат вывести в процентах. Сравнить нужно не просто слова, а и например если разница и в одной букве. Например. 1... Function QuickEquality(ByVal t1, ByVal t2) As Single ' Похожесть по началам слов Dim i%, j%, k%, S, Z, L%, N1%, N2% Dim Max1%(), Max2%(), Sum% S = Split(t1, " "): Z = Split(t2, " ") ...	VBA Получить координаты первой (левой верхней) выделенной ячейки https://www.cyberforum.ru/ vba/ thread1491857.html Добрый день, есть ячейки со значениями в одной строке, надо их совместить в первую ячейку. Вопрос - как получить координаты первой (левой верхней) выделенной ячейки. Dim final As String Dim... сороконожка, можно без циклаSelection.Cells(1) = Join(WorksheetFunction.Index(Selection.Rows(1).Value, 1, 0))
VBA Цикл по выделенным элементам списка Доброго времени суток! Есть поле со списком на форме. В нем выделены некоторые элементы. Мне нужно составить цикл на VBA, в котором с каждым выделенным элементом списка будут проводиться... Есть поле со списком на формеНаверно, "список" (ListBox)?Dim i As Long With ListBox1 'имя списка For i = 0 To .ListCount - 1 If .Selected(i) Then MsgBox .List(i) ... https://www.cyberforum.ru/ vba/ thread1491634.html	VBA Как передать "" через formulalocal? Добрый день! мне нужно записать в ячейку ЕСЛИ(A1<>"";A12;#Н/Д), записываю через макрос ActiveCell.FormulaLocal= "=ЕСЛИ(A1<>"";A12;#Н/Д)" Возникает ошибка, из-за того, что нельзя передавать ""... записываю через макросТак Вы именно ЗАПИШИТЕ, т.е. включите макрорекордер и введите формулу в ячейку, и посмотрите, что получится :)
VBA Прокоментируйте код https://www.cyberforum.ru/ vba/ thread1491946.html Private Sub Userform_initialize() n = Range("F3").Value With ComboBox1 .AddItem "ПКС-11" .AddItem "ПКС-12" .AddItem "ОРУМ-12" .AddItem "ПРУМ-11" .AddItem "ПРУМ-12" .AddItem "1ТОА-11"... Пример переменной Public: https://www.cyberforum.ru/vba/thread1476492.html#8 (сдвиг p).	VBA Установка полужирного шрифта на знаки препинания рядом со словом https://www.cyberforum.ru/ vba/ thread1492228.html Здравствуйте! Есть огромный текст, много слов в полужирном шрифте. Но некоторые знаки препинания, которые находятся рядом с такими словами, имеют обычное, не полужирное начертание. Как можно с... Здравствуйте BoomZoom911, Данное условие означает: "продолжать цикл, пока обе границы диапазона меняются". А ваше условие - "продолжать цикл, пока меняется хотя бы одна граница диапазона". Но...
VBA Образовать из двух упорядоченных последовательностей третью, сохранив упорядоченность (без доп. массива) https://www.cyberforum.ru/ vba/ thread1492032.html Даны две последовательности a1<=a2<=...<=an и b1<=b2<=...<=bn. Образовать из них новую последовательность чисел так, чтобы она была неубывающей. Дополнительный массив не использовать. Добавлено... Даны две последовательности - применительно к бэйсику это означает: дано два массива. Образовать из них новую последовательность - это означает: построить новый массив? Тогда в условии...	Исследовать биквадратное уравнение VBA Даны действительные числа а, b, с (а > 0). Полностью исследовать би-квадратное уравнение ах4 + bх2 + с = 0, то есть если действительных корней нет, то должно быть выдано сообщение об этом, иначе... Ну а что тут сложного? Решаете по обычной схеме: Считаем первый дискриминант для варианта t = x^2, at^2 + bt + c = 0. Если меньше нуля то x^2 = a \pm bi, следовательно все x различные и комплексные....
VBA Прокомментировать код Есть кнопки на них есть код его надо прокомментировать все напианно с помощью VBA 1 Кнопка Private Sub CommandButton1_Click() c = 3 s = Trim(Str(c + n)) Range("A" + s).Value = n + 1... денис721, длинный текст или код прячьте пожалуйста под спойлер. как то так Private Sub Userform_initialize() ' заполнение формы при её открытии n = Range("G2").Value ' в переменную n заносим... https://www.cyberforum.ru/ vba/ thread1491593.html	VBA Как проверить результат фильтрации данных на <пусто> Фильтрую количество строк N по столбцу IDcol (номер столбца) ,используя массив аргументов отбора Array(pol2) ActiveSheet.Range("$A$1:$w$" & CStr(N)).AutoFilter Field:=IDcol, Criteria1:=Array(pol2),... With ActiveSheet If .AutoFilter.Range.SpecialCells(xlCellTypeVisible).Rows.Count = 1 Then Debug.Print "Результат фильтрации <Пусто>" Else Debug.Print "Результат фильтрации... https://www.cyberforum.ru/ vba/ thread1492342.html

Vlad999

3938 / 2332 / 789

Регистрация: 02.11.2012

Сообщений: 6,191

04.07.2015, 09:58

Сделать выборку значений из массива типа Range - VBA - Ответ 7836770

04.07.2015, 09:58. Показов 3029. Ответов 9

Метки (Все метки)

Ответ

1. вам хотят сказать что функция не может менять диапазоны, соответственно вам нужна не функция а обычный макрос.
2. "aa As Range" массив так не объявляется, нужно так aa().

Вернуться к обсуждению:
Сделать выборку значений из массива типа Range VBA

Следующий ответ

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

04.07.2015, 09:58

Готовые ответы и решения:

Как сделать выборку по полю типа smalldatetime?
est table xxx v nej field yyy,datatype ego smalldatetime. neobhodimo vibrat stroki dopustim s 23/12/2000 13:00:00 po 22/12/2001...

Как сделать выборку из таблицы каждые 10 или n-ое кол-во значений
Как сделать выборку из таблицы каждые 10 или n-ое кол-во значений, в таблице есть timestamp, может это по времени как то сделать

Как сделать выборку с проводок и выгрузить в таблицу значений в 1с77?
Добрый день, в 1с программировании начинаю, так что строго не судите, коллеги. Задача заключается в следующем: создаю внешнюю обработку,...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

04.07.2015, 09:58

Помогаю со студенческими работами здесь

Помогите с функциями в Excel.... Есть набор значений нужно сделать выборку
Есть столбец значений. 1000 1100 1110 1111 1112 1113 1114 1115 1120

SLQ. Как сделать выборку значений из одного столбца в каждый отдельно?
У меня есть скрипт который вытягивает данные с таблицы rl - reservation_log c поля reason. Там находятся данные брак, отмена, возврат. Как...

Как сделать выборку из массива?
был запрос mysql извлеченные данные помещены в массив.Как сделать выборку из массива? я читал с помощью if можно или foreach. Покажите...

Как сделать выборку элементов из массива?
Задан массив A, состоящий из M элементов. Необходимо сгенерировать новый массив B, некой размерности N+1, элементы которого - результат...

Как сделать выборку из массива по длине строк и отсортировать ее по алфавиту?
Третий день ломаю голову что уже имею на сейчас ниже исходник а так же сама задача! То что в задаче подчеркнул жирным вот над этим и...

Новые блоги и статьи Все статьи Все блоги /
Исследование байт-кода Python: подключаем дизассемблер stackOverflow 19.02.2025 Многие знают, что Python - интерпретируемый язык, но мало кто задумывается о том, что происходит между написанием кода и его выполнением. На самом деле Python использует промежуточное представление. . .	Исследование байт-кода Python: компиляторы против интерпретаторов stackOverflow 19.02.2025 Понимание байт-кода Python - основополагающий аспект для разработчиков, стремящихся глубже понять внутренние механизмы языка и оптимизировать производительность своих программ. Байт-код представляет. . .	Comprehensions в Python - что это такое? stackOverflow 19.02.2025 Когда речь заходит о Python, одной из его самых красивых и мощных возможностей являются списковые включения или comprehensions. Это особые синтаксические конструкции, позволяющие создавать новые. . .	Python правда такой медленный? Развенчиваем миф о медлительности stackOverflow 19.02.2025 Когда речь заходит о выборе языка программирования для нового проекта, вопрос производительности часто становится одним из ключевых факторов. Python, несмотря на свою популярность и простоту. . .	Динамические формы в Flask stackOverflow 19.02.2025 Работа с веб-формами часто требует гибкости в отношении количества полей, которые пользователь может заполнить. Представьте ситуацию, когда вам нужно создать форму для ввода контактных данных, где у. . .
Обнаружение объектов в реальном времени на Raspberry Pi с OpenCV и Movidius NCS stackOverflow 19.02.2025 Технология обнаружения объектов в реальном времени становится все более востребованной в различных областях - от систем безопасности до автономных транспортных средств. Особый интерес представляет. . .	где chromium хранит пароли и как их обнулить в пожарном варианте jigi33 19.02.2025 Where is the chromium browser stores passwords for a sites где chromium-подобный браузер хранит пароли и как их обнулить в пожарном варианте (see screenshot)	howto get access to external internet resources with kinit jigi33 19.02.2025 Решение проблемы с необходимостью доп. авторизации по Керберос для автоотработки аутентификации на прокси-сервер (see screenshot)	Отслеживание автомобилей и определение скорости с OpenCV и Python на Raspberry Pi stackOverflow 19.02.2025 В этой статье мы рассмотрим создание системы отслеживания транспортных средств и определения их скорости с использованием компьютерного зрения и библиотеки OpenCV. Наше решение основано на принципе. . .	ENV (environments) valid paths in linux jigi33 19.02.2025 Environments paths (see screenshot)

Наверх