Il est utile de savoir comment utiliser le presse-papiers du système pour copier des informations d'une application à une autre en utilisant Microsoft Visual Basic.NET ( VB.NET ) . Le presse-papiers est un environnement qui est partagé entre les programmes dans Windows , ce qui facilite le partage d'informations . Les programmeurs ont souvent besoin d'exporter des informations d'une application VB.NET à une feuille de calcul Excel . Toutefois, vous pouvez écrire du code VB.NET pour copier des données à la presse-papiers du système et de le coller dans une feuille de calcul Excel. Instructions
1
Tapez le code suivant dans un nouveau sous-programme dans votre projet VB.NET pour déclarer vos variables Excel :
xlApp As Microsoft.Office.Interop.Excel.Application = Rien
XLBooks As Microsoft.Office.Interop.Excel.Workbooks = Nothing
xlBook As Microsoft.Office.Interop.Excel.Workbook = Nothing
XLSheets As Microsoft.Office.Interop.Excel.Sheets = Nothing
xlSheet As Microsoft.Office.Interop.Excel.Worksheet = Nothing
2
Tapez la commande suivante pour ajouter une chaîne de texte à la planchette et obtenir le texte du presse-papiers :
processObject As New Process
Clipboard.SetDataObject ("Ceci est copié dans le presse-papiers et ajouté à Excel. " )
< p > clipboardObject As IDataObject = Clipboard.GetDataObject ()
3
Tapez la commande suivante pour ouvrir Excel et ajouter une nouvelle feuille de calcul:
xlApp = New Microsoft.Office.Interop . Excel.application
xlApp.Visible = true
XLApp.DisplayAlerts = False
xlBook = C ( XLApp.Workbooks.Add (), Microsoft.Office.Interop . Excel.Workbook )
XLBooks = XLApp.Workbooks
xlSheet = C ( XLBooks (1). Sheets.Item (1) , Microsoft.Office.Interop.Excel.Worksheet )
XLSheets = XLBook.Worksheets
4
Tapez la commande suivante pour ajouter la chaîne à partir du presse-papiers vers Excel : .
clipboardObject
Si GetDataPresent ( DataFormats . texte) Alors
XLSheet.Cells (1, 1) = . GetData ( DataFormats.Text )
End If End With
5 < p > Exécuter votre programme.