Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Access VBA

Модерирует : ShIvADeSt

 Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68

Открыть новую тему     Написать ответ в эту тему

Guest

BANNED
Редактировать | Цитировать | Сообщить модератору
   
 
Обсуждаем вопросы только по Access VBA
(программирование макросов, скриптов, пользовательских функций и т.п.).
Приветствуются ссылки на ресурсы и справочную литературу по теме.

 

NB! Дублирующая тема VBA for Access закрыта во избежание путаницы. Оставлена эта, как более ранняя и имеющая больше сообщений.

Смежные темы:
Помощь в создании SQL-запросов: SQL запрос
Программы » Microsoft Office 2019 & 365 | 2016 | 2013 | 2010 | 2007 | 2003
Программы » OneNote | Outlook 2013 & 2016 & 2019 | Outlook 2010 | Microsoft Mathematics & Math Solver
Программы » Word FAQ | Excel FAQ | Access FAQ
Прикладное программирование » Word VBA | Excel VBA
Андеграунд » Microsoft Office 2019 | 2016 | 2013 | 2010 | 2007 | 2003
Андеграунд » OneNote | Visio | SharePoint Server | Project Server | Exchange Server
Андеграунд » Надстройки (add-ins) и коммерческие макросы Excel
Андеграунд » Самостоятельная сборка дистрибутивов Оffice 2007/2010/2013/2016 | MUI для Office 2007
----------
Как в Access перместить запись из одной таблицы в другую (допустим по нажатию кнопки на форме)?

Отправлено: 18:31 05-09-2002 | Исправлено: ALeXkRU, 17:14 03-08-2021
PrWork1

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
snike555
Спасибо за ссылки, буду смотреть...

Всего записей: 582 | Зарегистр. 15-12-2005 | Отправлено: 21:03 16-01-2010
LLLeha



Newbie
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
проблема решена

Всего записей: 9 | Зарегистр. 26-12-2007 | Отправлено: 10:43 19-01-2010 | Исправлено: LLLeha, 12:41 19-01-2010
Avsel



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Уважаемые знатоки Ассess, помогите пожалуйста:
1. Есть 1-ая таблица с данными про фирмы: код, название, год создания и т.д., и есть 2-ая таблица (FIRMA) в которой есть: все возможные коды и соответствующие им названия фирм. Хочу сделать чтоб при заполнении кода фирмы в первой таблице (после ввода кода в поле KOD) название автоматически заполнялось (тянулось) со второй таблицы и заполнялось в поле NAME. В подстановке в источнике строк пишу SELECT FIRMA.NAME, FIRMA.KOD FROM FIRMA; Выводится просто полный перечень (випад.). Подскажите пожалуйста как сделать правильно.
 
