gillardg
Messages postés3275Date d'inscriptionjeudi 3 avril 2008StatutMembreDernière intervention14 septembre 2014
-
28 juin 2008 à 16:02
zinouba89
Messages postés1Date d'inscriptionlundi 7 février 2011StatutMembreDernière intervention 3 mai 2011
-
3 mai 2011 à 04:20
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
zinouba89
Messages postés1Date d'inscriptionlundi 7 février 2011StatutMembreDernière intervention 3 mai 2011 3 mai 2011 à 04:20
ça ne fonctionne pas! Imports Excel
/* c'est quoi ce truc !! j'ai ajouter
"Imports Microsoft.Office.Interop.Excel "
mais ça marche pas et j'ai rien compris :(
master21
Messages postés1Date d'inscriptiondimanche 28 décembre 2008StatutMembreDernière intervention19 novembre 2009 19 nov. 2009 à 21:04
Merci
Adoulaman
Messages postés3Date d'inscriptionmercredi 19 novembre 2008StatutMembreDernière intervention16 février 2009 28 déc. 2008 à 22:19
Merci
LunaPurple
Messages postés19Date d'inscriptiondimanche 15 avril 2007StatutMembreDernière intervention20 octobre 2010 21 sept. 2008 à 19:39
Je viens de m'apercevoir qu'il fallait aussi ajouter
Me.ProgressBar1.Value = 0
au tout début du code sur l'action click du bouton4 pour réinitialiser la progressbar avant toute action.
Sinon, lorsqu'on enchaîne les exports xls et xml pour une même table, il plante car à la fin, 1 + 1 = 2 (c'est un scoop ! ;-), et la valeur de la progressbar ne peut pas être supérieure à 1.
début du Code à modifier :
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles butt_Convertir.Click
Me.ProgressBar1.Value = 0
If Me.RadioButton1.Checked Then
For i As Integer = 0 To Me.ListBox2.Items.Count - 1
If TableToXmlConverter(Me.ListBox2.GetItemText(Me.ListBox2.Items(i)), Me.TextBox2.Text, Con) Then
Me.ProgressBar1.Value += 1
End If
Next
LunaPurple
Messages postés19Date d'inscriptiondimanche 15 avril 2007StatutMembreDernière intervention20 octobre 2010 21 sept. 2008 à 18:47
Merci pour cette source qui m'a permis de faire mes exports xml sans me casser la tête !
Juste deux petits soucis pour l'export excel.
Il faut remplacer Rows par Columns dans la première boucle
'Entéte de feuille
Dim C, L As Integer
For C = 0 To DataSet.Tables(0).Columns.Count - 1
xls.Cells(1, C + 1) = DataSet.Tables(0).Columns(C).ColumnName
Next
Et la variable B doit être mise à False lorsque l'on est dans le Catch de l'exception.
On peut même y ajouter :
MessageBox.Show(ex.ToString) 'donne le lib de l'erreur rencontrée
si on veut.
Voilà. Très bonne source dans l'ensemble. Merci de l'avoir partagée.
simo5963
Messages postés127Date d'inscriptionvendredi 12 octobre 2007StatutMembreDernière intervention24 mars 20091 4 juil. 2008 à 23:38
Merci a vous JAMALLA
jamalla
Messages postés4Date d'inscriptionvendredi 4 juillet 2008StatutMembreDernière intervention 4 juillet 2008 4 juil. 2008 à 20:42
de vous efforts
jamalla
Messages postés4Date d'inscriptionvendredi 4 juillet 2008StatutMembreDernière intervention 4 juillet 2008 4 juil. 2008 à 20:37
merci
simo5963
Messages postés127Date d'inscriptionvendredi 12 octobre 2007StatutMembreDernière intervention24 mars 20091 29 juin 2008 à 13:21
ANTHONYGEGO,SIMONEO => Merci a vous tout les deux,
Le vrai développeur n’est pas emballé, il essai d’analyser le code avant de juger, généralement il donne une conseille te faire avancer en avant.
Imports Excel
/* c'est quoi ce truc
????????????????
*/ ce donne pas une bonne impression.
cs_simoneo
Messages postés20Date d'inscriptionsamedi 4 novembre 2006StatutMembreDernière intervention29 juin 2008 29 juin 2008 à 05:07
ça fonctionne très bien simo5963. Le code est claire et bien organisé. Merci
gillardg
Messages postés3275Date d'inscriptionjeudi 3 avril 2008StatutMembreDernière intervention14 septembre 20142 28 juin 2008 à 17:25
Imports Microsoft.Office.Interop.Excell
anthonygego
Messages postés48Date d'inscriptionlundi 1 août 2005StatutMembreDernière intervention10 juillet 20081 28 juin 2008 à 17:17
Chez moi cela fonctionne. Le namespace Excel vient de la librairie Interop.Excel.dll...
gillardg
Messages postés3275Date d'inscriptionjeudi 3 avril 2008StatutMembreDernière intervention14 septembre 20142 28 juin 2008 à 16:02
ça ne fonctionne pas!
Imports Excel
/* c'est quoi ce truc
????????????????
*/
comment pourrais fonctionner un prog si déjà dans les 10 premières déclarations il y a des erreurs
3 mai 2011 à 04:20
/* c'est quoi ce truc !! j'ai ajouter
"Imports Microsoft.Office.Interop.Excel "
mais ça marche pas et j'ai rien compris :(
19 nov. 2009 à 21:04
28 déc. 2008 à 22:19
21 sept. 2008 à 19:39
Me.ProgressBar1.Value = 0
au tout début du code sur l'action click du bouton4 pour réinitialiser la progressbar avant toute action.
Sinon, lorsqu'on enchaîne les exports xls et xml pour une même table, il plante car à la fin, 1 + 1 = 2 (c'est un scoop ! ;-), et la valeur de la progressbar ne peut pas être supérieure à 1.
début du Code à modifier :
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles butt_Convertir.Click
Me.ProgressBar1.Value = 0
If Me.RadioButton1.Checked Then
For i As Integer = 0 To Me.ListBox2.Items.Count - 1
If TableToXmlConverter(Me.ListBox2.GetItemText(Me.ListBox2.Items(i)), Me.TextBox2.Text, Con) Then
Me.ProgressBar1.Value += 1
End If
Next
21 sept. 2008 à 18:47
Juste deux petits soucis pour l'export excel.
Il faut remplacer Rows par Columns dans la première boucle
'Entéte de feuille
Dim C, L As Integer
For C = 0 To DataSet.Tables(0).Columns.Count - 1
xls.Cells(1, C + 1) = DataSet.Tables(0).Columns(C).ColumnName
Next
Et la variable B doit être mise à False lorsque l'on est dans le Catch de l'exception.
On peut même y ajouter :
MessageBox.Show(ex.ToString) 'donne le lib de l'erreur rencontrée
si on veut.
Voilà. Très bonne source dans l'ensemble. Merci de l'avoir partagée.
4 juil. 2008 à 23:38
4 juil. 2008 à 20:42
4 juil. 2008 à 20:37
29 juin 2008 à 13:21
Le vrai développeur n’est pas emballé, il essai d’analyser le code avant de juger, généralement il donne une conseille te faire avancer en avant.
Imports Excel
/* c'est quoi ce truc
????????????????
*/ ce donne pas une bonne impression.
29 juin 2008 à 05:07
28 juin 2008 à 17:25
28 juin 2008 à 17:17
28 juin 2008 à 16:02
Imports Excel
/* c'est quoi ce truc
????????????????
*/
comment pourrais fonctionner un prog si déjà dans les 10 premières déclarations il y a des erreurs