|
|
| Другие темы раздела | |
|
VBA Значение поля в текущей строке Access
https://www.cyberforum.ru/ vba/ thread1749213.html Здравствуйте! Подскажите пожалуйста как получить в access значение поля выделенной строки? пробовал так Dim a As Recordset Dim b As String Dim objDatasheet As Variant 'Set a = CurrentDb.OpenRecordset("select * from Uchastki where Status = '" + ÏîëåÑîÑïèñêîì43 + "'") objDatasheet = CurrentDb.OpenRecordset.Screen.ActiveDatasheet.Recordset.Fields(kod_uch).Value 'DoCmd.OpenForm... |
Следование vba. Непонятно VBA Плес,очень нужна помощь. Написать смог только в mathcad. |
|
VBA Заполнение данных с формы на лист
https://www.cyberforum.ru/ vba/ thread1749141.html На листе Расписание есть форма. При заполнении ее и нажатии кнопки Заполнить на лист в определенную ячейку должна записаться группа. Заранее спасибо. |
VBA Перевод программы с Pascal в VBA Помогите, пожалуйста, перевести код Procedure Hord(A,B:Real; E:Real; var X, Fx:Real;n:integer); var X0,Fa,Fb:real; Begin if dF2(A,n)*F(A,n) > 0 then begin X:=B;X0:=A; Fa:=F(A,n); https://www.cyberforum.ru/ vba/ thread1748944.html |
|
Разработка пользовательских диалоговых окон VBA 9ое задание |
VBA Внутри With / End With обратиться к объекту а не его компонентам Существует ли способ внутри With objectExpression End With обратиться к самому objectExpression? Например в коде With Word.Application.ActiveDocument https://www.cyberforum.ru/ vba/ thread1748622.html |
| VBA Vba суммирование значений до достижения определенного значения Добрый день! Прошу Вашей помощи, уже всю голову сломала. Необходимо разделить таблицу на несколько частей. Критерий - вес заказа не должен превышать 18500 кг. А дальше программа нарезает эту таблицу и создает для каждой такой части отдельный лист. в коде, где шаг 33 и в условии ii+32 - в этом месте надо организовать так, чтобы при достижении суммы в столбце 8 в 18500 кг он шел на второй круг... https://www.cyberforum.ru/ vba/ thread1748520.html |
VBA Копирование данных из ячейки одного листа на другой с условием Копирование данных из ячейки одного листа на другой с условием На листе 1 в ячейках B4: ... ОТКАЗ - 306002 3 - 306000 1 - 306001 5 - 306001 ... Необходимо условие чтобы извлекалась первое слово из ячейки и приравнивалось к условию |
|
VBA Задан текст из 20 символов латинского алфавита. Сортировать по алфавиту. VBA
https://www.cyberforum.ru/ vba/ thread1748421.html Просто выводит в label из textbox. помогите пожалуйста сортировать(пузырьком не получается). Нужно что бы из произвольного набора букв вывел по алфавиту. Dim a(53), d, x As String, i, q, K, z As Integer q = 100 For i = 0 To 53 a(i) = TextBox4.Text K = a(i) If K < z Then |
VBA Добавление в массив недостающих данных из другого массива Здравствуйте! Имеется двумерный массив, состоящий из полей: дата, описание и время выполнения. Имеется одномерный массив, состоящий только из уникальных значений даты, ранее выбранных из двумерного массива. Необходимо в двумерный массив в поле даты добавить недостающие даты (см. пример). Заранее благодарен. https://www.cyberforum.ru/ vba/ thread1748354.html |
|
VBA Окраска диапазонов в разных местах всем привет) Начал заниматься VBA и передо мной стоит задание окрасить диапазоны, которые стоят в разных местах (Лист бразилия). Пытался всяко разно уже, но не выходит. Может вы что нибудь подскажете или намекнёте что следует сделать ?) Буду премного благодарен:) Sub FindMe() Dim rngAll As Range Dim rngFirst As Range, rngLast As Range Dim Nrow As Long, NrowMax As Long, Ncol As Long Dim... |
VBA Методы создания документа word по шаблону Пожалуйста помогите разобраться, не знаю с какой стороны подступиться к задаче. В поисках способов заполнить шаблон информацией из excel мне попались: -поиск с заменой по текстовым маркерам типа {@MarkerName} -вставка или замена текста по закладкам (Bookmarks) -использование полей {DOCVARIABLE VarName} В чем недостатки каждого способа? Какие еще есть способы? Есть ли какие то... https://www.cyberforum.ru/ vba/ thread1748298.html |
|
0 / 0 / 2
Регистрация: 23.11.2014
Сообщений: 22
|
||||||
| 0 | ||||||
Открытие по очереди всех текстовых файлов из каталога - VBA - Ответ 920711430.05.2016, 09:04. Показов 2816. Ответов 1
Метки (Все метки)
Надо сделать перебор всех текстовых файлов в указанной папке. Я сделал так: все имена текстовых файлов сделал числовыми(1.txt,2.txt,...,n.txt),только так получилось все перебрать. А как сделать цикл, перебирающий все текстовые файлы с не числовым именем(Теория.txt,Практика.txt.........)?
Вернуться к обсуждению: Открытие по очереди всех текстовых файлов из каталога VBA
0
|
||||||
| 30.05.2016, 09:04 | |
|
Готовые ответы и решения:
1
Открытие по очереди всех текстовых файлов из каталога Открытие по очереди всех файлов из каталога Открытие всех файлов из каталога
|
| 30.05.2016, 09:04 | |
| 30.05.2016, 09:04 | |
|
Помогаю со студенческими работами здесь
0
Открытие из заданного каталога всех файлов с заданым расширением (xls)
Удаление текстовых файлов из указанного каталога
Поиск заданной строки во всех текстовых файлах заданного каталога
|