2. Коды юр. лиц - 8 значные числа, физ. лиц - 10 значные. И у первых и у других в кодах сначала может быть "0". Н.п. 01123456. Есть таблички в Excel с которыми надо сделать связь. Но после связивания коды, которые начинаются с "0" не выводятса (пишет вместо данных #Число!). Как решить проблему с несоответствием типов данных, когда тип необходимо оставить текстовым (иначе "0" в числовом типе сёдает, что не есть хорошо)?    
 
Как это сделать? Спасибо.  

Всего записей: 395 | Зарегистр. 03-10-2002 | Отправлено: 13:20 20-01-2010
PrWork1

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Avsel
2.
В экселе у тех ячеек поставить текстовый тип, либо передавать с апострофом впереди

Всего записей: 582 | Зарегистр. 15-12-2005 | Отправлено: 15:53 23-01-2010
Avsel



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
PrWork1
Да так и сделал. Когда делаю импорт - все ОК, а если связывание - #Число!

Всего записей: 395 | Зарегистр. 03-10-2002 | Отправлено: 11:26 25-01-2010
metrim

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Что то вообще ничего не понимаю
На странице http://office.microsoft.com/ru-ru/access/HP051884291049.aspx посмотрел пример создания условия на выполнение макроса
Решил действовать по аналогии
Есть у меня таблица "поДворам", в ней есть поле "индексМонеты"
Написал условие "DCount("*", "поДворам", "[индексМонеты]=1") > 1", при попытке перейти и заполнять остальные графы выдается что то типа "Приложению '....' не удается обработать выражение 'DCount("*", "поДворам", "[индексМонеты]=1") > 1' .... "
 
Ладно думаю, наверное ошибся в составлении условия, записываю в модуле ВБА  
 

Код:
Sub test()
MsgBox DCount("*", "поДворам", "[индексМонеты]=1")
End Function
и удивительное дело, все нормальненько выполняется и выскакивает окошечко с результатом
 
Что это вообще за хрень происходит? условие задаю как в инструкции от мелкомягких, выражение - правильное (ну раз выполняется), как этот долбанный макрос запустить то ??????


Всего записей: 110 | Зарегистр. 05-12-2002 | Отправлено: 00:35 27-01-2010
PrWork1

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
metrim
Разобрались?
Напишите, в чем проблема была, может понадобиться!

Всего записей: 582 | Зарегистр. 15-12-2005 | Отправлено: 16:29 29-01-2010
metrim

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
metrim
Разобрались?
Напишите, в чем проблема была, может понадобиться!

Да нет, не разобрался
Сделал по другому
 
Записал в ВБА модуле

Код:
Public Function est_li_zapis(monetka As Variant, mon_dvor As String)
est_li_zapis = DCount("*", "поДворам", "[МонетныйДвор]='" & mon_dvor & "' and [индексМонеты]=" & monetka)
End Function

 
И соответственно условие в макросе выглядит так:

Код:
est_li_zapis([индекс];"спмд")>0

Вот так
Пишем пользовательскую функцию и её проверяем, иначе - не захотело работать, несмотря на то что написано на мелкомягком справочнике...

Всего записей: 110 | Зарегистр. 05-12-2002 | Отправлено: 01:54 30-01-2010
PrWork1

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
metrim
Понятно, спасибо!

Всего записей: 582 | Зарегистр. 15-12-2005 | Отправлено: 09:50 30-01-2010
olenka_33

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
возможно эта тема уже поднималась, но перечитать 47 стр. сил нет.  
проблема - не работают мастера. ядро Microsoft Jet 4.0 стоит. антивирус аваст, винда хр, офис 2003.
очень долго мучаюсь, помогите, добрые люди... эта же копия офиса стоит на другом компе, там все работает

Всего записей: 11 | Зарегистр. 26-09-2009 | Отправлено: 11:24 30-01-2010
PrWork1

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
olenka_33
 
Вообщето это вопрос не сюда
А пробовали переустановить офис?

Всего записей: 582 | Зарегистр. 15-12-2005 | Отправлено: 11:46 30-01-2010
olenka_33

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
н-да, пробовола, и еще что-то делала, уже и сама не помню, может еще какие мысли возникнут?

Всего записей: 11 | Зарегистр. 26-09-2009 | Отправлено: 14:05 30-01-2010
PrWork1

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
olenka_33
Вот такая мысль возникла:
Попробовать скопировать с другой машины *.mda файлы и подключить через диспетчер настроек в акссесе вручную.

Всего записей: 582 | Зарегистр. 15-12-2005 | Отправлено: 18:15 30-01-2010 | Исправлено: PrWork1, 18:21 30-01-2010
olenka_33

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
вообще-то я в эксесе не очень разбираюсь, но данный файла поиском находится на моем компе.  

Цитата:
Попробовать скопировать с другой машины *.mda файлы и подключить через диспетчер настроек в акссесе вручную.
. а вот это вообще не понятно. (и откуда он взялся на мою голову, этот Ассess , мне ж это программирование как ножом в сердце). где-то в другом сайте я видела что-то про регистрацию какого-то файла через командную строку, сделала - регистрация прошла успешно, а толку никакого.

Всего записей: 11 | Зарегистр. 26-09-2009 | Отправлено: 20:26 30-01-2010
PrWork1

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
olenka_33
Мастера  наверное не *mda а *.mde
лежат примерно   c:\Program Files\Microsoft Office\OFFICE11\
 ACWZMAIN.MDE, ACWZTOOL.MDE
 
Найдите у себя,
Откройте в аксесе любую базу (хоть новую), Далее в меню
Сервис/ Надстройки/Диспетчер настроек и подключите эти файлы.

Всего записей: 582 | Зарегистр. 15-12-2005 | Отправлено: 21:30 30-01-2010
olenka_33

Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
открыла новую базу, а строчка "надстройки" не активна.  
ACWZMAIN.MDE, ACWZTOOL.MDE  - эти файлы есть в компе...

Всего записей: 11 | Зарегистр. 26-09-2009 | Отправлено: 22:21 30-01-2010
PrWork1

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
olenka_33
Ну что, у Вас получилось?

Всего записей: 582 | Зарегистр. 15-12-2005 | Отправлено: 22:19 04-02-2010
xz111

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Есть проект Access-2002 и SQL Server 2000 Personal.
В таблицах добавил столбец штампа времени (тип timestamp, в свойстве Allow Nulls галки нет), но эти поля почему-то остаются пустыми.
Это так и должно быть?
Таблицами управляю через проект Access.

Всего записей: 54 | Зарегистр. 11-04-2009 | Отправлено: 23:51 12-02-2010
dneprcomp



Silver Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
xz111
timestamp заполняется при insert
Если поле timestamp добавленно в таблицу с готовыми данными, то, естественно, никаких timestamp в поле не будет.  
Если же timestamp не заполняется и при insert, то проверь что происходит при добавлении вручную. Если заполняется, то проблема в связке Access / Server. Если нет - что-то не то со структурой table.  
В крайнем случае можно заменить timestamp на поле с date и заполнять его из тригера.

Всего записей: 3920 | Зарегистр. 31-03-2002 | Отправлено: 00:45 13-02-2010 | Исправлено: dneprcomp, 07:43 13-02-2010
xz111

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
dneprcomp, я пробывал разные варианты.
Пустую базу Access преобразовывал в формат SQL Server и создавал новую базу через Enterprise Manager, а потом добавлял данные. В обоих случаях в поле timestamp в Enterprise Manager написано <Binary>, а в проекте Access оно пустое. Хотя если сделать сортировку по этому полю, то после редактирования какой-либо строки она перемещается в конец таблицы.
Значит наверно там есть данные, но они почему-то не видны.

Всего записей: 54 | Зарегистр. 11-04-2009 | Отправлено: 00:04 14-02-2010 | Исправлено: xz111, 00:08 14-02-2010
Открыть новую тему     Написать ответ в эту тему

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Access VBA


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru