Discussion :

[ricardams]

Bonjour à tous,


j'ai crée un code pour exporter les informations d'un listbox ,d'un combobox et d'un CheckedListBox auparavant selectionnées ,donc un apres un click sur un boutons les informations
viennent s'écrire dans mon fichier déjà crée dans la ligne 1 en colonne A,B et C
mon probleme est qu'il vient à chaque fois ecraser les information,

j'aimerais obtenir le code(en VB.NET)qui me permette de détecter la denier ligne vide pour concerver celle d'avant.

[r.morel]

Salut,
Il va falloir que tu nous en dis un peu plus sur la manière dont tu pilotes Excel.
Sinon en utilisant la bibliothèque : Microsoft.Office.Interop.Excel

Si tu insères tes données dans un tableau :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Dim Classeur_Excel As Workbook
Dim Feuille_Excel As Worksheet
Classeur_Excel = Application_Excel.ActiveWorkbook
Feuille_Excel = Classeur_Excel.ActiveSheet
Dim Plage As Range = Feuille_Excel.ListObjects("Nom_du_Tableau").ListColumns("Nom_de_la_colonne").DataBodyRange
 
Plage.Rows.Count 'Renvoie le nombre ligne de ton tableau

Si tu insères directement tes données dans ta feuille sans créer un tableau. Tu peux créer une boucle qui compte les lignes :

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 Classeur_Excel As Workbook
Dim Feuille_Excel As Worksheet
Classeur_Excel = Application_Excel.ActiveWorkbook
Feuille_Excel = Classeur_Excel.ActiveSheet
Dim Cellule As Range
Dim n_Ligne As Integer = 2 'Ligne de départ
 
While Not IsNothing(Cellule.Value)
            n_Ligne = n_Ligne + 1
            Cellule = Feuille_Excel.Cells(n_Ligne, 1) 
End While
 
'A partir d'ici n_Ligne correspond à la première ligne vide

@+

[ricardams]

merci beaucoup pour mon cas la deuxième méthode fonctionne