OVH Cloud OVH Cloud

readonlyrecommanded

5 réponses
Avatar
René Delcourt
Bonjour,
J'essaie de dire en VBA
ActiveWorkbook.SaveAs (Repert & Ct & " - Semaine-Woche " & NoSem & ".xls,
ReadOnlyRecommanded:=true)
mais il me donne une erreur.
--
René Delcourt

5 réponses

Avatar
JLuc
*Bonjour René Delcourt*,
a la fin de ".xls il manque la double cote fermante ;-)

Bonjour,
J'essaie de dire en VBA
ActiveWorkbook.SaveAs (Repert & Ct & " - Semaine-Woche " & NoSem & ".xls,
ReadOnlyRecommanded:=true)
mais il me donne une erreur.


--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O

Avatar
René Delcourt
Merci pour ton observation.
C'est une erreur de retranscription.

Message : Erreur de compilation Attendu : ActiveWorkbook.SaveAs (Repert & Ct & " - Semaine-Woche " & NoSem & ".xls",
ReadOnlyRecommanded:=true)
--
René Delcourt



*Bonjour René Delcourt*,
a la fin de ".xls il manque la double cote fermante ;-)

Bonjour,
J'essaie de dire en VBA
ActiveWorkbook.SaveAs (Repert & Ct & " - Semaine-Woche " & NoSem & ".xls,
ReadOnlyRecommanded:=true)
mais il me donne une erreur.


--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O






Avatar
docm
Bonjour.

ActiveWorkbook.SaveAs Repert & Ct & " - Semaine-Woche " & NoSem & ".xls",
ReadOnlyRecommended:=True

docm

"René Delcourt" wrote in message
news:
Bonjour,
J'essaie de dire en VBA
ActiveWorkbook.SaveAs (Repert & Ct & " - Semaine-Woche " & NoSem & ".xls,
ReadOnlyRecommanded:=true)
mais il me donne une erreur.
--
René Delcourt


Avatar
René Delcourt
OK Merci,
Je constate qu'avec ce paramètre, Excel propose cependant de l'ouvrir
normalement.
Je ne voudrais pas donner le choix.
--
René Delcourt



Bonjour.

ActiveWorkbook.SaveAs Repert & Ct & " - Semaine-Woche " & NoSem & ".xls",
ReadOnlyRecommended:=True

docm

"René Delcourt" wrote in message
news:
Bonjour,
J'essaie de dire en VBA
ActiveWorkbook.SaveAs (Repert & Ct & " - Semaine-Woche " & NoSem & ".xls,
ReadOnlyRecommanded:=true)
mais il me donne une erreur.
--
René Delcourt







Avatar
docm
Si tu ne veux pas donner le choix, il faut changer la propriété Lecture
seule avec Windows Explorer, l'équvalent en VBA étant SetAttr .

f = "c:test.xls"
SetAttr f, vbReadOnly

docm

"René Delcourt" wrote in message
news:
OK Merci,
Je constate qu'avec ce paramètre, Excel propose cependant de l'ouvrir
normalement.
Je ne voudrais pas donner le choix.
--
René Delcourt



Bonjour.

ActiveWorkbook.SaveAs Repert & Ct & " - Semaine-Woche " & NoSem &
".xls",


ReadOnlyRecommended:=True

docm

"René Delcourt" wrote in message
news:
Bonjour,
J'essaie de dire en VBA
ActiveWorkbook.SaveAs (Repert & Ct & " - Semaine-Woche " & NoSem &
".xls,



ReadOnlyRecommanded:=true)
mais il me donne une erreur.
--
René Delcourt