Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Offset, вывод массива Public Sub FFF(r As Range) Dim mas() As Integer, min As Double, cell As Range, i As Integer, j As Integer, k As Integer min = r.Range("A1").Value For Each cell In r If cell.Value < min Then min = cell.Value Next cell ReDim mas(1 To r.Rows.Count, 1 To 1) For i = 1 To r.Rows.Count k = 0 For j = 1 To r.Columns.Count https://www.cyberforum.ru/ vba/ thread605916.html Переставить элементы массива так, чтобы в начале оказались четные элементы, а в конце - нечетные VBA
Очередная,теперь уже последняя "проблема" с вба.Необходимо переставить элементы массива так,чтобы в начале оказались четные элементы,а в конце - нечетные.Размерность массива - задается вручную. Пробовал след. образом,но проблема возникла между Else,не знаю какой код туда вписывать,помогите. И вообще,правильно ли я сделал все остальное? Public Sub Arr_exerc() Dim i%, n%, a%() n =...
VBA Выборка только уникальных значений из БД в ComboBox Прошу помощи- не знаю как сделать одну вещь. Есть в акцесе на форме поле со списком- Me.ПолеСоСписком10. Оно заполняется из запроса (создал с помощью конструктора). Заполняется суммами. Получается много одинаковых сумм, а очень хочется чтобы суммы не повторялись. (В запросе это нельзя учесть он сложный) Как это можно реализовать? https://www.cyberforum.ru/ vba/ thread605656.html VBA Сформировать вектора х(4), значения элементов которого являются максимальные значения столбцов матрицы https://www.cyberforum.ru/ vba/ thread605535.html
составить программу формирования вектора х(4), значения элементов которого являются максимальные значения столбцов матрицы а(3, 4). а(3, 4) по строкам помогите, пожалуйста, как можно быстрее
Посоветуйте литературу для изучения VBA VBA
Извиняюсь возможно пишу не потеме, но не могли бы Вы помочь. Перенаправили в отдел программистов, раньше с программированием не был связан. Не подскажите полезный материал по VBA? Неделю читал книги, поковырял маленькие програмки а дальше что то не идет. Через месяц будет проэкт по конвертации из Ansysa и составлению программы по результатам, а я "ни бэ ни мэ"
VBA Отследить момент отправки документа на печать и отменить ее при необходимости https://www.cyberforum.ru/ vba/ thread605307.html
Добрый день всем! Есть ли какая то штатная макропроцедура по типу организации проверок при открытии/закрытии файла, которая бы реагировала на попытку печати документа? Есть необходимость запретить печать если пользователь не сделает предварительно некоторых действий.
VBA Вычислить вектор Y, каждая компонента которго определяется по формуле https://www.cyberforum.ru/ vba/ thread605273.html
Вычислить вектор Y, каждая компонента которго определяется по формуле. Задание прикрепил. x(i) я вычислил, подскажите пожалуйста что делать дальше?
VBA Записать в автоматическом режиме макрос, с заданным именем, описанием, клавиатурной комбинацией вызова и действиями
Имя макроса Строка Описание Позволяет выделить три подряд идущие в строку ячейки Клавиатурное сочетание Ctrl+y Действие Для выбранных ячеек изменить цвет заливки и цвет шрифта
VBA Добавить кнопку на панель инструментов Добавить кнопку на панель инструментов. Имя кнопки Почта FaceID 45 Выдаваемое сообщение по нажатию кнопки Поверив e-mail, не забудь про почтовый ящик возле двери https://www.cyberforum.ru/ vba/ thread605184.html VBA Создать панель инструментов из двух кнопок Создать панель инструментов из двух кнопок. Вывод сообщений реализовать через диалоговое окно. Имя 1-й кнопки Очко FaceID 1-й кнопки 483 Действие по нажатию 1-й кнопки Проверяет, равно ли число в ячейке А1 числу 21 Имя 2-й кнопки Покер FaceID 2-й кнопки 484 Действие по нажатию 2-й кнопки Сообщение «Азартные игры не только запрещены, но и бьют по кошельку» https://www.cyberforum.ru/ vba/ thread605182.html
VBA Не работают функции на других ПК
Такое дело: жили себе функции на одном компьютере, работали. Принесли их домой и дали мне. Не работают. Ну, думаю, офис у меня 7ой, а там 2003ий. Достаю 2003тий эксель, открываю - не работают. Уровень безопасности на всякий случай минимальный поставила. Но в графе функции "определенные пользователем" они не отображаются. Только код от них есть, когда открываешь редактор. Function S(Str...
VBA Исправление приращений, расчет координат для измеренных левых углов при обработке замкнутого теодолитного хода https://www.cyberforum.ru/ vba/ thread604677.html
Ребята очень нужна помощь по созданию таблицы спецификации, программу прилагаю. Заранее ОГРОМНОЕ СПАСИБО!!! Private Sub CommandButton1_Click() Const Pi180 As Single = 0.01745329 Dim i As Integer, i1 As Integer, M As Integer Dim SA As Single, EA As Single, F As Single, SX As Single, SY As Single Dim EX As Single, EY As Single, DX As Single, DY As Single ' Определение M (число точек + 4),...
200 / 98 / 2
Регистрация: 24.09.2011
Сообщений: 261
15.06.2012, 10:55 0

Как указать адрес ячейки через переменную - VBA - Ответ 3168997

15.06.2012, 10:55. Показов 63133. Ответов 31
Метки (Все метки)

Ответ

Цитата Сообщение от nnndaniil Посмотреть сообщение
я сам запутался =(
нужно что бы макрос работал только для тех ячеек, где есть значение.
я всегда делал так:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
With ОбластьТипаRange
Dim obLast as Range, obCurr as Range
set obLast = .Find("*", searchdirection:=xlPrevious)
if Not obLast is nothing then
set obCurr = obLast
do
set obCurr = .Find("*", after:=obCurr)
Call ОбработкаНайденнойЯчейки(obCurr)
loop obCurr.Address = obLast.Address
endif
end with
Там возникают проблемы, только если по ходу обработки удаляешь или вставляешь ячейки. Не помню этих тонкостей, но если кому надо будет...

Не по теме:

как тут в коде VB вставлять отступы? тэг[INDENT] не работает =/



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

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

Как сохранить в переменную адрес активной ячейки, а затем эту ячейку выделить?
Физический смысл такой: Когда пользователь клацает по листочкам, активируется макрос, закрепляющий...

Можно ли указать адрес ячейки, путем выделения её на листе?
Привет! Задача такая: Программа должна переносить данные с одной ячейки в другую. Т.е. выбираем...

указать адрес получателя из ячейки access
Добрый день, а может у кого-то уже и вечер! Нужна помощь. Не могу сделать макрос(или что-то...

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

Как указать аргумент через переменную?
есть код: ShellExecute (NULL, L&quot;open&quot;, L&quot;C:\\Program Files\\1Cv77\\BIN\\1CV7.exe&quot;, L&quot;enterprise /M...

Как записать 0 в переменную через ее адрес?
Здравствуйте. Как записать 0 в переменную через ее адрес? .data curDay BYTE 11h curMonth ...

Как указать адрес "ячейки"?
Здравствуйте! Есть таблица, создана ленточная форма. Операторы вбивают инфу в &quot;главной&quot; форме по...

Указать адрес ячейки Excel цифровыми координатами, а не буквенными
Открываю или создаю, если нету, файл Excel и забиваю в него данные. ​*private void...

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