remplir une colonne dans excel

Question

bonjour ou re pour certains voila maintenant que j arrive a faire un fichier excel 
enfin il me le sauvegarde qq part sans pour autant me l ouvrir, j aimerais savoir comment le faire ouvrir directement merci d avance ainsi que pour pouvoir remplir une colonne complete via ma base de donn&#233;e sqlserver merci par avance de votre aide

cs_lim · Answer

RE

Dim xlApp 
As Excel.Application



Dim xlBook 
As Excel.Workbook



Dim XlSheet 
As Excel.Worksheet


xlApp = 
New Excel.Application()


xlBook = xlApp.Workbooks.Add


XlSheet = xlBook.Worksheets(1)


'Ouvre un ficheir excel sp&#233;cifique
xlApp.Workbooks.Open(FileName:="TONFICHIEREXCEL", Editable:=
True, 
ReadOnly:=
False)


xlApp.Visible = 
False

dim xlligne as integer=1
'Tableau &#224; remplir avant ou resultat requete sql

'Ecrire le contenue de mon tableau dans la colonne A
for i=0 to tableau.length-1
      xlApp.Sheets(1).range("A" & xlligne).value = tableau(i)

next

@+
LIM

Remplir une colonne dans excel

1 réponse

Discussions similaires