code pour excel

Question

Bonjour, je suis sur vb 2005.
Je voudrais faire un code qui pour une page excel, m'affiche en haut de chaque colonne  que les titre soit en gras centré sur fond grisé. Et aussi Pour faire le quadrillage du tableau  mais tout cela de facon variable.
Merci

lillith212 · Answer

Bonjour,

Peux tu être un peu plus explicite?
Tu veux développer une application sous vb 2005, qui permet de paramètrer une feuille Excel???
Quelles sont les variables que tu souhaites ?
Ton code te pose problème où?
Bon coding

S.L.B.
<hr />

Bastien88 · Answer

J'ai un SQL serveur qui quand je tape une requete dans une combobox, cela affiche dans un datagridview un tableau avec comme titre les differente parti de requete taper ( un element de requete= une colonne) et les ligne qui suivent sont en raport ac les titre (logik)
Puis en appuyant sur un bouton je veu que tout se qu'il y a dans mon datagridview se mette a l'identique mais dans un classeur excel

Bastien88 · Answer

Private








Sub

 Button1_Excel_Click(


ByVal

 sender 


As

 System.Object, 


ByVal

 e 


As

 System.EventArgs) 


Handles

 Button1_Excel.Click



Dim

 Matable 


As





New

 DataTableReader(MonDataset.MaTableEtat)



Dim

 Mafeuille, MonExcel 


As





Object


MonExcel = CreateObject(





"Excel.Application"

)Mafeuille = MonExcel.Workbooks.add



With

 Mafeuille.application.visible = 



True








While

 Matable.Read()



For

 i 


As





Integer

 = 0 


To

 Matable.FieldCount - 1 


' Pour se trimbaler dans MaTableEtat


MsgBox(Matable.Item(i), MsgBoxStyle.OkOnly, 





"test"

) 


' Pour se trimbaler dans MaTableEtat








Next





' Pour se trimbaler dans MaTableEtat








With

 .cell.Interior 


' Pour le fond en couleur et l'ecriture en gras et le centrage


.Rows(1).Select() 





' Pour le fond en couleur et l'ecriture en gras et le centrage


.Selection.Font.Bold = 





True





' Pour le fond en couleur et l'ecriture en gras et le centrage


.HorizontalAlignment = -4108 





' Pour le fond en couleur et l'ecriture en gras et le centrage








End





With








End





While








End





With


MonExcel = 





Nothing








'MonExcel("Feuil1").Select()








'MonExcel.ActiveWorkbook.SaveAs("C:\bastien\WindowsApplication1")








'MonExcel.ActiveWorkbook.Save()








End





Sub

userrrqi115 · Answer

Hello, 

Si j'ai bien compris ta variable est ton nombre de colonne c.a.d. le nombre d'élément.

dans le coding ci dessus(With .cell.Interior )
 cell est une variable ? comment est elle définie ?

BR

USERRRQI115
Simple user
Great brain

Code pour excel

4 réponses

Votre réponse

Discussions similaires