Pb macro vers classeur
Résolu
boomer
-
boomer -
boomer -
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
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:
- Pb macro vers classeur
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Windows 7 vers windows 10 - Accueil - Mise à jour
- Clavier qwerty vers azerty - Guide