Import et export de cellule excel

Signaler
Messages postés
5
Date d'inscription
mardi 27 juillet 2004
Statut
Membre
Dernière intervention
27 mai 2005
-
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
-
je voudrais savoir les instrutions qui permette l'import et l'export de cellule excel merci d'avance

FEROCE

1 réponse

Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
8
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@