|   Сделать стартовой  |    На главную| Чат | Гостевая книга | Форум 
        www.IqSoft.narod.ru      
                 Найти: на

                                                                                                    

 

  Как лучше встроить в мою форму существующий файл Еxcel ? Закрывать, открывать, работать с VBA.

Встроить в форму существующий файл Excel можно многими способами - всё зависит то того, как Вы хотите видеть этот файл на своей форме? Поскольку точно это не описано, то я понимаю, что содержимое файла должно отображаться на экране и при желании редактироваться. Сделать это очень просто с помощью объекта OLE:

1.Создаём стандартную форму.
2.На ToolBox'e выбираем инструмент OLE и создаём окно на форме.
3.Как только Вы отпустите мышку, тут же появится диалоговое окно "Insert Object" (Ввести объект).
4.Слева выбираем CheckBox "Create from file" (Создать из файла) и выбирете нужный файл. Настоятельно рекомендую создать резеpвную копию вашего XLS-файла.
5.Если Вы хотели бы видеть в окне весь файл, то в свойствах окна OLE1 свойство SizeMode установите равным 2 (AutoSize).
6.Это всё! Чтобы активизировать таблицу, кликните на неё два раза. На форме появится меню, позволяющее редактировать файл.
7. Чтобы сохранить внесённые изменения создайте командную кнопку. Переименуйте имя кнопки Command1 в cmdSaveToFile

Private Sub cmdSaveToFile_Click()
    'открываем файл, как двоичный
   Open OLE1.SourceDoc For Binary As #1
            'сохраняем в файл
        OLE1.SaveToFile 1
        'закрываем файл
    Close #1
End Sub

А в событие Form_Load нужно вписать следующий код, чтобы при загрузке формы файл загружался в созданный OLE-контейнер:

Private Sub Form_Load()
    'открываем файл, как двоичный
  Open OLE1.SourceDoc For Binary As #1
        'считываем мз файла
        OLE1.ReadFromFile 1
   'закрываем файл
    Close #1
End Sub

Важно: при применении следующих процедур формат XLS-файла будет изменён и Вы не сможете больше открыть и редактировать его с помощью приложения Excel, а только с помощью вашей программы!

Могу также предложить второй способ использования существующего файла Excel в своей форме:

1.Создаём стандартную форму.
2.На ToolBox'e выбираем инструмент OLE и создаём окно на форме.
3.Как только Вы отпустите мышку, тут же появится диалоговое окно "Insert Object" (Ввести объект).
4.Слева выбираем CheckBox "Create from file" (Создать из файла)и выбирете нужный файл, но не кликайте на ОК!
5.Теперь следует выбрать CheckBox либо "Link" (Ярлык), либо "Display As Icon" (Отображать как символ). При выборе "Link" в окне OLE будет отображаться содержание файла и при двойном клике будет открываться желаемый файл как обычно - через Excel. При выборе "Display As Icon" на вашей форме будет также ярлык к файлу, но в виде иконки.
6.Чтобы при загрузке отображалось каждый раз новое содержания файла в событие Form_Load введите:

Private Sub Form_Load()
     OLE1.Update
End Sub

 

           

 

 

 

 

                                                                   ОБСУДИТЬ СТАТЬЮ НА ФОРУМЕ

  Словарь       Яндекс.Лингво

   

  Сделать стартовой     

Программирование
 -  Основы Visual Basic
 -  Visual Basic
 -  Кирпичики для  VB
 -  Visual Basic 6.0 избранное
 -  API
Разное
 -  БЕЗОПАСНОСТЬ INTRANET
- Политика безопасности для электронной почты.
 - Сравнительная характеристика Internet Explorer и Netscape Navigator
 - Как подключить к Интернету несколько компьютеров через один модем
 -  Мифы компьютерной безопасности
 -  Оптимизация Windows 98.
 - ЧТО ПОМHИТ КОМПЬЮТЕР?
 - О НЕКОТОРЫХ МЕТОДАХ ОБНАРУЖЕНИЯ ЗАКЛАДОЧНЫХ УСТРОЙСТВ
- Хакеры или кракеры "Что такое хорошо и что такое плохо?"
 - Атака из сети
                                                            Нам весьма интересны любые Ваши предложения о сотрудничестве.

                         

 

  Дизайн: Кулишов Андрей
Напишите мне
Hosted by uCoz