Страница: 1 |
Необходимо создать Эксел документ т е я из формы открываю окно 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
Ничего конкретно подсказать не могу - у меня сейчас ВБ полетел к едрене фене. Единственное что - объявляй лучше объекты Ексель не как As Object, а As Excel.Application - менее глючно и быстрее будет. Страница: 1 |
Вопрос: Сохранение Эксел
Добавлено: 26.04.03 23:19
Автор вопроса: Dimael | Web-сайт:
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
Padre
ICQ: 346632205
Вопросов: 25
Ответов: 215
Web-сайт:
Профиль | | #1
Добавлено: 27.04.03 01:01