Microsoft Visual Basic에서 클립 보드로 복사하는 방법

콘텐츠

• 지침

Microsoft Visual Basic .NET (VB.NET)을 사용하여 시스템 클립 보드를 사용하여 한 응용 프로그램에서 다른 응용 프로그램으로 정보를 복사하는 방법을 알고 있으면 유용합니다. 클립 보드는 Windows의 프로그램간에 공유되는 환경으로 정보를보다 쉽게 ​​공유 할 수 있습니다. 프로그래머는 종종 VB.NET 응용 프로그램에서 Microsoft Excel 스프레드 시트로 정보를 내보내야합니다. 그러나 데이터를 시스템 클립 보드에 복사하여 Excel 워크 시트에 붙여 넣을 수있는 VB.NET 코드를 작성할 수 있습니다.

지침

Visual Basic .NET을 사용하여 데이터를 시스템 클립 보드에 복사 할 수 있습니다. (Fotolia.com에서 Stasys Eidiejus에 의해 야간 이미지 디지털 city.binary 터널 및 도시)

1. VB.NET 프로젝트의 새 서브 루틴에 다음 코드를 입력하여 Excel 변수를 선언하십시오.

   Dim XLApp As Microsoft.Office.Interop.Excel.Application = Nothing Dim XLBooks As Microsoft.Office.Interop.Excel.Workbooks = Nothing Dim XLBook As Microsoft.Office.Interop.Excel.Workbook = 아무것도 없음 Dim XLSheets As Microsoft.Office.Interop .Excel.Sheets = 아무것도 희미한 XLSheet As Microsoft.Office.Interop.Excel.Worksheet = Nothing

2. 클립 보드에 텍스트 문자열을 추가하고 텍스트 문자열을 가져 오려면 다음 코드를 입력하십시오.

   Dim ProcessObject as New Process Clipboard.SetDataObject ( "클립 보드에 복사되어 Excel에 추가되었습니다.")

   Dim clipboardObject As IDataObject = Clipboard.GetDataObject ()

3. Excel을 열고 새 워크 시트를 추가하려면 다음 코드를 입력하십시오.

   XLApp = 새 Microsoft.Office.Interop.Excel.Application XLApp.Visible = True XLApp.DisplayAlerts = False XLBook = CType (XLApp.Workbooks.Add (), Microsoft.Office.Interop.Excel.Workbook) XLBooks = XLApp.Workbooks XLSheet = CType (XLBooks (1) .Sheets.Item (1), Microsoft.Office.Interop.Excel.Worksheet) XLSheets = XLBook.Worksheets

   
   

4. 다음 코드를 입력하여 클립 보드의 시퀀스를 Excel에 추가합니다.

   ClipboardObject를 사용하는 경우 .GetDataPresent (DataFormats.Text) 그런 다음 XLSheet.Cells (1, 1) = .GetData (DataFormats.Text) End If End With

5. 프로그램 실행