Ou est la faute???

[nicolas]

Re,

la macro ci dessous ne marche pas (elle est censée pouvoir permettre de sauver une classeur ouvert depuis un autre classeur):

Sub Sauver_classeur2()


Workbooks("H:\Nicolas\mon_anomalie\tableau_mon_anomalie.xls").SaveAs Filename:="H:\Nicolas\mon_anomalie\tableau_mon_anomalie.xls"

End Sub

Saurez vous me dire pkoi?
Si oui , bravo vous êtes plus fort que moi
Remarquez c'est pas dur
a pus koko
merci d'avance bien sûr

 

[@+Thierry]

Bonjour Nicolas, le Forum

Si tu veux sauver ton classeur au même emplacement et avec le même nom il n'est absolument pas nécessaire d'utiliser la méthode "Save As" qui sert donc à exactement l'inverse.

Non, je te conseille d'utiliser au choix, l'une des deux méthodes ci-dessous :

Sub SaveOnly()
Dim WBname As String

WBname = "Rudiments-Basic-Boucles-For-Each.xls"

Workbooks(WBname).Save
End Sub

Sub SaveAndClose()
Dim WBname As String

WBname = "Rudiments-Basic-Boucles-For-Each.xls"

Workbooks(WBname).Close True
End Sub

Comme leurs noms l'indiquent, la première sauvera le classeur en le laissant ouvert, la seconde fermera le classeur et le sauvera. Pour cette dernière méthode, il est interressant de noter que le paramètre "True" sauve le classeur, mais si l'on met ce paramètre à l'inverse ("False"), et bien le classeur sera fermé sans être sauvé.

Bon Appétit
@+Thierry

 

[nicolas]

Merci Thierry je m'en vais essayer de suite la deuxième méthode
a plus