Import et export de cellule excel

feroce88 Messages postés 5 Date d'inscription mardi 27 juillet 2004 Statut Membre Dernière intervention 27 mai 2005 - 2 févr. 2005 à 13:22
cs_ITALIA Messages postés 2169 Date d'inscription vendredi 20 avril 2001 Statut Membre Dernière intervention 30 juin 2009 - 2 févr. 2005 à 14:55
je voudrais savoir les instrutions qui permette l'import et l'export de cellule excel merci d'avance

FEROCE

1 réponse

cs_ITALIA Messages postés 2169 Date d'inscription vendredi 20 avril 2001 Statut Membre Dernière intervention 30 juin 2009 9
2 févr. 2005 à 14:55
Coches Projet...Références...Microsoft Excel....Object Library.
Pour un Fichier Existant

Set xlApp = New Excel.Application
With xlApp
'Ouverture du document XLS
Set xlBook = .Workbooks.Open(FileName:="C:\TonFichier.xls", ReadOnly:=False, Editable:=True) ' Français
'Séléction de la feuille 1
Set xlSheet = xlBook.Worksheets(1)
End With


With xlSheet
.Cells(4, 5) = [mailto:It@li@ It@li@] ' E4
TaValeur=.Cells(4, 5)
End With


'Détruit les objets
Set xlSheet = Nothing
Set xlBook = Nothing
Set xlApp = Nothing



It@li@
0