» Access VBA

Slatsik
Стандартный подход - Вариант 1

dneprcomp
Спасибо! Жаль, что только так предполагается, что пользователь будет вносить довольно много изменений в форму

скажите в accesse можно изпользовать оператор case в sql запросе
например так
SELECT stattemp.Podr_Vx
CASE WHEN stattemp.Podr_Vx= 'АЛЕКСАНДРОВСКИЙ' THEN 1 ELSE 0 END as w
FROM stattemp;
в mssql работает
или сдесь только PIVOT для преккрестного запроса

SIgor33
В SQL запросе не поддерживает. Используй IIF
Или посмотри http://ewbi.blogs.com/develops/2006/02/adding_case_to_.html

dneprcomp
Спасибо очень полезная ссылка

Уважаемые знатоки ACCESS'a 2003. Помогите пожалуйста с задачей. Есть некая база данных студентов со следующими данными: шифр факультета, номер группы, фамилия, имя, отчество, номер зачетной книжки, дата рождения, оценка за 1й экзамен, оценка за 2й экзамен, оценка за 3й экзамен и оценка за 4й экзамен, примечание. Всего человек в базе 20. 10 из них из 101 группы. Так вот необходимо подсчитать общее количество "пятерок", "четверок" и "троек", полученных студентами группы 101. Как правильно оформить запрос - не знаю. Спрашивал у препода - говорит одним запросом не обойтись в этом случае, но у него их получается шибко много: 9 штук. И то считает неизвестно что. А смысл всего задания, как я понимаю, заключается в том чтобы просуммировать ячейки со значениями 3, 4 и 5 и вывести их как результат. Никогда не работал с этой программой. Понятия не имею как оперировать с функциями и составлять правильные выражения. Пробовал читать встроенную справку, но ничего так и не получилось. Базу заполнил, форму оформил, а вот с запросом никак не получается. Знатоки, выручайте. Очень срочно нужно. Можно поподробней расписать как его сделать? Как это реализовать? Очень надеюсь на вашу помощь. Экзамен уже прошел, а я еще никак допуск не получу. Кому это не сложно подскажите пожалуйста.

Sinclair83
http://slil.ru/28150037

Помогите пожалуйста. Нужно сделать выгрузку из Access в XML по DTD Яндексмаркета (http://partner.market.yandex.ru/legal/tt/) товар книги. Проблема в кодировке там нужна "Windows-1251" C Access у меня нормально а вот c xml никак. Если кто с xml дружится помогите. Готов на разумную денежку.

Vitus_Bering
Пусть я нарушу правила, но хочу при всех сказать Вам ОГРОМНОЕ СПАСИБО. Вы просто МОЛОДЕЦ !!!

1. Скажите, есть ли в Access функция округления? Для использования в запросах и полях.

2. Почему при выводе формы Access НА ЧАСТИ МАШИН выдает сообщение "Не достаточно ресурсов"?
При попытке запуска вручную запроса, который использует эта форма выдает сообщение "слишком сложный запрос". Причем замечено, что на двух абсолютно одинаковых машинах по железу, на которых установлен Windows XP на одной выдает ошибку, а на другой нет, работает корректно. Отличаются машины только тем, что на первой установлен SP1 (выдает ошибку), а на второй SP2 (работает). Может ли быть дело именно в сервис паке?

dmention
XP SP2 устанавливает новую версию MDAC 2.81. Скорее всего, все ошибки связаны с использованием старой версии.

окгугление Round(число;округлить до разрядов)
Round («number»; «precision»)

Выручайте!

Делаю слияние документа Word к БД Access.

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

А в документе Word при ссылке на это значение получается чтото типа 123,5400001 или 243,9999900001. Короче ерунда полная. Мне надо чтобы в Word все значения были с двумя цифрами после запятой.

Причем в другом запросе стоит абсолютно такая же формула и из него в другой документ данные берутся без искажений.

Может в Word где-то можно настроить количество знаков, отображаемых в поле?

В дополнение к предыдущему сообщению.

Попробывал скопировать данные из запроса в Excel и присоединить к нему Word.

В Excel точно видно, что два знака после запятой, а в Word переносится такая же ерунда.

Как исправить? Очень нужно, срочно!

Помогите исходником макроса для сложения чисел.

Что б было так: ставлю галочку возле нескольких чисел и они сумировались в поле рядом:

P.S. Если похожий вопрос был, извините. Но пожалуйста ответьте на него.

Dual_MInd
http://www.google.com/search?hl=en&q=ms+access+calculated+field&revid=822280001&ei=rS4tS4nCDIiyswOk6YjQBA&sa=X&oi=revisions_inline&resnum=0&ct=broad-revision&cd=6&ved=0CDAQ1QIoBQ

Уважаемы, подскажите, как вызвать в Асcеss функцию из Dll, написанной в Дельфи?
Как правильно в дельфи написать такую функцию.

PrWork1

Цитата:

Как правильно в дельфи написать такую функцию.

как обычную функцию на экспорт

http://www.sql.ru/Forum/actualthread.aspx?bid=4&tid=288117&hl=
внизу топика ссылки по которым можно найти как в VB подключается DLL

snike555
Спасибо за ссылки, буду смотреть...

проблема решена

Уважаемые знатоки Ассess, помогите пожалуйста:
1. Есть 1-ая таблица с данными про фирмы: код, название, год создания и т.д., и есть 2-ая таблица (FIRMA) в которой есть: все возможные коды и соответствующие им названия фирм. Хочу сделать чтоб при заполнении кода фирмы в первой таблице (после ввода кода в поле KOD) название автоматически заполнялось (тянулось) со второй таблицы и заполнялось в поле NAME. В подстановке в источнике строк пишу SELECT FIRMA.NAME, FIRMA.KOD FROM FIRMA; Выводится просто полный перечень (випад.). Подскажите пожалуйста как сделать правильно.

2. Коды юр. лиц - 8 значные числа, физ. лиц - 10 значные. И у первых и у других в кодах сначала может быть "0". Н.п. 01123456. Есть таблички в Excel с которыми надо сделать связь. Но после связивания коды, которые начинаются с "0" не выводятса (пишет вместо данных #Число!). Как решить проблему с несоответствием типов данных, когда тип необходимо оставить текстовым (иначе "0" в числовом типе сёдает, что не есть хорошо)?

Как это сделать? Спасибо.

Avsel
2.
В экселе у тех ячеек поставить текстовый тип, либо передавать с апострофом впереди

PrWork1
Да так и сделал. Когда делаю импорт - все ОК, а если связывание - #Число!

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

Ладно думаю, наверное ошибся в составлении условия, записываю в модуле ВБА


Код: Sub test()
MsgBox DCount("*", "поДворам", "[индексМонеты]=1")
End Function

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

Цитата:

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

Да нет, не разобрался
Сделал по другому

Записал в ВБА модуле

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

metrim
Понятно, спасибо!

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

olenka_33

Вообщето это вопрос не сюда
А пробовали переустановить офис?

н-да, пробовола, и еще что-то делала, уже и сама не помню, может еще какие мысли возникнут?