|
|
|
| Привет все.
Не то что бы проблема, но все же.
Жил был отчет. Все ничего. Открывали его, переводили в ворд для форматирования текста. Все довольны были до тех пор, покуда я его не нарек всплывающим окном. Кнопка "Публикация в ворд" обиделась и исчезла сразу. Ни перевести ни отформатировать. Ну я его в rtf перевел, потом назад все вернул. Опять без замечаний.
И чего ворд со всплывающими окнами не работает что ли? Или петушиное словцо в VBA чиркнуть надо? | |
|
| |
|
|
|
| Свое контекстное меню для отчетов поможет горю. | |
|
| |
|
|
|
| Именно свое? Wordу не нравится все что всплывает? Со своим контекстом что-то не получается. Казенный для печати подходит. (прозрачность блин) Ну да и на том спасибо.
Я ведь, как настоящий программист, люблю Windows - все ошибки, сделанные по собственной тупости, валю на Microsoft. | |
|
| |
|
|
|
| Можно, конечно, импортировать и чужое, главное назначить его отчету, взамен штатному.
Word-у начхать на то, что там в Access-е всплывает, ему это по-барабану. | |
|
| |
|
|
|
|
| Книги не видел, в принципе, опечатки конечно возможны, но не одна-же сплошная опечатка.
Может там свойства/методы/константы используются, которых в 2003 нет.
Отличия имеют место быть. | |
|
| |
|
|
|
| Не в том дело. Там как-то обобщенно. Примеры есть, но что бы их применить надо как-то знать что им сопутствует. Тут типа как из большого кода выдернута серидина. Естественно не работает. Общие понятия есть, а скопировать что бы посмотреть что это будет - никак. (с привязкой к своему)
Функции цикла как там написано применить не удалось, в оформлении msgbox значения кнопок и значка в окне перепутаны местами (методом тыка дошел что к чему), окно диалога
Private Sub Кнопка251_Click()
Dim dlgSaveAs As FileDialog
Set dlgSaveAs = Application.FileDialog(DialogType:=msoFileDialogSaveAs)
dlgSaveAs.Show
MsgBox dlgSaveAs.SelectedItems(1)
End Sub
Не работает никак.
Этот вопрос задавал ранее. Перепробовал все. Нихрена на выходе. Не пахает. Выделяет Set dlgSaveAs = Application.FileDialog(DialogType:=msoFileDialogSaveAs) и что ему там не так так и не выяснено.
Функции цикла - не циклят. Зато через 4 часа борьбы с ними зациклился я сам.
Вывод: Лучше IF ничего нет. По книге работать могут только программеры. Самое надежное - как раньше. На форму кучу форм видимых и невидимых с различными свойствами и связами и поочередно показывать то одни то другие. Работают без замечаний и сбоев нежели с фильтрами, списками, блокировками и т.д. Запросы только из конструктора. И т.д.
Ну не утверждаю что это так правильно. Обидно блин, книга дорогая. | |
|
| |
|
13 Кб. |
|
| У меня диалог работает, после подключения офисной библиотеки. См. zip. | |
|
| |
|
|
|
| set dlgSaveAs = Application.FileDialog(DialogType:=msoFileDialogSaveAs) |
Про это вроде недавно объясняли, что именованные параметры и константы будут работать только при подключении библиотеки что-то ms office object library (кажется)
или всесто констатн нужно использовать их значения примерно так:
set dlgSaveAs = Application.FileDialog(1)
или это не ты спрашивал...
давай сюда свои примеры из книги... будем посмотреть вместе | |
|
| |
|
|
|
| Спасибо за подсказку. Только по примеру Лукаса понятно, что это далеко не весь код для данного окна. (Сохранить как, а в типах файла ничего) К сожалению все эксперименты в большой базе. Подготовлю почву буду давать вопросы.
И потом. Если включить библиотеку на своем компе, то значит ее же следух ет включать на всех компах куда будет пересажен файл? Или инфа как-то об этом переходит вместе с файлом? | |
|
| |
|
|
|
| инфа о библиотеке хранится в базе данных и переходит вместе с файлом
косяки начинаются когда базу начинают юзать на разных версиях офиса
хорошо если базу написали на более старой версии (и то не всегда)
а вот если на более молодой то некоторые библиотеки вываливаются в миссинг (отключаются) | |
|
| |