|
|
| Другие темы раздела | |||||||||||||||||||||||
| VBA Как прочитать данные из txt- файла для последующей записи в ListBox1? При нажатии на кнопку производится запись чисел из массива в текстовый документ через запятую, только уникальные и на одной строчке. Вот код записи данных в файл. strfileSaveName = Application.GetSaveAsFilename("Result", _ fileFilter:="Text Files(*.txt), *.txt") intI = 1 Open strfileSaveName For Output As #1 For intI = 1 To intCountcell If strArr(intI) <> "" Then ... https://www.cyberforum.ru/ vba/ thread912426.html |
функция пользователя(график) VBA Подскажите ,как будет выглядеть функция пользователя в excel построить график:s(x)=2y+1.Для вычисления создать функцию пользователя y в vba: x^3+1 при x<-1 cos^2(x)+1 при -1<=x<=1 1-sin^2(x) при x>1 x принадлежит (-3;3) шаг 0,4 | ||||||||||||||||||||||
| VBA Расчет платы за поставку леса согласно тарифу Подскажите,как Создать функцию пользавателя для расчета платы за поставку леса,если таможенный тариф привывозе: в Китай состовляет 1000$ за 1куб метр в Японию 1500$ в европейские государства 2000$ в страны не имеющие долгосрочных договоров 2500$ Причем,если стоимость вывоза поставки >150000$,скидка10% от 200000 до 400000 $ ,скидка 15 % >400000 $,скидка 20% https://www.cyberforum.ru/ vba/ thread912406.html |
VBA Программы обработки, уплотнения и перестановки одномерного массива
https://www.cyberforum.ru/ vba/ thread912389.html Здравствуйте, помогите с заданием. Составить программу обработки элементов одномерного массива если в одномерном массиве А(30) найти среднее арифметическое абсолютных значений отрицательных элементов с нечетными номерами(SR) and Уплотнить одномерный массив B(20), выбросив из него элементы, которые больше M(M ввод с клавиатуры). Если таких элементов нет, в ячейке C2 напечатать "Элементов нет",... | ||||||||||||||||||||||
|
VBA Как достать переменную для использования в другом макросе? Вот код Sub Zadanie6() Dim strArr() As String, intVal As Integer, rngCells As Range, intCnt As Integer, intI As Integer, intA As Integer, intCountcell As Integer, varAW As Variant, strfileSaveName As String On Error Resume Next For Each rngCells In Selection intVal = rngCells.Value If rngCells.MergeCells Then |
VBA Не сохраняет часть данных из Excel в Access
https://www.cyberforum.ru/ vba/ thread912239.html Задание было: В соответствии с вариантом задания разработать структуры данных для хранения и формы для ввода, просмотра и редактирования данных, сформировать аналитический отчет по результатам работы за некоторый период времени. Продажа бытовой техники: филиал, менеджер, группа товаров, наименование, цена, количество, дата продажи. Анализ изменения объемов продаж по месяцам для заданного... | ||||||||||||||||||||||
| VBA Поиск слов внутри строки Приветствую всех знатоков VBA! До недавнего времени не сталкивался с этим языком, потому так пока и не добился конечного результата. После недели войны с VBA решил обратиться сюда. Надеюсь на вашу отзывчивость.:) Итак суть проблемы! Есть Excel файл на двух листах(вложен). Надоело заходить мне на второй лист и искать адрес(из яйчейки H6 с листа 1). Попытка автоматизировать это дело навело... https://www.cyberforum.ru/ vba/ thread912130.html |
Разбить число на сумму натуральных чисел VBA Здравствуйте, уважаемые форумчане! И снова я вынуждена обратиться к вам за помощью. Надеюсь, вы не откажете, не правда ли :)? Задача: написать программу для построения всех разбиений заданного натурального числа n на невозрастающие последовательности натуральных слагаемых. Используя эту программу, вывести разбиения числа 10. Например, число 2 имеет разбиения 2 и 1+1, а число 3 -... | ||||||||||||||||||||||
| VBA Как програмно сбросить размер вставленного рисунка в оригиналный размер? Привет. Хочу создать документ (бланку) состоящий из более 50 листов в которых будет вставлены рисунки. Нужно создать програмку на VBA чтобы автоматически сбросил размер рисунка на оригинальный размер рисунка. Не знаю как получить доступ к рисунку программно. Подскажите пожалуйста как это сделать с помощью VBA? https://www.cyberforum.ru/ vba/ thread911946.html | VBA Активная ячейка неактивного листа Excell Всем здравствуйте! Поиск по форуму и гуглу не увенчался успехом. Как определить адрес "активной ячейки" другого неактивного листа для использования в макросе? Т.е. другими словами как узнать имя переменной которая хранится в книге Excell об адресе активных ячеек. Если поменять текущие ячейки на разных листах. Сохранить книгу. Закрыть и открыть вновь. Активные ячейки будут теми которые оставил... https://www.cyberforum.ru/ vba/ thread911814.html | ||||||||||||||||||||||
|
сортировка VBA помогите пожалуйста! мне надо что бы в подпрограмму поступала строка, там ее сортировала и выводила слова по убыванию. вот я написал программу, а надо что бы это же было под программой. а в основной программе только ввод строки и вывод на экран. Sub nn() Dim s As String s = InputBox("Введите строку ") Do While InStr(1, s, " ") > 0 s = Replace(s, " ", " ") Loop mas = Split(s, " ") n... |
VBA Макрос автоматического графика - как?
Добрый день.
Задался идеей сделать автоматический график. То есть график, который бы появлялся раз в
Наверх
| ||||||||||||||||||||||
