Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Другие темы раздела
VBA Ошибка в процедуре https://www.cyberforum.ru/ vba/ thread2435261.html
Здравствуйте! Вот код: Function Acos(ByVal a As Double) As Double If a = 1 Then Acos = 0 ElseIf a = -1 Then Acos = Pi Else Acos = Atn(-a / Sqr(-a * a + 1)) + 2 * Atn(1)
VBA Вызов надстройки в файле шаблона
Помогите, пожалуйста. Худо-бедно создала макрос. Суть следующая. В файле Excel есть несколько листов: 1) Справочник. Содержит эл.адреса. 2) Рабочие листы. При нажатии на кнопку надстройки создается новый лист на основе Шаблона (далее - Рабочий лист). В рабочем листе в коде прописала вызов макроса "Автозамена": Private Sub Worksheet_Change(ByVal Target As Range) tc = Target.Column tr =...
VBA Написать оптимальную (по числу арифметических операций) программу для вычисления приведенной ниже функции: Написать оптимальную (по числу арифметических операций) программу для вычисления приведенной ниже функции: Помогите сделать https://www.cyberforum.ru/ vba/ thread2434810.html VBA Обмен данными между листами Excel и VBA https://www.cyberforum.ru/ vba/ thread2434627.html
Люди добрые помогите пожалуйста с решение данной проблемы. В макросах дуб-дубом, а степендию то хочется получать:-| Порядок работы 1.Набрать на «листе 1» в первых двух столбцах таблицу исходных данных X и Y, например Ваш прогноз температуры на 10 дней (A2:A11, B2:B11), первую строку использовать для подписи заголовков столбцов. В ячейку B14 занести количество точек в массивах (10) 2.На...
Макрос вставки N количества строк VBA
Добрый день Подскажите пожалуйста, как решить мою проблему. Бьюсь уже несколько часов, попробовал разные варианты. И да, я ничерта в этом не понимаю, буду изучать книги по vba - но сейчас мне срочно нужно сделать макрос... Проблема такая: есть макет документа, с отформатированными под вывод на печать строками. Между определенных строк мне нужно вставить таблицу. На данном этапе при вставке...
VBA Макрос копирования ячкйки до пустой ячейки в другой столбец Добрый день! Помогите, пожалуйста,написать макрос На листе Ехсеl в столбце D находить пустую ячейку,если ячейка пустая,то брать значение из столбца C (номер строки пустая ячкйка из столбца D).и этот текс копировать в столбец А до следующей пустой ячейки столбца D. И так до конца листа. https://www.cyberforum.ru/ vba/ thread2434448.html
VBA Создания выделения активной ячейки с сохранением цвета шапки https://www.cyberforum.ru/ vba/ thread2434403.html
Добрый вечер. Скажите пожулуйста, может кто знает,как в Эксель при выделении активной ячейки цветом сохранить цветной фон шапки. Получается нужно что бы у №п/п,названия,место прибытия всегда был цвет шапки, но получается что при закрытии книги цвет уходит
VBA Записать в массив относительный путь с именем файла из папки(не зная полный путь папки)
Наверняка вопрос заезженный, но я не нашел(плохо искал) Нужно из вложенной папки, из директории, откуда запускается макрос вытащить имена xlsx файлов и запихать их в массив, вместе с относительным путём от файла с макросом. Количество файлов фиксированное. Чтобы массив получился каким то таким g1(0)=ThisWorkbook.Path & “\lala\имя 1файла.xlsx” g1(1)=ThisWorkbook.Path & “\lala\имя 2файла.xlsx”...
VBA Поясните код! Разъясните пожалуйста мне работу вот этих строчек ".Execute Replace:=wdReplaceAll, Forward:=True, _ Wrap:=wdFindContinue" Sub LB17() With Selection.Find .Text = "тся" .Replacement.Text = "ться" .Execute Replace:=wdReplaceAll, Forward:=True, _ Wrap:=wdFindContinue https://www.cyberforum.ru/ vba/ thread2434262.html VBA Решение задачи с макросом https://www.cyberforum.ru/ vba/ thread2434243.html
Ребят, подскажите как эти параметры документа word реализовать в макросе??? font-size:4.0pt; mso-bidi-font-size:14.0pt; line-height:150%; font-family: "Calibri",sans-serif; mso-ascii-font-family: "Malgun Gothic"; mso-hansi-font-family: "Malgun Gothic"; mso-bidi-font-family:"Malgun Gothic"; color:#F2F2F2;
VBA. Поэлементное умножение диапазонов.Без использования циклов VBA
Здравствуйте! Помогите пожалуйста с кодом. Этот код составляет две матрицы. Нужно ПОЭЛЕМЕНТНО умножить две эти матрицы. Без использования циклов, а с применением диапазонов. Option Explicit Sub Работа00() Dim A(20, 20) As Integer Dim B(20, 20) As Integer, N As Integer, K As Integer, i As Integer, j As Integer, L As Integer, O As Integer Dim C(20, 20) As Integer Dim D(20, 20) As Integer...
VBA Excel Макрос VBA работа с диапазонами Добрый день. Есть таблица, во вложении файл, как есть и как должно быть. Нужно объединить значения в диапазоне с записью наименьшего значения. Есть столбец "H", нужно в диапазоне H2:H14 вписать мин. знач. этого диапазона и так до конца таблицы (H15:H16 и тд). Так как значения не повторяющиеся, я за основу разбития по диапазонам беру столбец "N", где значения повторяются. Как я понимаю, я... https://www.cyberforum.ru/ vba/ thread2434020.html
3894 / 2301 / 774
Регистрация: 02.11.2012
Сообщений: 6,114
12.04.2019, 11:30 0
Excel

