Ouvrir un fichier excel sous VB

Résolu
m_heff2002
Messages postés
14
Date d'inscription
vendredi 10 novembre 2000
Statut
Membre
Dernière intervention
30 janvier 2006
- 13 avril 2005 à 18:37
mad_kad
Messages postés
23
Date d'inscription
mercredi 9 février 2005
Statut
Membre
Dernière intervention
22 août 2005
- 19 avril 2005 à 09:52
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

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

19 avril 2005 à 09:52
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
jpleroisse
Messages postés
1788
Date d'inscription
mardi 7 novembre 2000
Statut
Membre
Dernière intervention
11 mars 2006
27
13 avril 2005 à 20:18
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
0
mad_kad
Messages postés
23
Date d'inscription
mercredi 9 février 2005
Statut
Membre
Dernière intervention
22 août 2005

14 avril 2005 à 09:17
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
0
m_heff2002
Messages postés
14
Date d'inscription
vendredi 10 novembre 2000
Statut
Membre
Dernière intervention
30 janvier 2006

15 avril 2005 à 18:22
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
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
m_heff2002
Messages postés
14
Date d'inscription
vendredi 10 novembre 2000
Statut
Membre
Dernière intervention
30 janvier 2006

18 avril 2005 à 16:58
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
0