Bonjour à tous,
je viens demander de l'aide car après plusieurs jours de recherche "Google" je n'ai pas trouvé de solution.
J'importe une feuille excel grâce au code suivant:
Mon problème c'est que dans dans ma feuille excel les textes ont des couleurs différentes. J'aimerai quand j'extrait le texte qu'il garde sa couleur.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Dim mycon As System.Data.OleDb.OleDbConnection Dim Dst As System.Data.DataSet Dim mycomd As System.Data.OleDb.OleDbDataAdapter mycon = New System.Data.OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;" & _ "Data Source=c:\TEST.xlsx;Extended Properties=""Excel 12.0 Xml;HDR=No""") mycomd = New System.Data.OleDb.OleDbDataAdapter("select * from [Feuille$]", mycon) mycomd.TableMappings.Add("Table", "TestTabe") Dst = New System.Data.DataSet mycomd.Fill(Dst) DataGridView1.DataSource = Dst.Tables(0)
Est-ce que quelqu'un pourrait m'aider s'il vous plaît?
Merci.![]()
Partager