Association d'une variable VBA à un fichier

S

smotty

XLDnaute Occasionnel

• 13 Juillet 2010

• #2

Re : Association d'une variable VBA à un fichier

bonsoir,

voir CreateObject et GetObject pour associer un fichier à une variable.
Je vous conseille vivement de lire l'aide Excel à ce sujet


en gros:

dim estimespec1 as workbook
set estimespec1=createobject ("L:\RiskMetrics\Post_Operation\Estimé P&L\Calcul P&L Hedge_SPEC1.xls")

Quelques subtilités entre getobject et createobject que je ne maitrise pas complètement. GetObject sert quand l'object est ouvert et createobject qu'il soit ouvert ou fermé. (j'ai essayé de résumer)

cdt

smotty

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Juillet 2010

• #3

Re : Association d'une variable VBA à un fichier

Bonjour JFLord, smotty

modifie peut être ton code ainsi :

Code:

Sub test()
Dim estimespec1 As Workbook
On Error Resume Next
Set estimespec1 = Workbooks("Calcul P&L Hedge_SPEC1.xls")
On Error GoTo 0
If Not estimespec1 Is Nothing Then
    Workbooks.Open ("L:\RiskMetrics\Post_Operation\Estimé P&L\Calcul P&L Hedge_SPEC1.xls")
End If
End Sub

bonne journée
@+

 

Vote positif 0 Vote négatif

J

JFLord

Guest

• 14 Juillet 2010

• #4

Re : Association d'une variable VBA à un fichier

Merci ca ressemble plus à ce que je cherchais...

par contre, ca me donne encore un run time error 424 «object required» et j'ai utilisé exactement la même structure. Il doit avoir quelque chose que je n'ai pas «catché».

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 14 Juillet 2010

• #5

Re : Association d'une variable VBA à un fichier

Bonjour JFLord, smotty, Pierrot,

Je crois que Pierrot a mis un Not de trop...

Code:

Sub test()
Dim estimespec1 As Workbook
On Error Resume Next
Set estimespec1 = Workbooks("Calcul P&L Hedge_SPEC1.xls")
On Error GoTo 0
If estimespec1 Is Nothing Then
    Workbooks.Open ("L:\RiskMetrics\Post_Operation\Estimé P&L\Calcul P&L Hedge_SPEC1.xls")
End If
End Sub

 

Vote positif 0 Vote négatif

J

JFLord

Guest

• 14 Juillet 2010

• #6

Re : Association d'une variable VBA à un fichier

Non ca fait exactement la même erreure... J'ai aussi essayé

If estimespec1 Is empty Then

et ca fait aussi la même erreur 424 object required

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 14 Juillet 2010

• #7

Re : Association d'une variable VBA à un fichier

Re,

ah bon.. chez moi il rentre dans le If

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Juillet 2010

• #8

Re : Association d'une variable VBA à un fichier

Re, bonsoir toto

oui toto a raison, le "not" est en trop, le code ci dessous fonctionne chez moi, le classeur est dans le répertoire courant... :

Code:

Sub test()
Dim estimespec1 As Workbook
On Error Resume Next
Set estimespec1 = Workbooks("classeur1.xls")
On Error GoTo 0
If estimespec1 Is Nothing Then
    Workbooks.Open ("classeur1.xls")
End If
End Sub

vérifie le nom et le chemin complet de ton fichier....

bonne soirée
@+

 

Vote positif 0 Vote négatif

J

JFLord

Guest

• 15 Juillet 2010

• #9

Re : Association d'une variable VBA à un fichier

Merci la ca fonctionne à merveille!

Mais j'ai une autre interrogation...

si jamais, dans mon code, je dois fermer le fichier et le réouvrir pas mal plus loin. il y a un moyen d'appeler la variable pour ouvrir le fichier sans avoir à tout réécrire le code

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 15 Juillet 2010

• #10

Re : Association d'une variable VBA à un fichier

Bonjour,

pour le fermer cela fonctionerait ainsi :

Code:

estimespec1.Close

A la condition, bien sur que ton classeur était ouvert avant.... par contre pour le réouvrir après fermeture, ta variable sera vide.

@+

 

Vote positif 0 Vote négatif

J

JFLord

Guest

• 15 Juillet 2010

• #11

Re : Association d'une variable VBA à un fichier

la partie pour fermer le fichier je la connaissais mais merci quand meme

sachant maintenant que le fait de fermer le fichier annule mes variables, je vais procéder autrement

merci encore

 

Vote positif 0 Vote négatif

S

smotty

XLDnaute Occasionnel

• 15 Juillet 2010

• #12

Re : Association d'une variable VBA à un fichier

Bonsoir,

ce qui nous ramène à CreateObject, voir mon message précédent:

dim estimespec1 as workbook
set estimespec1=createobject ("L:\RiskMetrics\Post_Operation\Estimé P&L\Calcul P&L Hedge_SPEC1.xls")

Cliquez pour agrandir...

Je l'utilise souvent dans mes programmes. Ainsi on manipule les fichiers comme on veut (Excel, Word, ou autres)

cdt

smotty

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 16 Juillet 2010

• #13

Re : Association d'une variable VBA à un fichier

Bonjour,

Avec "createobject", lors de l'initialisation de la variable, si le classeur n'est pas ouvert, il s'ouvrira mais dans une fenêtre masquée... Tu pourras le fermer avec l'instruction "close", par contre ta variable sera également déchargée et pour le réouvrir il te faudra à nouveau passer par la fonction "createobject", mais bon cela peut être un bon compromis... Tout dépend de ton projet...

bonne journée
@+

 

Vote positif 0 Vote négatif

S

smotty

XLDnaute Occasionnel

• 16 Juillet 2010

• #14

Re : Association d'une variable VBA à un fichier

Bonjour à tous,

Juste pour compléter le raisonnement, la bonne question, est-il bien utile de fermer le fichier si celui-ci n'apparait pas? Le fermer uniquement à la fin du traitement peut être une solution...🙄

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 16 Juillet 2010

• #15

Re : Association d'une variable VBA à un fichier

Re,

Tout à fait d'accord avec toi Smotty, fermer le classeur en fin de procédure....

 

Vote positif 0 Vote négatif