Ouvrir un fichier excel sous VB [Résolu]

Signaler
Messages postés
14
Date d'inscription
vendredi 10 novembre 2000
Statut
Membre
Dernière intervention
30 janvier 2006
-
Messages postés
23
Date d'inscription
mercredi 9 février 2005
Statut
Membre
Dernière intervention
22 août 2005
-
Bonjour,



Je voudrais pouvoir ouvrir un fichier excel sous VB pour pouvoir le modifier par la suite a partir de different usrForms



Je suis nouveau dans VB et je ne sais pas comment faire.



donc SVP pouvez vous me dire :

**Comment ouvrir un fichier excel?

**Comment le declarer (et où) pour qu'il soit modifiable a partir de n'importe quel usrform



En vous remerciant pour vos reponses... C'est assez urgent

5 réponses

Messages postés
23
Date d'inscription
mercredi 9 février 2005
Statut
Membre
Dernière intervention
22 août 2005

il suffit de mettre le nom de ta form qui contient la création de ta page excel devant les variables de manipulation de la page excel comme "feuille" ou "classeur"
exemple :

on est sur une autre form exemple Formappli et la form où tu crées ta page excel Formexcel

dim t1, t2
t1 = Formexcel .feuille.Cells(2, 1)

t2 = Formexcel .feuille.Cells(m + 3, 1)

si c'est pas ça le problème alors donne moi ton programme et je vois comme tu as programmé.
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 152 internautes nous ont dit merci ce mois-ci

Messages postés
1788
Date d'inscription
mardi 7 novembre 2000
Statut
Membre
Dernière intervention
11 mars 2006
25
Projet/Références, cocher Microsoft Excel x Object Library
( x suivant la version Excel que tu as 9 , 10 , 11)

Ensuite si tu veux travailler directement dans un classeur, tu tappes le code qui suit.

Private Sub Command1_Click()
Dim ReturnValue
ReturnValue = Shell("C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE", 1) ' 'Exécute Microsoft Excel.
AppActivate ReturnValue ' Active Microsoft


End Sub

jpleroisse
Messages postés
23
Date d'inscription
mercredi 9 février 2005
Statut
Membre
Dernière intervention
22 août 2005

Tiens j'ai un bon exemple pour toi qui marche tres bien:

Dim Appli As Excel.Application
Dim classeur As Excel.Workbook
Dim feuille As Excel.Worksheet
Dim tmp1, tmp2, tmp3 as String

Set Appli = CreateObject("Excel.application")
Appli.Visible = True
Appli.DisplayAlerts = False


'Ouverture du classeur
Set classeur = Appli.Workbooks.Open(C:\Destination de ton fichier excel)
Set feuille = classeur.Worksheets(1)

tmp1 = feuille.Cells(2, 1)


tmp2 = feuille.Cells(m + 3, 1)


If feuille.Cells(13, 1) = "-FIN-" Then
tmp3 = feuille.Cells(12, 1)
Else
tmp3 = feuille.Cells(13, 1)
End If
Messages postés
14
Date d'inscription
vendredi 10 novembre 2000
Statut
Membre
Dernière intervention
30 janvier 2006

Merci pour vos reponses,

Je vais essayer cela, meme si moi le but de ma question est que j'ai un
fichier excel a part, et je voulais plus l'ouvrir lui qu'en creer un
autre



anyway merci qd meme :D
Messages postés
14
Date d'inscription
vendredi 10 novembre 2000
Statut
Membre
Dernière intervention
30 janvier 2006

Bonjour,



une autre fois je suis bloqué:

Je voudrais qu'une fois j'ai ouvert le fichier excel, je puisse le
manipuler de la ou je veux, a partir de n'importe quelle form.

Or je recois un message d'erreur disant: variable de type Object ou variable de bloc With n'est pas etablie..

Sachant
que j'ai declaré a la premiere form mon fichier, les feuilles et les
classeurs comme Public, je n'arrive pas a comprendre le probleme

HELP SVP