OLE 자동화를 사용하여 Excel 시트 데이터 추가 방법

기술 자료 번역 기술 자료 번역
기술 자료: 142193 - 이 문서가 적용되는 제품 보기.
모두 확대 | 모두 축소

이 페이지에서

요약

OLE 자동화 Windows에서 Visual FoxPro에 대한 다른 OLE 호환 응용 프로그램과 상호 작용하는 방법을 제공합니다. OLE 사용하여 Visual FoxPro 프로그램이 있습니다 Microsoft Excel 세션, 통합 문서를 열, 통합 문서에서 워크시트를 선택합니다. 그리고 셀 또는 셀 범위 데이터를 배치하는, 워크시트 인쇄, 업데이트된 통합 문서를 저장할 시작하고 자동으로 세션을 닫습니다. 이 문서의 예제에서 바로 그 방법을 보여 줍니다.

추가 정보

단계별 예제

  1. 이 문서에 나와 있는 프로그램 예제에 작동할 수 있도록 Microsoft Excel 5.0 또는 Microsoft Excel 7 (일부 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 데이터 메뉴에서 부분합을 클릭하십시오. 각 변경 시 '' 로 부분합을 추가하는' Sales YTD SUM' #, 함수가 부 있고 해당 데이터 아래에 요약 표시 대화 상자가 표시됩니다. 그렇다면, 확인을 클릭하십시오.
  4. 통합 문서의 기본 페이지 시트 1 복원하려면 시트 1의 워크시트 아래쪽의 탭을 클릭하십시오.
  5. 통합 문서를 저장하십시오. 그런 다음 통합 문서를 닫고 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 기술 자료의 다음 문서를 참조하십시오.
139051OLE 자동화를 사용하여 Microsoft Excel에서 셀 선택하는 방법
132535PRB: 개체 변수 릴리스 자동으로 닫기 있지 않음
138398PRB: 릴리스 않는 제거 OLE 개체에서 메모리 수 있습니다.

속성

기술 자료: 142193 - 마지막 검토: 2004년 7월 13일 화요일 - 수정: 3.3
본 문서의 정보는 다음의 제품에 적용됩니다.
  • Microsoft Visual FoxPro 3.0 Standard Edition
  • Microsoft Visual FoxPro 3.0b Standard Edition
  • Microsoft Visual FoxPro 5.0 Standard Edition
  • Microsoft Visual FoxPro 6.0 Professional Edition
키워드:?
kbmt kbcode kbhowto kbinterop KB142193 KbMtko
기계 번역된 문서
중요: 본 문서는 전문 번역가가 번역한 것이 아니라 Microsoft 기계 번역 소프트웨어로 번역한 것입니다. Microsoft는 번역가가 번역한 문서 및 기계 번역된 문서를 모두 제공하므로 Microsoft 기술 자료에 있는 모든 문서를 한글로 접할 수 있습니다. 그러나 기계 번역 문서가 항상 완벽한 것은 아닙니다. 따라서 기계 번역 문서에는 마치 외국인이 한국어로 말할 때 실수를 하는 것처럼 어휘, 구문 또는 문법에 오류가 있을 수 있습니다. Microsoft는 내용상의 오역 또는 Microsoft 고객이 이러한 오역을 사용함으로써 발생하는 부 정확성, 오류 또는 손해에 대해 책임을 지지 않습니다. Microsoft는 이러한 문제를 해결하기 위해 기계 번역 소프트웨어를 자주 업데이트하고 있습니다.

피드백 보내기

 

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