Получение массива адресов ячеек в выделенной строке - VBA - Ответ 13486464

12.04.2019, 11:30. Показов 3141. Ответов 3
Метки (Все метки)

Ответ

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Dim r As Range, Rn As Range
For Each r In Selection.Rows(1).Cells
    If r.Value = "err" Then
        If Rn Is Nothing Then
            Set Rn = r.Offset(, 1).Resize(1, 2)
        Else
            Set Rn = Union(Rn, r.Offset(, 1).Resize(1, 2))
        End If
    End If
Next
Rn.EntireColumn.Insert


Вернуться к обсуждению:
Получение массива адресов ячеек в выделенной строке VBA
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.04.2019, 11:30
Готовые ответы и решения:

DataGridView - получение текста первой ячейки в выделенной строке
Подскажите, как получить текст именно из Первой ячейки в выделенной строке DataGridView? Пробую...

Выводится ошибка "Индекс находился вне границ массива." в выделенной строке
int N = 6; int D = new int; for (int i = 0; i < N; i++) { ...

NET CF 2.0 получить данные из ячеек выделенной сторки DataGrid
Помогите вытянуть данные из выделенной строки string selectString = ...

GridView, как узнать значения ячеек выделенной строки
1)как узнать значения ячеек выделенной строки? 2)как получать доступ к значению определённой...

3
12.04.2019, 11:30
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.04.2019, 11:30
Помогаю со студенческими работами здесь

Определение суммы нескольких ячеек массива по условию в столбце и в строке
Здравствуйте форумчане. Есть массив данных. Как найти сумму ячеек, когда нужно выбрать ячейки по...

Получение номера выделенной колонки
Как получить номер выделенной колонки, т.е. выделил колону 'С', а он мне выдал, колонка '3', а не...

Получение выделенной строки из ListBox
Здравствуйте, я тут недавно сел писать плеер и захотел сделать плейлист, но ни как не могу получить...

Заполнение таблицы на основе адресов ее ячеек
Здравствуйте, есть необходимость выполнить простую, вроде бы, задачу, но ничего у меня не...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru