Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1556to1560
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1556to1560
1556to1560
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mac Volume Name auslesen

Mac Volume Name auslesen
23.05.2017 09:59:36
Joachim
Hallo,
ich brauch den Namen der Platte vom Mac. Normalerweise lautet der "Macintosh HD", kann aber anders heißen.
Um unter Excel 2011 für Mac eine Datei zu speichern, benötige ich den Namen. Bei Excel 2016 für Mac ist das nicht mehr notwendig.
2011:
ActiveWorkbook.SaveAs "Macintosh HD:Users:" & benutzer & ":" & name & "", FileFormat:=52
2016:
ActiveWorkbook.SaveAs "/Users/" & benutzer & "/" & name & "", FileFormat:=52
Wie kann ich den Namen ermitteln? Finde nix im Netz dazu.
Gruß
Joachim

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mac Volume Name auslesen
23.05.2017 11:47:07
Kawensmann
Hallo,
habe zwar MS Office auf dem Mac nie benutzt, aber lässt sich der Volume Name nicht aus Application.Path extrahieren?
Gruß
Kawensmann
oder so (AppleScript)
23.05.2017 18:47:12
KlausF
Hallo Joachim,
mit AppleScript könntest Du die einzelnen Folder ansprechen:
Sub SpecialFoldersExample()
Dim SpecialFolders As String
SpecialFolders = _
"Application Folder : " & MacScript("return (path to applications folder) as string") &  _
vbNewLine & _
"Desktop Folder : " & MacScript("return (path to desktop folder) as string") & vbNewLine & _
"Documents Folder : " & MacScript("return (path to documents folder) as string") & vbNewLine &  _
_
"Music Folder : " & MacScript("return (path to music folder) as string") & vbNewLine & _
"Pictures Folder : " & MacScript("return (path to pictures folder) as string") & vbNewLine & _
"Movie Folder : " & MacScript("return (path to movies folder) as string")
MsgBox SpecialFolders
End Sub
Ansonsten gibt Dir ThisWorkbook.Path wie unter Windows den aktuellen Pfad
wieder, den man dann nach dem ersten Doppelpunkt splitten müsste.
Gruß
Klaus
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige