Excel

Résolu
Signaler
Messages postés
27
Date d'inscription
vendredi 26 mai 2006
Statut
Membre
Dernière intervention
21 septembre 2008
-
Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
-
Bonjour 
je voudrais savoir ce qu'il faut que j'écrive comme code pour pouvoir ouvrir un doc excel a partir d'un bouton sous une form et pouvoir remplir d'autres cellules dans ce meme fichier excel que l'on vient d'ouvrir grace a un autre bouton sous une autre form.
et comment faire pour enregistrer ce doc.
j'espere que j'ai été assez clair pour que qqn arrive a me comprendre.

merci

1 réponse

Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
18
Salut,

pour ouvrir Excel :

Dans les déclarations :
    Dim xlApp As Excel.Application

    Dim xlBook As Excel.WorkBook

    Dim xlSheet As Excel.WorkSheet

Private Sub Command1() '** 1er bouton

Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.WorkBooks.Open("C:\Chemin\Nom de ton fichier.xls")
Set xlSheet = xlBook.Sheets("Nom de ta feuille")

End Sub

Private Sub Command2() 

xlSheet.Range("B10").Value = Me.Text1.Text  'c'est un exemple
xlSheet.Range("A10").Value = "Je met ce que je veux")

xlBook.Close True   'avec le true, il y a sauvegarde)
xlApp.Quit

Set xlApp = Nothing

Set xlBook = Nothing

Set xlSheet = Nothing

End Sub

@++

   Mortalino
Le mystérieux chevalier, "Provençal, le Gaulois"