A voir également:
- Programmation VB
- Vb - Télécharger - Langages
- Application de programmation - Guide
- Vb cable - Télécharger - Audio & Musique
- Programmation envoi sms - Guide
- Programmation binaire - Guide
1 réponse
Utilise excel c'est simple;
Imports Microsoft.Office.Interop.Excel
Imports Microsoft.Office.Interop
--- Variables ---
Public xlApp As Excel.Application
Public xlBook As Workbook
Public xlSheet As Worksheet
--- Ouvrir le fichier ---
xlApp = New Excel.Application
xlBook = xlApp.Workbooks.Open("C:\Chemin\fichier.xlsx")
xlSheet = xlBook.Worksheets("feuil1")
xlSheet.Visible = True
xlApp.Visible = False
xlApp.DisplayAlerts = False
--- Ecrire ---
Variable1 = xlSheet.Range("A1").Value
--- Lire ---
xlSheet.Range("A1").Value = Variable1
--- Save ---
xlBook.Save()
Imports Microsoft.Office.Interop.Excel
Imports Microsoft.Office.Interop
--- Variables ---
Public xlApp As Excel.Application
Public xlBook As Workbook
Public xlSheet As Worksheet
--- Ouvrir le fichier ---
xlApp = New Excel.Application
xlBook = xlApp.Workbooks.Open("C:\Chemin\fichier.xlsx")
xlSheet = xlBook.Worksheets("feuil1")
xlSheet.Visible = True
xlApp.Visible = False
xlApp.DisplayAlerts = False
--- Ecrire ---
Variable1 = xlSheet.Range("A1").Value
--- Lire ---
xlSheet.Range("A1").Value = Variable1
--- Save ---
xlBook.Save()
