|
|
| Другие темы раздела | |
| VBA Десятичный разделитель в AutoCAD Добрый день. Возникла проблема при передаче десятичного разделителя в AutoCAD на разных компьютерах. Передаются дробные значения, при этом на одних машинах они передаются корректно, а на других передается только дробная часть числа в виде целого, то есть не 0,50 а 50. Облазил интернет но решения не нашел. Импорт csv при этом происходит с верным разделителем. Помогите кто чем может. Файл... https://www.cyberforum.ru/ vba/ thread1293380.html |
VBA Не работает wdActiveEndPageNumber (определение текущего номера страницы) при запуске макроса из Excel Добрый день. Из екселя считаю количество слов в документе и на какой странице они находятся. Собсвенно слова считает, перечисляет, но вот .Information(wdActiveEndPageNumber) не понимает((( Sub Zapusk_Word_iz_Excel(Filename) Dim objWrdApp As Object Dim objWrdDoc As Object Dim i, i1 As Integer Dim s, s1, s2 As String 'On Error Resume Next |
|
VBA Word 2013 Дополнительные действия, включенные в контекстное меню
https://www.cyberforum.ru/ vba/ thread1293267.html Известно, что текст в Word 2013 автоматически не распознается распознавателем смарт-тегов и не подчеркивается фиолетовой пунктирной линией, а вместо этого, пользователи могут вызывать пользовательские действия, связанные с текстом, выделив текст и нажав «дополнительные действия» в контекстном меню. Команда Application.SmartTagRecognizers показывает список подключенных распознавателей, и в... |
VBA Составить алгоритм и программу вычисления параметрической функции Составить алгоритм и программу вычисления функции y=F-0.35*x^2, гдe F=z-1, если z \leq -0.25 F=z^3, если -0.25<z<0 0.389, если 0 \leq z \leq 0.02 0, если z>0.02 https://www.cyberforum.ru/ vba/ thread1293236.html |
|
Составить блок схему по коду VBA Dim s As Double, x As Double ', h As Integer Const a = 0.7 Const y = 1.2 Private Sub CommandButton1_Click() ListBox1.Clear For x = 2 To 5.0001 Step 0.2 s = (x + a * Sqr(y)) ^ (1 / 3) * (Exp(1)) ^ (-x * y) ListBox1.AddItem "s=" + Format(s, "0.0000") Next |
VBA Создание кнопки
https://www.cyberforum.ru/ vba/ thread1293159.html Помогите выполнить задание: Создайте кнопку для сохранения всех открытых документов. Для определения количества документов воспользуйтесь свойством "count" Для доступа к документу- documents(<номер>), для того, чтобы узнать имя документа.nn |
|
VBA Копирование данных из одного файла в несколько других
https://www.cyberforum.ru/ vba/ thread1292959.html Всем доброго времени суток! Помогите с вопросом пожалуйста. есть несколько файлов (прайсов) в папке с разными именами (AA1_01, BS4_03, BS7_06 ну и так далее) и есть 1 файл где есть шаблон массива. Нужно скопировать массив из шаблона в остальные файлы присутствующие в папке в одно и тоже место (пример решения). Проблема в том что сделал макрос, но он такой-сякой работает только с тем файлом... |
Поиск тегов в HTML-документе, имя класса которого состоит из нескольких слов, разделенных пробелами VBA Всем привет. Умняши, подскажите, помогите, пожалуйста, как исправить сие недоразумение: при поиске тега "first left time" в результат входят и такие "first time left" ? :umnik::wall: Set Data = ie.document.getelementsbyclassname("first left time") x = 1 y = 0 For Each tdelement In Data ThisWorkbook.Sheets("Лист1").Cells(x + 1, y + 1).Value = tdelement.innerText x = x + 1 Next... |
|
VBA Вычислить сумму ряда, как используя операцию возведения в степень, так и не используя ее
https://www.cyberforum.ru/ vba/ thread1292701.html вычислить S=\sum_{i=1}^{6}{2}^{i} а) используя операцию возведения в степень; б) не используя операцию возведения в степень. |
VBA RND() выдает одну и туже комбинацию Доброго времени суток есть код Sub macro111() y = Selection.Row t = Selection.Column Dim asd As String asd = " -22* -21* -20* -19* -18* -17* -16* -15* -14* -13* -12* -11* -10* -9* -8* -7* -6* -5* -4* -3* -2* -1* 0* 1* 2* 3* 4* 5* 6* 7* 8* 9* 10* 11* 12* 13* 14* 15* 16* 17* 18* 19* 20* 21*" Dim awe() As String For i = 0 To 43 Erase awe() https://www.cyberforum.ru/ vba/ thread1292554.html |
|
VBA Выгрузить только первую строчку из таблицы У меня есть вот такая табличка (см.влж) Есть максрос кторый выгружается все на другой лист. Как мне сделать чтобы он одинаковые значения в столбцах от А до F не выгружал, а выгружал только первую строчку? Sub vugruzka() Sheets("результат").Select |
VBA Составить блок-схему алгоритма и программу для табулирования функции Составить блок-схему алгоритма и программу для табулирования функции s = (x + a * Sqr(y)) ^ (1 / 3) * (Exp(1)) ^ (-x * y) на отрезке x пренадлежит колличество значений аргумента 16, a=0.7 y=1.2. Dim s, x As Single, h As Integer Const a = 0.7 Const y = 1.2 Private Sub CommandButton1_Click() ListBox1.Clear For h = 2 To 5 Step 1 s = (x + a * Sqr(y)) ^ (1 / 3) * (Exp(1)) ^ (-x * y)... https://www.cyberforum.ru/ vba/ thread1292504.html |
| 10.11.2014, 14:26 | 0 | |||||
Многократное вычисление функцией - VBA - Ответ 683082810.11.2014, 14:26. Показов 529. Ответов 3
Метки (Все метки)
Ответ
Достаточно убрать строку
При изменении в ячейках аргументах, функция все равно пересчитывается. Вернуться к обсуждению: Многократное вычисление функцией VBA
0
|
||||||
| 10.11.2014, 14:26 | |
|
Готовые ответы и решения:
3
Предотвратить многократное выполнение события при работе с формами Вычисление факториала рекурсивной функцией (WinForms) Вычисление квадратного корня, не пользуясь встроенной функцией
|
| 10.11.2014, 14:26 | |
| 10.11.2014, 14:26 | |
|
Помогаю со студенческими работами здесь
0
Найти наиболее и наименее удаленные точки. Вычисление расстояния между парой точек оформить функцией Многократное объявление. Многократное срабатывание |
Наверх