|
|
| Другие темы раздела | |
| VBA Найти сумму положительных чётных чисел, меньших заданногого 1)Найти сумму положительных чётных чисел, меньших заданного. 2) Определить кол-во элементов массива(динамического, одномерного) которое меньше своего индекса https://www.cyberforum.ru/ vba/ thread110396.html |
Написание программ с использованием операторов управления VBA Вводить последовательность до тех пор, пока не встретятся три подряд идущих положительных числа. Тогда прервать ввод и сообщить, сколько во введенной последовательности было всего чисел. Присутствуют ли во введенном массиве отрицательные числа. Если да, то под каким номером встречается первое из них. |
|
VBA Вычислить сумму
https://www.cyberforum.ru/ vba/ thread110285.html Вычислить сумму S=1!-2!+3!-......+n! |
VBA Разработать схему алгоритма
https://www.cyberforum.ru/ vba/ thread110017.html к Заданию 2 Sub Задание2() Dim C() Range("A:A").ClearContents ' n = InputBox("Размерность массива", , 10) ReDim C(1 To n) For i = 1 To n C(i) = Val(InputBox("Введите элемент массива", "Элемент №" & i, Int((Rnd - 0.5) * 10))) Cells(i, 1) = C(i) |
|
в чом ошибка? VBA Здравствуйте! Прошу уделить мне минутку внимания. имеется код Dim ActiveSht As Worksheet Dim NewWb As Workbook Set ActiveSht = Worksheets("Vip_nal") Set NewWb = Workbooks.Add ActiveSht.Copy Before:=Workbooks(NewWb.Name).Sheets(1) |
VBA Случайная генерация отрицательных и положительных чисел
https://www.cyberforum.ru/ vba/ thread109891.html люди добрые, подскажите, как сгенерировать через rnd отрицательные цифры? умею только положительные, а завтра экзамен сдавать, а даже самого простого не знаю( |
| VBA Запись формул для вычисления функции Уважаемые программисты, не подскажете, как записать формулы в VBA, чтобы был вывод в книгу Excel вычисление у =ЕСЛИ(C12=0;1;((ATAN(C12)/C12)*EXP(-C12))), С12- это значение х вычисление экстремумов =ЕСЛИ(D12=МАКС($D$12:$D$32);"<=макс."; ЕСЛИ(D12=МИН($D$12:$D$32);"<=мин.";"")), где D12-это значение у вычисление шага табулирования h=(b-a)/n, где а, b, n - константы https://www.cyberforum.ru/ vba/ thread109710.html |
Работа с word через excel (передача строки) VBA Здравствуйте, возникла следующая проблемка, а точнее вопрос: Есть файл excel, который при определенном действии создает файл word. Dim wdDoc As Object, wdApp As Object Dim STR1 as String Str1 = CStr(Worksheets("Лист1").Cells(i, 1)) |
|
VBA Все элементы целочисленного вектора a размерности N, для которых справедливо условие ai=i, заменить нулем
https://www.cyberforum.ru/ vba/ thread109535.html задача есть решенная, но препод просить сделать ее в столбце начиная с ячейки (3,2) и что бы элемент в этой ячейке считался первым в массиве, а не элемент в ячейке (1,2) Private Sub CommandButton1_Click() Dim x() As Integer Dim N As Integer i = 3 While Cells(i, 2) <> "" i = i + 1 Wend N = i - 1 TextBox1.Value = N |
VBA Табулирование по VBA
https://www.cyberforum.ru/ vba/ thread109503.html Уважаемые программисты, помогите девушке составить программный код табулирования функции. эту задачу решила с помощью MicroSoft Excel (1-ая картинка) вычичление у =ЕСЛИ(C12=0;1;((ATAN(C12)/C12)*EXP(-C12))), С12- это значение х вычисление экстремумов =ЕСЛИ(D12=МАКС($D$12:$D$32);"<=макс."; ЕСЛИ(D12=МИН($D$12:$D$32);"<=мин.";"")), где D12-это значение у вычисление шага табулирования... |
|
Замена знака тире в строке на числа VBA Например, в Word в диалоговое окно печать вводим 1-30, что означает распечатать страницы с 1 по 30. Я с помощью inputbox получаю такую строку 1-30, как заполнить остальные цифры 2, 3, 4 и до 29? |
VBA Кнопка: посчитать сумму первых 100 чисел из столбца "А" на листе помогите пожалуйста с задачкой, вообще нужно сделать кнопку при нажатии на которую считалась сумма первых 100 чисел, указанных допустим на листе 1 в столбце а https://www.cyberforum.ru/ vba/ thread109424.html |
|
496 / 130 / 19
Регистрация: 30.03.2010
Сообщений: 224
|
||||||
| 30.03.2010, 10:46 | 0 | |||||
Сводная таблица - Ошибка '438' - VBA - Ответ 63011630.03.2010, 10:46. Показов 4284. Ответов 3
Метки (Все метки)
 Сообщение было отмечено Памирыч как решение
Решение
ActiveWorkbook.PivotCaches не имеет метода Create
Попробуйте метод Add То есть:
Вернуться к обсуждению: Сводная таблица - Ошибка '438' VBA
1
|
||||||
| 30.03.2010, 10:46 | |
|
Готовые ответы и решения:
3
Сводная таблица из нескольких Сводная таблица через VBA Сводная таблица из нескольких листов |
| 30.03.2010, 10:46 | |
| 30.03.2010, 10:46 | |
|
Помогаю со студенческими работами здесь
0
Сводная таблица + расчёт динамики по периодам
Сводная таблица по данным из БД в один клик ошибка 438 |
Наверх