|
|
Другие темы раздела | |
VBA Как остановить циклическое исполнение
https://www.cyberforum.ru/ vba/ thread1010217.html Есть код Option Explicit Public Data As Range Public Shtat As Range Private Sub Worksheet_Change(ByVal Target As Range) Set Data = Worksheets(1).Cells(9, 3) Set Shtat = Range(Worksheets(1).Cells(12, 2), Worksheets(1).Cells(2, 12)) |
Случайное значение из отфильтрованной таблицы VBA Есть табличка (например, для теста сделал футболистов). Я случайным образом выбираю любого футболиста из таблицы. Но, как сделать, чтобы выбор был осуществлен не из целой, а из этой же, но отфильтрованной по каким-нибудь критериям таблицы? Файл примера прикрепил. Код выбора из целой таблицы такой: Public Sub Rnd_AfterFilter() Dim rnd_row, lLastRow, Player lLastRow = Cells(Rows.Count,... |
VBA Создание и вызов пользовательской функции
https://www.cyberforum.ru/ vba/ thread1009889.html Создаю пользовательскую функцию применения границ ячеек и пытаюсь вызвать ее с аргументом. Выдает ошибку Option Explicit Public Rang1 As Range Public Rang2 As Range Public Rang3 As Range Sub Border() Set Rang1 = Range(Cells(2, 2), Cells(8, 2)) Set Rang2 = Range(Cells(2, 3), Cells(8, 4)) Set Rang3 = Range(Cells(2, 5), Cells(8, 5)) |
VBA Как отличить разрыв страницы от разрыва раздела в программе "Word"
https://www.cyberforum.ru/ vba/ thread1009865.html Скажите, пожалуйста, как отличить VBA-средствами разрыв страницы от разрыва раздела в программе "Word"? Или такого средства нет и нужно действовать обходными путями? |
Использование процедур для изменения массивов VBA Есть задача : Составьте процедуру, изменяющую исходный одномерный массив путем деления его положительных элементов на свои индексы и считающую число таких замен. Используя эту процедуру определите, в каком из двух заданных одномерных массивов А или В будет больше измененных элементов. Private Sub CommandButton1_Click() Cells.Clear Dim A() As Double, B() As Double, X() As Double, Y() As... |
VBA Построение схем на vba
https://www.cyberforum.ru/ vba/ thread1009803.html Не получается составить блок-схемы по этим двум задачам...запутываюсь с переходами в сложном решении программы( Кто может - дайте ответ... Sub pr4() Dim i&, j&, a(), SumUp As Double, SumDown As Double Cells.Clear i = 10: j = 10 'размерность матрицы With .Resize(i, j) .Value = "=RANDBETWEEN(150,350)": .Value = .Value a = .Value End With |
VBA Работа с ADO в Access Суть задания такова: Есть какая-то форма в БД Access и на ней размещена кнопка. Нажав эту кнопку должна открываться форма с элементом Список и туда должны выводиться все пользователи кто в данный момент подключен к этой БД. Вот обработчик события нажатия на этой кнопке: Option Compare Database Private Sub cmdCurrentUsers_Click() On Error GoTo HandleErr DoCmd.OpenForm "CurrentUsers"... https://www.cyberforum.ru/ vba/ thread1009498.html |
Работа с файлами VBA Создается форма, на форме текстовое поле и кнопка, по нажатию на которую создается файл и в него записываются данные с тестового поля. Что-то не получается. Private Sub CommandButton1_Click() Dim t As String t = TextBox1.Text Open "D:\text.txt" For Output #1 Print #1, t Close #1 End Sub |
VBA Программа на VBA в ms excel Здравствуйте уважаемые программисты, отвлекаю вас в очередной раз по поводу решения задачи, помогите написать код: найти во сколько раз произведение элементов главной диагонали квадратной матрицы А размера n x n превышает минимальный элемент этой матрицы. Главная диагональ содержит элементы с одинаковыми значениями индексов (номера строки и столбца). https://www.cyberforum.ru/ vba/ thread1009264.html | VBA Вставка и обработка данных в массиве Добрый день. Прошу помощи или совета. Исходные данные 1) эксель таблица, где есть ОДНА ячейка с данными: золото; черный; прозрачный (или другими данными например, 10, 20, 30). Значения разделены между собой знаком ; или , 2) мне нужно чтобы при нажатии на кнопку, макрос считывал эту одну строчку с данными. 3) далее отделил каждое значение друг от друга в простой массив 4) вывел данные... https://www.cyberforum.ru/ vba/ thread1009064.html |
Выбор языка обработчика VBA По сути продолжение темы про модули. Реализовать на экселе полноценно нереально. Теперь воникает вопрос на чём писать расчётчик. Брать данные и выгружать готовые результаты надо будет в БД. наглядность и максимально понятная отладка очень приветствуется. модуль расчёта будет запущен на внешнем сервере. |
VBA задача на тему линейный поиск
https://www.cyberforum.ru/ vba/ thread1008985.html даны 2 целочисленных массива k(m) и l(n). найти наибольший элемент массива k, не имеющий себе равных в массиве l. |
5 / 5 / 2
Регистрация: 21.07.2013
Сообщений: 362
|
|
17.11.2013, 21:25 [ТС] | 0 |
Присвоение переменной имени книги и листа - VBA - Ответ 534925717.11.2013, 21:25. Показов 58013. Ответов 34
Метки (Все метки)
Ответ
Как это правильно оформить
If IsNumeric(ячейка_в_которую_вводится_значение.Value) = False Then ячейка_в_которую_вводится_значение.Value = 0 Вернуться к обсуждению: Присвоение переменной имени книги и листа VBA
0
|
17.11.2013, 21:25 | |
Готовые ответы и решения:
34
Присвоение переменной имени книги Копировать содержимое листа одной книги, на лист в новую книгу с присвоением ей имени листа из которого копировали Присвоение Листа другой книги Сохранение текущего листа с сохранением имени листа и присвоением новой книге имени текущего листа |
17.11.2013, 21:25 | |
17.11.2013, 21:25 | |
Помогаю со студенческими работами здесь
0
Поиск значений по всем листам книги и вывод имени листа/столбца для всех совпадений Определение кодового имени листа и дальнейшее его использование в качестве переменной Присвоение имени переменной Сохранение листа книги в файле - проблема с защитой листа и привязкой макросов При создании нового листа произвести проверку на существование вводимого имени листа в текущей книге EXCEL Копирование строки с данными из листа одной книги в лист другой книги |