Страница: 1 |
Вопрос: Сохранение Эксел | Добавлено: 26.04.03 23:19 |
Автор вопроса: ![]() |
Необходимо создать Эксел документ т е я из формы открываю окно Save указываю имя документа в которую затем необходимо вводить данные Но почему то когда назвав док и после нажатия сохранить в окне Сommondiolog никакой экселовский документ не появляется Может у кого нить похожий код или делал ранее плз помогите Практически сделал прогу а вот тут то и трмознул! Private xlaCust As Object Private xlwCust As Object Private xlsCust As Object Private Sub ComSave_Click() CommonDialog1.CancelError = True Call xlsPrint CommonDialog1.Filter = "All Files (*.*)|*.*|Excel File (*.xls)|*.xls|Excel Files (*.xls)|*.xls" CommonDialog1.FileName = "" CommonDialog1.ShowSave cboName.Text = CommonDialog1.FileName fsave = cboName.Text Exit Sub End Sub Private Sub xlsPrint() Set xlwCust = CreateObject("Excel.Application" ) Set xlsCust = xlwCust.ActiveSheet End Sub |
Ответы | Всего ответов: 1 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ICQ: 346632205 Вопросов: 25 Ответов: 215 |
Web-сайт: Профиль | Цитата | #1 | Добавлено: 27.04.03 01:01 |
Ничего конкретно подсказать не могу - у меня сейчас ВБ полетел к едрене фене. Единственное что - объявляй лучше объекты Ексель не как As Object, а As Excel.Application - менее глючно и быстрее будет. |
Страница: 1 |
|