Discussion :

[Okuden]

Bonjour,

après plusieurs recherches infructueuses je viens demander votre aide.
Pour simplifier, j'ai une application avec :
- une DateTimePicker
- une Listbox (alimentée par un fichier xml)
- une Textbox (alimentée par un fichier xml)
- un fichier Excel avec 3 colonnes pour récupérer la valeur de chaque élément

Lorsque j'appuie sur un bouton j'aimerais que la valeur de chaque élément soit exporté vers des cellules et sur une seule ligne Excel.
J'arrive à écrire chaque élément dans une cellule spécifique mais ce que je souhaiterais c'est que le programme écrive ces valeurs sur une ligne vide sans écraser la ligne précédente si des valeurs sont inscrites.

Avez-vous une idée à me suggérer ?

Merci d'avance.

[hugoclo]

Il suffit de trouver la premiere ligne vide et d'ecrire dessus.

Code :

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

1
2
Dim PremiereLigneVide as string
PremiereLigneVide = Worksheets("Feuil1").Range("A1").End(xlDown).Address

ou petite fonction qui recherche la premiere ligne vide en fonction d'une colonne

Code :

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

1
2
3
4
5
6
7
8
Public Function PremiereLigneVide(ByVal Colonne As Integer) As Integer
If Not excelapp.ActiveWorkbook.ActiveSheet.cells(1, Colonne).value = "" Then
PremiereLigneVide = excelapp.ActiveWorkbook.Worksheets("Feuil1").Columns(Colonne).Find("").Row 
Return PremiereLigneVide
Else
Return PremiereLigneVide = 1 
End If
End Function

[Okuden]

Merci hugoclo mais il me semble que c'est du VBA. Auriez-vous la même chose en VB.NET ?

Merci d'avance.

[wallace1]

Regardes par ici pour implémenter Excel dans VbNet : http://www.developpez.net/forums/d12...s/#post7056762


A+

[Okuden]

Merci wallace1 pour ton lien. C'est bien ce que j'ai fait dans mon code donc aucun problème de ce côté là tout fonctionne.
Ce que je cherche à faire c'est détecter la première ligne vide de la feuille Excel afin de pouvoir y écrire le contenu de mes listbox, textbox etc... tout ça pour ne pas écraser les valeurs des lignes précédentes.

[Okuden]

C'est OK le problème est résolu. Merci à vous pour votre aide !

[ricardams]

bonjour,

j'ai le même problème en vb.net pour écrire sous Excel en denier cellule vide ,
comment as tu fais ?