|
|
Другие темы раздела | |
VBA Пункт в Combobox под курсором
https://www.cyberforum.ru/ vba/ thread1301609.html Здравствуйте. Меня интересует следующий вопрос. Как в раскрывшемся списке в combobox получить номер пункта, над которым находится курсор мыши? Какое событие нужно обработать? |
VBA В зависимости от знака произведения чисел в каждой паре элементов массива оставить от 0 до 2 чисел Sub Random() Dim I Randomize For I = 1 To 12 Cells(1, I) = Int(21 * Rnd) - 10 Next End Sub Sub Laba3var10() Dim a() As Double |
VBA Запрос в VBA, синтаксис "больше чем"
https://www.cyberforum.ru/ vba/ thread1301517.html Найти всех собственников, авто которых стояли на стоянке больше указанного времени. Время вводится дополнительно. Private Sub cmdZaput2_Click() Sheets("Запрос2").Range("A2:D100").Clear Время = InputBox("Введите время") If Время > 0 And Время < 24 Then Worksheets("Зарегистрированные").Activate Range("F2").Activate k = 2 Do While ActiveCell.Value <> Empty r =... |
VBA Выводит ошибку Next Without For Подскажите пож. почему первый Next выдает ошибку Next Without For . Пробовала поменять местами next i endif не помогло. Sub zad7() k = Selection.Columns.Count Dim x() As Variant ReDim x(k) Dim y() As Variant ReDim y(k) Dim z() As Variant https://www.cyberforum.ru/ vba/ thread1301420.html |
Подскажите, пожалуйста, что делает следующий кусочек кода VBA Подскажите пожалуйста, что делает следующий кусочек кода: Dim NewBook As Variant, NewPage As Variant, aktPage As Variant Dim colvo As Integer, i As Integer Dim Way As String Dim num, str As String (Это я понимаю задаем переменные) Application.DisplayAlerts = False ' запрещает задавать вопросы, то есть сохранить ли изменения и т.д. Set aktPage = ActiveSheet... |
VBA Выделить первую строку текста в ячейке средствами VBA Уважаемые форумчане! Подскажите пожалуйста, как с помощью VBA выделить (скопировать) первую строку текста в ячейке? Первая строка ограничивается Chr(10) https://www.cyberforum.ru/ vba/ thread1301330.html |
VBA Выходит только одно значение. Что сделать, чтобы выходил массив?
https://www.cyberforum.ru/ vba/ thread1301225.html Function fun32(m As Integer, n As Integer) For x = 2 To 3 Step 0.2 s = 2 ^ ((m * x) / (n * Log(x))) fun32 = s Next End Function В данном примере должно выходит 5 значений,как это сделать? |
Подсчет количества строк в Excel VBA День добрый. Имеется макрос. одной из задач которого стоит загрузка данных в базу SQL с другого документа excel. данные в том докменте постоянно прибавляются, становиться больше строк. Sheets("Data").Select Dim J as Long With ActiveWorbook for J = 5 to 400 SQL = "insert into ......" Set RS = xCon.Execute(SQL) Nex J End with |
VBA Как поместить форму рядом с активной ячейкой? Здравствуйте. В приложенном файле если щёлкнуть два раза по любой ячейке, то появится форма. С помощью API-функции GetCursorPos и двух функций Excel: PointsToScreenPixelsX и PointsToScreenPixelsY, можно поместить форму рядом с ячейкой, по которой щёлкнули (если щёлнкуть по ячейке, то ячейка станет активной)? https://www.cyberforum.ru/ vba/ thread1301068.html |
VBA Cбор данных с разных одинаковых по смыслу, но разных по значению ячеек, книг
https://www.cyberforum.ru/ vba/ thread1301017.html Суть вот в чем, идет сбор данных с разных одинаковых по смыслу, но разных по значению ячеек, книг (их 13, 2 одно строчные портянки) в одну книгу. Неохота (= и прописывать каждую ячейку), есть выход? |
VBA Информационная система, которая анализирует изображение (на котором график) Задание: " Создать информационную систему(ИС) которая по заданному изображению в формате *.bmp при помощи алгоритма определяет количество пикселей, цвета заданного пользователем. Объединяет пиксели в фигуры или объекты и потом создает аппроксимирующую функцию для объяснения и прогноза пикселей". На изображениях должны быть графики, ИС должна анализировать их и выдавать функцию прогноза.... |
VBA Составить программу определения числа комнат в музее и площади каждой комнаты в клетках
https://www.cyberforum.ru/ vba/ thread1300877.html Вариант 6 Комнаты музея. Составьте программу определения числа комнат в музее и площади каждой комнаты в клетках. План музея показан ниже на рисунке. Площадь музея состоит из клеток: n рядов и m столбцов. В каждой клетке такой матрицы (цифровая карта) проставляется число, в котором кодируется наличие стен у данной клетки. Значение числа в каждой клетке является суммой чисел: 1 (клетка имеет... |
0 / 0 / 0
Регистрация: 10.08.2012
Сообщений: 21
|
||||||
0 | ||||||
Обработать выделенный массив с изменением данных согласно формулам из примера - VBA - Ответ 685588116.11.2014, 01:05. Показов 566. Ответов 2
Метки (Все метки)
Здравствуйте форумчане!
Помогите, пожалуйста, с вопросами... У меня есть исходный массив, который нужно преобразовать по определенным формулам и вывести на новый лист. На данный момент: выделил исходный массив - активировал код - получил на новом листе почти то, что нужно - и все... (1) Подскажите, как при запуске кода можно предоставить выбор для выделения требуемого диапазона? То есть чтобы появлялись надписи и соответствующие кнопки: - "Выделите исходный массив!" - ОК - "Вы уверены?" - ДА / НЕТ Если выбрал ДА - пошел цикл программы, если - НЕТ, то все сначала. (2) А еще не могу понять каким образом по ходу заполнения нового массива на новом листе осуществить изменение цвета по нужным правилам? СПАСИБО! Вот код:
Вернуться к обсуждению: Обработать выделенный массив с изменением данных согласно формулам из примера VBA
0
|
16.11.2014, 01:05 | |
Готовые ответы и решения:
2
Обработать одномерный массив согласно условию Обработать одномерный массив согласно условию задачи Обработать одномерный массив согласно условию задачи Обработать одномерный массив согласно условию задачи |
16.11.2014, 01:05 | |
16.11.2014, 01:05 | |
Помогаю со студенческими работами здесь
0
Какой командой в макросе обработать выделенный в ячейке кусок текста? Нарисовать три графика согласно формулам Обработать текст согласно условию Обработать вещественное число согласно условию |