Способы добавления данных в лист Excel с помощью OLE-автоматизации

Переводы статьи Переводы статьи
Код статьи: 142193 - Vizualiza?i produsele pentru care se aplic? acest articol.
Развернуть все | Свернуть все

В этой статье

Аннотация

OLE Automation предоставляет способ для Visual FoxPro для Windows для взаимодействия с другими приложениями, поддерживающих технологию OLE. С помощью OLE, программа Visual FoxPro можно начать сеанс Microsoft Excel, открыть книгу, выберите лист из книги, поместить данные в ячейку или диапазон ячеек, печать лист, сохраните обновленный книгу и закрыть Microsoft Excel сеанс. В данной статье демонстрируется на примере делать это.

Дополнительная информация

Пошаговый пример

  1. Откройте новую книгу в Microsoft Excel версии 5.0 или Microsoft Excel 7.0 (часть Office 95) или Microsoft Excel 97 (частью Office 97), таким образом, Пример программы в данной статье будет работать.
  2. Выберите лист 3, щелкнув вкладку в нижней части листа и введите следующие данные в электронную таблицу.
          Enter         In Cells
          ----------------------------
          Part #        A1
          Sales YTD     B1
          1             A2 through A4
          2             A5 through A7
          3             B2 through B7
    					
  3. Данные Microsoft Excel в меню подытога. Полученный диалоговое окно должно показывают, что при каждом изменении в части #, функция «Сумма» Добавление подытогов «Продаж с начала года» и отображения этого ниже сводка данные. Нажмите кнопку ОК.
  4. Перейдите на вкладку в нижней части листа для листа 1, чтобы восстановить книгу по умолчанию страницы на листе 1.
  5. Сохраните книгу. Затем закройте книгу и выйти из Microsoft Microsoft Excel. В следующем примере кода для книги был сохранен как
          C:\XLSheets\Testbook.xls.
    					
  6. В Microsoft Visual FoxPro для Windows создайте следующую программу с именем oleExcel.prg:
    *** Program oleExcel.prg *****
    #DEFINE xlLandscape 2
    #DEFINE xlDoNotSaveChanges 2
    
    DIMENSION laDemoData(4)      && For some Visual FoxPro users, data
    laDemoData(1)= 1024          && could come from table or view
    laDemoData(2)= 2048
    laDemoData(3)= 5120
    laDemoData(4)= "The Sample Message"
    
    loExcel = CREATEOBJECT("Excel.application") 
    
    WITH loExcel
       .Application.Workbooks.Open("C:\XLSheets\testbook.xls")
       .Application.Worksheets("Sheet3").Activate  && Select sheet
       
       .Range("b2").Value = 14444          && constants as data
       .Range("b3").Value = 25555
       .Range("b4").Value = 30001
    
       .Range("b6").Value = laDemoData(1)  && variables as data
       .Range("b7").Value = laDemoData(2)
       .Range("b8").Value = laDemoData(3)
       .Range("a12").Value = laDemoData(4)
    
       .Worksheets("Sheet3").PageSetup.Orientation = xlLandscape
       .ActiveSheet.PrintOut  && Example of printing the worksheet
    
       .Visible = .t. && See the results
       =MESSAGEBOX("Click OK to close Excel.") && Keep the program running, 
                                               && so Excel isn't stranded
    
       .ActiveWindow.Close(xlDoNotSaveChanges)
       .Quit()
    ENDwith
    					

Ссылки

Просмотреть раздел справки Microsoft Excel «Объекта приложения» и многие разделы, представленные в списки свойств и методов раздел.

Для получения дополнительных сведений о многие из концепций в пример программы обратитесь к следующим статьям Microsoft Knowledge Base:
139051 Выбор ячеек в Microsoft Excel с помощью OLE-автоматизации
132535 PRB: Освобождение объектная переменная не закрывайте Microsoft Excel
138398 PRB: Выпуска может не удалять объекты OLE из памяти

Свойства

Код статьи: 142193 - Последний отзыв: 2 июня 2011 г. - Revision: 4.0
Информация в данной статье относится к следующим продуктам.
  • Microsoft Visual FoxPro 3.0 Standard Edition
  • Microsoft Visual FoxPro 5.0 Standard Edition
  • Microsoft Visual FoxPro 6.0 Professional Edition
Ключевые слова: 
kbcode kbhowto kbinterop kbmt KB142193 KbMtru
Переведено с помощью машинного перевода
ВНИМАНИЕ! Перевод данной статьи был выполнен не человеком, а с помощью программы машинного перевода, разработанной корпорацией Майкрософт. Корпорация Майкрософт предлагает вам статьи, переведенные как людьми, так и средствами машинного перевода, чтобы у вас была возможность ознакомиться со статьями базы знаний KB на родном языке. Однако машинный перевод не всегда идеален. Он может содержать смысловые, синтаксические и грамматические ошибки, подобно тому как иностранец делает ошибки, пытаясь говорить на вашем языке. Корпорация Майкрософт не несет ответственности за неточности, ошибки и возможный ущерб, причиненный в результате неправильного перевода или его использования. Корпорация Майкрософт также часто обновляет средства машинного перевода.
Эта статья на английском языке:142193

Отправить отзыв

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com