Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Если значение ComboBox повторяется, то на листе в другом столбце данные обновляются https://www.cyberforum.ru/ vba/ thread455185.html
Подскажите пожалуйста, у меня есть ComboBox, который выводит данные на лист, как реализовать код, если значение ComboBox повторяется, то на листе в другом столбце данные обновляются и к существующим прибавляются новые.
VBA Отключить автозаполнение listobject
Еще один вопрос по таблицам listobject. Если туда записать формулу, например "=890", она заполнится по всему столбцу. Если после нажать отмену, заполнение снимается. А как отменить автозаполнение в таблицах, если я вставляю формулу через vba? Можно ли отключить его временно до начала функции, затем снова включить?
VBA Получить стандартные значения критерия Фишера нужно без использования листа EXCEL получить стандартные значения критерия Фишера Sub macros() ' эта часть работает нормально ActiveCell.FormulaR1C1 = "=F.INV(0.999,2,10)" Application.Calculate ' а хочется примерно вот так, но это не работает rrr = F.INV(0.999, 2, 10) End Sub https://www.cyberforum.ru/ vba/ thread455110.html VBA Как сделать, чтобы в comboBox с листа заносились числа https://www.cyberforum.ru/ vba/ thread455089.html
Подскажите пожалуйста, вот у меня есть код, который работает для Combobox, в котором выводится строковое значение ComboBox1.Clear Worksheets("СТ").Select m = Application.CountA(Sheets("СТ").Range("A:A")) ComboBox1.RowSource = "A2:A" & CStr(m) А как сделать чтобы в combobox с листа в Combobox...
Массив должен заполняться при открытии Workbook и быть статически доступным VBA
Есть таблица чисел. Требуется при открытии файла EXCEL создать массив и наполнить его из этой таблицы. В дальнейшем в течение всего времени работы файла массив должен быть доступен для чтения. Обращаться к нему планируется из другой функции, определенной пользователем. Я так понимаю, что массив должен быть static, но почему то у меня не получается его так объявить... Пример: Static...
VBA Как сделать, чтобы TextBox не терял фокус https://www.cyberforum.ru/ vba/ thread454999.html
ни как не могу понять помогите! Суть задачи: есть форма там Textbox В него вводится штрих код. Дальше проверка, создание 4 баз и т.д. Так как ввод штрих кода тока в Textbox1 необходимо чтоб курсор не переходил с Textbox'а т.е. Сначала проверка если прошла проверку то заносим в базу зануляем значение Textbox'а и снова курсор мигает там же! Как сделать чтоб курсор ни куда не уходил?
VBA Продажи жилья за полгода: Напечатать исходные данные в виде таблицы Здравствуйте! Передо мной встал вопрос о решении задачи в системе VBA. Но возникли трудности, я попросту не знаю как написать код и блок схему. Условие таковы: По результатам продажи жилья за полгода администрацией области получена следующая информация: Город: Кемерово Кол-во проданных квартир: 634 Кол-во кв.м: 62800 Сумма от продажи (тыс.руб0 - 6781.70 https://www.cyberforum.ru/ vba/ thread454684.html VBA Из БД Access импортируется таблица, нужно разбить ее на 40 строк
подскажите плиз !!! из акссеса импортируется таблица , нучто чтобы она разбивалась по 40 строк ! как это сделать ?
VBA Как определить, в каком из ComboBox было выбрано значение https://www.cyberforum.ru/ vba/ thread454509.html
Здравствуйте. В Excel документе есть 4 выпадающих списка, все они связаны с одним и тем же макросом, как определить из какого списка пришел "сигнал", например Select case РазкрСписок Case 1 тогда... Case 2 Case 3 Case 4 End Select Подскажите как должно быть.
VBA Записать макрос, который создает деловое письмо, содержащее адреса отправителя и получателя https://www.cyberforum.ru/ vba/ thread454453.html
Помогите пожалуйста с написанием макроса.Вот такое задание : Записать макрос, который создает деловое письмо, содержащее адреса отправителя и получателя, приветствие, деловое предложение (основная часть), дату отправления. Создать на панели инструментов кнопку и назначить ей данный макрос.
VBA Есть массив (1 2 4), нужно получить из него другой массив, путем вычета из следующего числа предыдущее
Доброго времени суток. Мне нужно посчитать первые разности. Например. Есть массив (1 2 4), нужно получить из него другой массив, путем вычета из следующего числа предыдущее, то есть 4-2=2 и 2-1=1, получаем новый массив (2 1). Вот код, выводит ошибку "Type mismatch" ничего не подчеркивая. Не знаю, где там у меня несовпадение. Sub m_x() Dim Массив_1() As Variant, Массив_2() As Variant Dim...
VBA Изменить цвет линии в графике XYScatterPlot изменяя свойство oSeries.Format.Line.ForeColor https://www.cyberforum.ru/ vba/ thread454313.html
Коллеги, Пытаюсь изменить цвет линии в графике XYScatterPlot изменяя свойство oSeries.Format.Line.ForeColor (строчка 17). Код вываливается с ошибкой "Type mismatch". Почему ширина линии изменяется нормально, а цвет - свойство того же объекта - нет?? Set oChart = oRefWB.Sheets(cTemplate).Shapes.AddChart(xlXYSc
Эксперт WindowsАвтор FAQ
18007 / 7708 / 892
Регистрация: 25.12.2011
Сообщений: 11,481
Записей в блоге: 16
29.02.2012, 18:47 0

Как получить список папок в заданной директории - VBA - Ответ 2540232

29.02.2012, 18:47. Показов 41540. Ответов 9
Метки (Все метки)

Ответ

Апострофф, да, я был не прав. vbDirectory=32, если папка в корне и = 16, если это подкаталог.

Эту строку 'If GetAttr(path & "\" & D) And vbDirectory Then' я, конечно, подсмотрел на MSDN, но нифига не понял зачем там 'vbDirectory). А вот "." и ".." нужно фильтровать.

Также не вкурил почему в руководстве пишется - команда Dir запоминает параметры первого вызова, но в моем коде она все равно выводит в т.ч. имена файлов.

И еще вопрос: написано, что нужно ставить двойные кавычки Chr(34), если в имени папки есть пробелы. Но у меня все работает и без них. И наоборот ничего не выдает/работает неверно, если их указать.

Вернуться к обсуждению:
Как получить список папок в заданной директории VBA
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.02.2012, 18:47
Готовые ответы и решения:

Список файлов и папок в заданной директории
Всем здравствуйте. Скажите как получить дерево файлов и папок в заданной дериктории? И все это в...

Получить список папок в заданной директории и вывести в ListBox
Работаю в vb2010. Как можно узнать список папок, которые находятся в данной директории:...

Как получить список файлов и папок в директории
Как получить список файлов и папок в директории (именно в директории, без файлов подпапок)?

Получить список файлов и папок в директории
Вот такой вопрос возник, допустим я хочу написать что то типа файлового менеджера, как мне получить...

9
29.02.2012, 18:47
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.02.2012, 18:47
Помогаю со студенческими работами здесь

Список всех файлов и папок указанной директории по заданной маске
Здравствуйте! Требуется написать программу, используя FileNameFilter которая выведет на экран...

Отобразить в консольном окне список всех папок заданной директории
Отобразить в консольном окне список всех папок заданной (любой) директории. В случае её отсуствия...

Получить список всех папок и подпапок в директории
Нужно получить список всех папок, подпапок и файлов в них - из указанной директории.

Получить список файлов в заданной директории
Доброго времени суток! Раздобыл код с получением списком файлов: #include <iostream> #include...

Получить список всех файлов в заданной директории
помогите, плз. Каким способом можна выгрести все файлы (dbf, xls и т. д.) в заданной директории...

Как получить имена всех папок в определенной директории?
Как получить имена всех папок(не файлов!) в данной дир-ие?

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru