remplir toute les cellules d'une feuille excelRésolu/Fermé

Question

bonjour,
j'espère être dans le bon forum cette fois ci

je suis sous visual studio 2010, et je commande une feuille excel (2010). je voudrais vérifier et remplir si il y a besoin toute les cellules vide de la dernière rangée de ma feuille excel, par "ok" par exemple.
j'ai pas trouvé sur le net, des exemples qui fonctionnent. Ou je remplie toute la feuille, ou partiellement.
Voici mon code:

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

jordane45 · Answer

Bonjour,
Il semble que la réponse t'ai été donnée ici : 
http://codes-sources.commentcamarche.net/forum/affich-10019713-remplir-toute-les-cellules-d-un-tableau-excel#1;



PS: pour tes prochains messages, merci de bien vouloir utiliser les balises de code. (voir ICI : http://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code)

 
Avant de poser une question, merci de lire la charte du site.
Cordialement, Jordane

Remplir toute les cellules d'une feuille excel

1 réponse