|
|
| Другие темы раздела | |
|
VBA Смена порядка отображения шейпов на листе
https://www.cyberforum.ru/ vba/ thread2262615.html Добрый день, специалисты по ВБА. Есть макрос, расставляющий шейпы на листе - по таблице J4:P18, в которой указаны координаты, ширина и высота шейпа. Подскажите как поменять уровни видимости для указанных шейпов - по таблице J4:P18 ? Уровни видимости проставлены в столбце P4:P18 (это целые числа без повторов 1,2,3,4 и т.д.). Если уровень видимости равен 1 - то этот объект должен быть... |
Экспорт данных с формы в Word и в Excel VBA Добрый день, уважаемые товарищи! Столкнулся с проблемой экспорта данных с готовой формы в Access в готовые документы в Word и Excel. На форме создал 2 кнопки - одна для экспорта в word, вторая - excel. Для них создал модули С экспортом в excel почти все заработало, только не выводит полный список товаров по Sql запросу. Вот код Option Compare Database Option Explicit Public Sub... |
| VBA Легенда диаграммы Здравствуйте, товарищи программисты! :) Помогите пожалуйста дополнить код, чтобы в легенде диаграммы вместо ряд1, ряд2... записывались значения ячеек B1 и F1. Private Sub CommandButton11_Click() Dim s As String, b As String, Rng As Range, mychart As Chart b = TextBox5.Text If b > 1 Then https://www.cyberforum.ru/ vba/ thread2262588.html |
VBA Вывод данных в новой строке с нумерацией в VBA
https://www.cyberforum.ru/ vba/ thread2262485.html Выручайте, пожалуйста, уже не знаю куда смотреть. Есть задание: В одной программе с помощью условного оператора IF организовать расчет функции y по трем различным формулам в зависимости от значения аргумента x, введенного с клавиатуры в диалоговом режиме. Предусмотреть в программе вывод в отдельные ячейки на лист Excel согласно представленному ниже образцу: значения аргумента x, номера ветви для... |
|
Надстройки VBA Доброго времени суток, форумчане! Подскажите, каким образом можно извлечь исходный код установленных надстроек? Чтобы его можно было редактировать и копировать его части в другие проекты??? |
VBA Представление графа по матрице смежности
https://www.cyberforum.ru/ vba/ thread2262333.html Всем здравствуйте. Вопрос специалистам. Подскажите - как макросом - примерно нарисовать граф, представленный матрицей смежности ? |
| VBA Формирование сводной таблицы Ребят, программа по учету Средств Индивидуальной Защиты. во вложении пример того, что хочу сделать. нужно из сформированной таблицы (Кнопкой "Автозаполнение"), на другой вкладке сделать что-то вроде сводной таблицы. пример: (вкладка ""База сотрудников") когда срок носки (колонка Статус) n-ое количество дней, добавление в таблицу (вкладка "Заказ СИЗ") кол-ва СИЗ размеров нужных размеров....... https://www.cyberforum.ru/ vba/ thread2262320.html |
Отправка SQL кода из Excel в Access VBA Есть SQL код на обновление определенной строки и надо что-бы в него подставлялись значения в Excel и SQL код отправлялся в Access а затем выполнялся в Access. Вот SQL код: UPDATE ЗНАЧЕНИЕ SET ЗНАЧЕНИЕ = 'ЗНАЧЕНИЕ' WHERE = 'ЗНАЧЕНИЕ' |
| VBA Регулярное выражение для нескольких шаблонов Function REG(ИсходныйТекст As String, Шаблон As String, _ Optional Разделитель As String = " ", Optional УчётРегистра As Boolean = False) As String Dim RE As Object Dim MC As Object Dim arrS() As String, i% Set RE = CreateObject("VBScript.RegExp") With RE .Global = True https://www.cyberforum.ru/ vba/ thread2262094.html |
VBA Найти количество всех трёхзначных чисел кратных 2 и не кратных 3
https://www.cyberforum.ru/ vba/ thread2261947.html задание : найти количество всех трёхзначных чисел кратных 2 и некратных 3 |
|
Не работает функция проверки и разбиения строки VBA Привет! Имеется макрос, заполняющий шаблон Word документа значениями из ячеек Excel. В данном макросе есть функция проверки значения в ячейке excel на превышение 256 символов и вставки текста в шаблон Word пошагово, если значение превышает 256 символов. Пример: в ячейке "C16" в Excel файле, текст превышающий 256 символов. Данная функция Sub Replace() должна "поделить" строку на части и... |
VBA Обращение к макросу или кнопке Здравствуйте! имеется макрос выполняющий расчет, и выводит промежуточные и конечный результаты на лист. Хочу переделать, чтобы --по нажатию первой кнопки он проводил расчеты и выводил конечный результат --при нажатии второй кнопки выводил на лист его промежуточные результаты. Собственно вопрос: -- можно ли во 2 макросе обращаться к переменным из первого, которые содержат эти... https://www.cyberforum.ru/ vba/ thread2261560.html |
|
0 / 0 / 0
Регистрация: 11.06.2018
Сообщений: 5
|
||||||
| 11.06.2018, 23:12 [ТС] | 0 | |||||
Как сократить код - VBA - Ответ 1246895011.06.2018, 23:12. Показов 1735. Ответов 9
Метки (Все метки)
Ответ
Я новичок если можно малениким пример. Я панимаю что это должен быть или массив или цикл. но сосдавать их ищьо не умею. Таких условий должно быть 500 (поскольку ТехтBох-ов есть 500)
нашел пример:
примерно там же где и условия (мой код). https://www.cyberforum.ru/atta... 1528748201 Вернуться к обсуждению: Как сократить код VBA
0
|
||||||
| 11.06.2018, 23:12 | |
|
Готовые ответы и решения:
9
Помогите как сократить код Как можно сократить код
|
| 11.06.2018, 23:12 | |
| 11.06.2018, 23:12 | |
|
Помогаю со студенческими работами здесь
0
Очень длинный код... Кто подскажет как сократить Как сократить код? При запуске кода ошибка Procedure too large Сократить код Помогите сократить код |
Наверх