|
|
Другие темы раздела | |
VBA Сортировка массива по возрастанию с удалением одинаковых значений Доброго времени Уважаемые форумчане, с сортировкой массива в котором есть цифры трудностей не возникло, но как по возрастанию отсортировать такие данные в массиве ( Dim A(0 To 5) As String A(0) = 340x350x110 A(1) = 440x340x300 A(2) = 340x220x110 A(3) = 440x340x300 A(4) = 340x300x220 A(5) = 500x400x300 https://www.cyberforum.ru/ vba/ thread2143290.html |
VBA Создать таблицу, которая содержит сведения о продаже книг Здравствуйте! Предо мной такая задача: 1.Создать таблицу, которая содержит сведения о продаже книг.*Структура таблицы: -*название книги; -*фамилия автора; -**номер магазина; -*цена; -*продано; -*остаток. 2. Предусмотреть возможность добавления в таблицу произвольного |
VBA Заполнение ListBox: исключить возможность занесения одинаковых значений
https://www.cyberforum.ru/ vba/ thread2143067.html Cтрою ListBox, добавляя в список имена файлов, выбираемые через Диспетчер Файлов. Надо исключить возможность добавления файла повторно. Конечно, можно перебирать каждый раз перед попыткой добавления, но должен же быть прямой выбор, раз там коллекция. Формулирую вопрос: как узнать, есть ли в списке ListBox"а добавляемый элемент, избегая прямого перебора циклом по всем элементам списка? |
VBA Selection.Find.Replacement.Font.ColorIndex и Selection.Font.Color здравствуйте в макросах для этих двух инструкций в Ворде есть цвета, подходящие обоим? а то путаюсь где нужно писать wdRed где wdColorRed указание цифрами тоже иногда приводит к ошибкам, например = 2 RGB(250, 250, 250) для этих двух инструкций одинаково не походят, проясните пжл ситуацию, спс https://www.cyberforum.ru/ vba/ thread2143058.html |
В матрице m*n найти сумму четных элементов VBA помогите, пожалуйста. нужно найти сумму именно в матрице excel, vba. это возможно вообще без объявления массива? |
VBA Выделить вторую строку в ячейке таблицы | Word
https://www.cyberforum.ru/ vba/ thread2142977.html Здравствуйте Коллеги! Прошу помощи в решении следующей задачи. Есть таблица в ней ячейка содержит текст из двух строк. Необходимо научиться выделять вторую строку в ячейке для дальнейшей замены (редактирования). Во второй стоке "Экз. № " - постоянная, по замыслу "___" меняется на "1" и в обратном порядке. С уважением. |
VBA Обработчик ошибок On Error GoTo
https://www.cyberforum.ru/ vba/ thread2142911.html 'Составить программу подсчёта количества прожитых дней по введёной дате рождения до сегодняшнего дня. Sub ObrabotchikData() On Error GoTo ErrorDate MsgBox "Вы прожили " & Date - CDate(InputBox("Введите дату Вашего рождения")) & " дней" GoTo Ends: ErrorDate: MsgBox ("Неверное значение") Resume Next Ends: |
События листа VBA Задача примерно такая — имеется четыре ячейки, в которых находятся либо ноль, либо единица. Для простоты, пусть это будет первая строка и столбцы с 2 по 5. В первом столбце идентификатор объекта. Ноль или единица задают некие свойства объекта, при этом единица в наборе может быть только одна. Например, объекты это люди, а свойства это цвет волос. Блондин, брюнет, рыжий, шатен. Если запишем,... |
VBA Изменение размера шрифта в Word В один TextBox вводится номер (число) абзаца. В другой TextBox вводится размер (число) шрифта. При нажатии на кнопку происходит изменение размера текста в абзаце. Не совсем понимаю, как это реализовать. Не знаю, как обращаться к тексту в документе! https://www.cyberforum.ru/ vba/ thread2142550.html |
VBA Поиск по значению на другом листе и возвращение из этой строчки значений других ячеек
https://www.cyberforum.ru/ vba/ thread2142507.html Добрый день, есть таблица (база) на одном листе: |идентификационный №|, |описание|, |прочее|,..., |свойство|, |прочее|,..., необходимо на другом листе: при внесении в другую таблицу какого-то количества произвольно выбранных идентификационных номеров (они могут повторяться и содержать буквы) в соседних ячейках выдавал только описание и свойство то есть вид такой: |
Найти положительные числа в выделенном диапазоне с индексом 2 (двумерный массив) VBA Найти положительные числа в выделенном диапазоне с индексом 2 (двумерный массив). Где я ошибся ? Заранее благодарен Private Sub CommandButton1_Click() Dim m As Integer Dim i, c As Integer Dim t As String t = "" c = 0 m = Selection.Rows.Count ReDim sel(m - 1) |
VBA Чтение из базы данных ADODB
https://www.cyberforum.ru/ vba/ thread2142393.html Дорогие товарищи подскажите пожалуйста как прочитать данные из БД в переменную при помощи ADODB ??? Буду очень благодарна за помощь. |
Заблокирован
|
|
25.11.2017, 23:03 | 0 |
Почему if не работает? - VBA - Ответ 1188271925.11.2017, 23:03. Показов 1914. Ответов 12
Метки (Все метки)
Ответ
-F1 на слове If, я уже говорил.
Откуда я знаю, где вы и как вызываете эти функции... Вернуться к обсуждению: Почему if не работает? VBA
0
|
25.11.2017, 23:03 | |
Готовые ответы и решения:
12
Почему смена текста работает только один раз? Что неправильно в коде и почему? Почему выводится в виде таблицы и почему не работает сортировка Ноутбук работает только с Wi Fi роутера дома, в кафе не работает и везде. Почему? Не работает изменение, не могу понять почему, Update не работает, ошибку выдает |
25.11.2017, 23:03 | |
25.11.2017, 23:03 | |
Помогаю со студенческими работами здесь
0
Почему в iPhone не работает нажатие на телефонный номер, а в Android работает? Не работает удаление пробелов в строке! Подскажите пожалуйста, почему не работает? Почему один и тот-же код в WindowsForms работает, а в Web не работает? Почему программа не работает на MFC статичной библиотеки. а вот на стандартном мфс работает =Sum([BYN]) не работает под терминалом, если запустить нормально - все работает. ПОЧЕМУ ? Глобальные и локальные переменные, одна и та же прога в процедуре Не работает, а просто так работает. Почему? |