ouvrir un fichier excel sous VBRésolu

Question

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&#249;) pour qu'il soit modifiable a partir de n'importe quel usrform



En vous remerciant pour vos reponses... C'est assez urgent

mad_kad · Accepted Answer

il suffit de mettre le nom de ta form qui contient la cr&#233;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&#249; tu cr&#233;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 &#231;a le probl&#232;me alors donne moi ton programme et je vois comme tu as programm&#233;.

jpleroisse · Answer

Projet/R&#233;f&#233;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&#233;cute Microsoft Excel.
AppActivate ReturnValue   ' Active Microsoft


End Sub

jpleroisse

mad_kad · Answer

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

m_heff2002 · Answer

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

m_heff2002 · Answer

Bonjour, 



une autre fois je suis bloqu&#233;: 

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&#233; a la premiere form mon fichier, les feuilles et les
classeurs comme Public, je n'arrive pas a comprendre le probleme

HELP SVP

Ouvrir un fichier excel sous VB

5 réponses

Discussions similaires