Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VBA Word VBA заменить текст на текст в верхнем индексе https://www.cyberforum.ru/ vba/ thread2651041.html
Sub test765() Set oDoc = Activedocument text = "с_1 - предельно допустимая концентрация СО_2 в помещении, л/м^3;" Call insert_textN(text, oDoc.Paragraphs(oDoc.Paragraphs.Count).Range, True) End Sub
Макрос - протокол VBA
Помогите, пожалуйста, создать макрос, который создает файл "Протокол.txt", и при работе с Ворд файлами записывает в него дату и время закрытия каждого документа, дату и время создания каждого нового документа.
VBA Макрос - Архив https://www.cyberforum.ru/ vba/ thread2650991.html
Здравствуйте! Помогите, пожалуйста, с заданием: Нужно создать макрос, который создает папку и перемещает в неё все файлы из заданной папки, созданные до 1.02.2018, если такие есть.
VBA Word Макрос: Диалоговое окно при сохранении https://www.cyberforum.ru/ vba/ thread2650883.html
Можно как то прописать так, чтобы при сохранение документа вылазило диалоговое окно, с выбором выполнить макрос(Создать гиперссылку в Excel ) и отказаться. При отказе макрос не выполняется. Public Sub FileSave() ThisDocument.Save Dim FileName$, FullName$, xlApp As Object: Const xlUp = -4162 '&HFFFFEFBE FileName = "C:\Users\Pasha IV\Desktop\IvanovPredDep\Document.xlsx" If...
Реализация численных стандартных методов в редакторе vba VBA
Здравствуйте, помогите пожалуйста рассчитать определенный интеграл в редакторе vba методами трапеции, прямоугольника с недостатком, прямоугольника с избытком, прямоугольника по средней высоте, методом Симпсона. Подинтегральную функцию вычислять с помощью function.
VBA В чем моя ошибка? Форма должна содержать: Заголовок формы. Надписи и текстовые поля, соответствующие наименованиям столбцов таблицы. Кнопку «Расчет», при нажатии на которую изменяется цвет ее фона, считывается исходная информация из соответствующих текстовых полей, производятся необходимые вычисления и вывод результатов в предназначенные для них текстовые поля. Кнопку «Заполнить таблицу», при нажатии на... https://www.cyberforum.ru/ vba/ thread2650636.html
VBA Не получается закончить задачу https://www.cyberforum.ru/ vba/ thread2650625.html
Рассчитываясь в одном из магазинов. покупатель получает скидку: если количество покупаемого им товара не менее 100, то скидка составляет 10%, если от 50 до 100, то 5 %. в остальных случаях скидка не предоставляется. Определить, какую сумму надо заплатить покупателю. Если он покупает товар в количестве N по пене S руб. каждая.
Используя цикл While, найти сумму первых N натуральных чисел кратных 3 VBA
Дано натуральное число N. Используя цикл While найти сумму первых N натуральных чисел кратных 3
VBA При вводе n вещественных чисел определить, что больше: их сумма или произведение https://www.cyberforum.ru/ vba/ thread2650325.html
как сделать чтобы при вводе n вещественных чисел определить, что больше: их сумма или произведение, n вводится и должно быть больше 0
VBA Копирование таблицы из Excel в Word макросом Всем добрый день! Копирую таблицу, созданную в Excel в Word следующим макросом: Dim objWord As Object Dim MyRange As Excel.Range Dim FileStart Dim FileNew Dim wS2 As Worksheet, LastRow As Long Dim WdRange As Object Set wS2 = ThisWorkbook.Worksheets("Input") https://www.cyberforum.ru/ vba/ thread2650132.html
VBA Проблема с копированием диапазона ячеек
Всех приветствую! Я новенький как на вашем форуме, так и в VBA. Начал изучать макросы Excel под свои нужды и возникла проблема. Написал макросы, которые выполняют нужные мне операции. Макросы направлены на сравнение цены нашей и конкурентов. Что мне нужно: Получить список красных позиций на отдельном листе. Нужны только значения и цвет, без привязки к формулам. Чтобы с первого листа по...
VBA Не получается решение формы и кода Не получается сделать форму и код. :cry: которой осуществляется: 1) ввод исходных данных двух одномерных массивов (массив по первому полю таблицы считывается с ячеек рабочего листа, но второму полю - через функцию inputВох или задастся с помощью генератора случайных чисел) н их вывод в виде таблицы на рабочий лист; 2) обработка массива (нахождение суммы, количества элементов и т. п. в... https://www.cyberforum.ru/ vba/ thread2649822.html
1 / 0 / 0
Регистрация: 07.10.2018
Сообщений: 46
24.05.2020, 15:25  [ТС] 0

Ошибка синтаксиса vba access - VBA - Ответ 14577499

24.05.2020, 15:25. Показов 2825. Ответов 5
Метки (Все метки)

Ответ

Visual Basic
1
2
3
4
5
6
7
sql = "SELECT * FROM ПОЕЗДА WHERE [номер]= '" & Me.номер.value & "' AND ((([дата_отправления])= #" & Format(Me.дата_отправления.value, "mm\/dd\/yyyy") & "#)) AND ((([время_отправления])=#" & Format(Me.время_отправления.value, "hh\:nn\:ss") & "#));"
    
Set rst3 = CurrentDb.OpenRecordset(sql, dbOpenDynaset)
    If rst3.EOF Then
    MsgBox "Такой поезд на указанную дату и время уже существует!"
    Exit Sub
    End If
Все хорошо, теперь ошибки нет. Но оно находит такой поезд (хотя его нет и добавление происходит после выполнения этой части). Может я не правильно использую функции?

Добавлено через 39 минут
If Not rst.EOF, не заметила сразу

Вернуться к обсуждению:
Ошибка синтаксиса vba access VBA
0
Заказать работу у эксперта

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.05.2020, 15:25
Готовые ответы и решения:

Ошибка синтаксиса в инструкции UPDATE - VB and Access
Доброго времени суток, уважаемый форум! Возникла такая проблема: в форме CandidateM i...

Как заполнить базу данных Access с помощью vba в том же access и считать из нее инфу?
Прошу помочь в азах. Как заполнить базу данных Access с помощью vba в том же access и считать из...

Можно ли в VBA скопировать в вставить запрос или таблицу из одного файла Access в другой файл Access
Вопрос такой можно ли скопировать и вставить запрос, таблицу или другой объект базы данных Access в...

Ошибка "object variable or With block variable not set" при попытке обращения к форме. VBA Access 7.0.
Добрый день. Данный код Dim frm As Form Set frm = Form_frmAdd_EditWareList ...

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

VBA с базой от Access и ошибка "runtime error "3709" ключ поиска не найден ни в одной записи"
написал базу данных на Access 2007. в главной таблице есть поля подстановки (значения из...

Ошибка синтаксиса в ACCESS
Уважаемые форумчане, помогите. Есть код для открытия формы с информацией по клиенту. Двойное...

бд access не понятная ошибка синтаксиса
Здравствуйте, я тут создаю бд для экзамена и у меня на ''Главной форме " -> вкладка "просмотр" не...

База данных ACCESS приложение на C# ошибка синтаксиса
Добрый вечер! в чем ошибка данного запроса? cmd.CommandText = "INSERT INTO Cubs (name, age,...

Ошибка синтаксиса Insert into при добавлении записи в БД Access
Я работаю на C#. Мне нужно создать в access таблицу Avtobuss. Она не создается OleDbConnection...

Делаю response.form('date') и пробую вставить в Access 97 поле тип дата/время. Пишет ошибка синтаксиса.
Такая штука: Есть форма, которая передаёт дату (скорее всего в виде строки <input type=text...>)...

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