Pb macro vers classeur

Résolu/Fermé
boomer - 14 mai 2011 à 07:44
 boomer - 19 mai 2011 à 18:21
Bonjour,



voilà, je suis novice en vba, ma question va peut etre paraitre simple.
j'ai fait une macro qui me permet de recherche une valeur stock sur un autre classeur, si cette valeur est inferieur à 100 alors msgbox " à commander" sinon addition du stock + nouvelle valeur.
macro exemple:
Sub test()
Dim cl As Workbook
Dim rest As Integer
Set cl = GetObject("C:....\ test.xls")
rest = cl.Sheets("feuil1").Range("A1").Value
If rest < 100 Then
MsgBox ("à commander")
Range("B2").Value = rest
Else
MsgBox ("ne pas commander")
Range("B3").Value = rest
cl.Sheets("feuil1").Range("A1").Value = rest +10
End If
cl.Save
Set cl = Nothing
Workbooks(" test.xls").Close
End Sub
le pb est que, je souhaite apres la fermeture de tous les classeurs, retourner via le bureau voir si les modifs ont bien été enregistrées et là j'ouvre un classeur vide nommé classeur 1
impossible de lire le classeur test.xls mais en revanche je peux toujours faire les modifs par l'intermediaire du classeur contenant la macro!!!
si quelqu'un pouvait m'expliquer d'ou peut venir mon erreur??
Merci
A voir également:

1 réponse

salut
J'ai resolu mon probleme, il fallait juste aller dans le classeur vierge ouvert (A la place test.xls) , option fenetre/Afficher le classeur...
peut etre que ça interessera quelqu'un ?

La fonction GetObjcet masque le classeur à la reeouverture de celui-ci.
0