galahade
Messages postés5Date d'inscriptiondimanche 11 janvier 2004StatutMembreDernière intervention 7 octobre 2004
-
7 oct. 2004 à 15:37
cs_youlel
Messages postés24Date d'inscriptionmardi 29 mars 2005StatutMembreDernière intervention19 juillet 2005
-
28 juin 2005 à 15:35
Salut à tous,
Je suis en train de devlloper une application sous VB 6.0 et je cherche à inserer une ligne dans un fichier excel.
J'ai ouvert la feuille excel en tant qu'objet, et quand j'essaie de faire :
XL.application.worksheets(1).range(1).insert
ca ne marche pas, j'ai aussi essaye en selectionnant d'abord une ligne et en inserant apres, mais ca ne marche pas.
cs_youlel
Messages postés24Date d'inscriptionmardi 29 mars 2005StatutMembreDernière intervention19 juillet 2005 28 juin 2005 à 15:35
bonjour,
j'essaye la meme chose mais ça marche pas à votre avis pourquoi???
voila mon code:
For i = 1 To NbRésBrui
'selection
xlApp.Workbooks(NomClasseurCible).Worksheets(NomFeuilleCible).Rows("lign+i:lign+i").Selection
'insertion d'une ligne
xlApp.Workbooks(NomClasseurCible).Worksheets(NomFeuilleCible).Selection.EntireRow.Insert Shift:=xlDown