Bonsoir,

j'ai un programme conçue avec visual studio 2010. l'utilisateur qui utilise ce programme renseigne plusieurs texbox et combox 8 au total exactement, d'où je récupéré les infos et les transfert sur une feuille excel (2010). Sur la feuille excel , j'ai 8 colonnes de "A" jusqu'à "H". Maintenant mon problème est qui peux y avoir des cellules vide, et moi j'aimerai contrôler avant le des transfert de données, que toute les cellule de la dernière rangeé ( A jusqu'à H) vide soit rempli par un "Ok" par exemple.

voici un mon code

j'ai pas trouvé sur le net, des exemples qui fonctionnent. Ou je remplie toute la feuille, ou partiellement.
Voici mon code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Dim oExcel As Excel.Application
 
oExcel = CreateObject("Excel.Application")
oExcel.Visible = False
oWk = oExcel.Workbooks.Open("C:\charge\chargeEssai.xlsx")
 
For Each cellule As Excel.Range In oWk.Sheets(1).range("A1048576:H1048576").End(Excel.XlDirection.xlUp).Offset(1, 0).Rows.cells
  If cellule.Value = Nothing Then
    cellule.Value = "ok"
merci pour votre aide

Salutations