XL 2016 Sauvgarder un fichier sur Mac

isabelle29 · 13 Juin 2019

Bonjour à tous,
S'il vous plait comment je vais faire pour faire fonctionner ce code sur mac

VB:

Sub e()
Dim ch As String
ch = Range("a1")
Workbooks.Add
ActiveWorkbook.SaveAs ch

End Sub

job75 · 13 Juin 2019

Bonjour isabelle29,

Sur Mac le séparateur dans le chemin n'est pas l'antislash \ , de plus il vaut mieux préciser le format du fichier :

VB:

Sub e()
Dim ch As String
ch = Replace(Range("a1"), "\", Application.PathSeparator)
Workbooks.Add
ActiveWorkbook.SaveAs ch, xlOpenXMLWorkbook 'extension .xlsx
End Sub

XL 2016 Sauvgarder un fichier sur Mac

isabelle29

XLDnaute Nouveau

job75

XLDnaute Barbatruc

Discussions similaires

XL 2016 Sauvgarder un fichier sur Mac

isabelle29

XLDnaute Nouveau

job75

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency