Script: Wie kann ich in der Foto-App auf dem Mac Bilder ohne Schlagwort suchen?

Dieser Benutzertip wurde auf eine neue Seite verschoben, da sich die alte Fassung nicht mehr gut bearbeiten lässt. Bitte noch noch die neue Fassung verwenden: Script: Wie kann ich in der Foto-App auf … - Apple Community

-- ignorieren ---

Mit intelligenten Alben können wir in Fotos zwar nach Fotos suchen, die ein bestimmtes Schlagwort haben. Aber wir können nicht nach Fotos suchen, die noch kein Schlagwort haben. Wir müssten alle Schlagworte aufzählen und nach "Schlagwort ist nicht ...." suchen.

Man kann aber ein AppleScript verwenden, um alle Fotos ohne Schlagwort zu finden. Ich habe im englischen Apple Support Forum so ein Skript veröffentlicht, siehe:https://discussions.apple.com/docs/DOC-10291

Um es zu benutzen, wähle alle Fotos in Fotos aus, die du auf Schlagworte überprüfen willst.Öffne das Skript in ScriptEditor. Dann drücke die Run Taste.

Das Skript geht die ausgewählten Fotos durch, und fügt dann jedes Foto ohne Schlagworte einem Album namens "missingKeywordsAlbum" zu.

-- --- ✄ ✄ ------------- Ab hier in den Script Editor kopieren ------------------

(* Find All Photos Without Keywords © Léonie

This script will scan the photos passed to it for keywords and add all photos without keywords to a standard album called missingKeywordsAlbum

To use this script, select a some photos in Photos to check for missing keyword.Then press the "Run" button.

The photos can be passed to the script in two ways:1. Either select photos while viewing the "All Photos" album; this works better than Moments or smart albums2. Or collect the Photos in a top level defined album with a fixed name. This is safer when your Photos Library is an iCloud Photo Library.

If you want to select the photos without collecting them in an album, set the variable "ReadFromAlbum" to falseIf you want to pass the photos in a toplevel album, set ReadFromAlbum to true and change the variable "theAlbumName" to the name of the album you are using.

*)

setReadFromAlbumtofalse

-- set this to true, if you want to pass the photos in a toplevel albumsettheAlbumName to "PhotoDropBox" -- change this to the name of the album you will use

set imageSel to {}setsaved_delimitertoAppleScript'stext item delimiters--save the delimiterset missingalbumname to "missingKeywordsAlbum"

tell application "Photos"

activate if (ReadFromAlbum) then -- the photos will be passed in a toplevel album named "PhotoDropBox"

try

if existscontainertheAlbumNamethen

set thePhotosBuffertocontainertheAlbumName set imageSel to every media itemofthePhotosBuffer else error "Album " & theAlbumName & "does not exist" end if

on error errTexttwonumbererrNumtwo display dialog "Cannot open album: " & errNumtwo & return & errTexttwo end try

else -- process the selected photos from the All Photos album try set imageSel to (get selection) on error errTexttwonumbererrNumtwo display dialog "Cannot get the selection: " & errNumtwo & return & errTexttwo end try

end if

-- check, if the album or the selected photos do contain images if imageSel is {} then error "Please select some images." else -- create an album for the photos without keywords try

if existscontainermissingalbumnamethen

set kwatocontainermissingalbumname else set kwa to (makenewalbumnamedmissingalbumname)

end if

on error errTexttwonumbererrNumtwo display dialog "Cannot open album missingKeywordsAlbum: " & errNumtwo & return & errTexttwo end try

repeat with im in imageSel

try

tell im

--set the text item delimiter set AppleScript'stext item delimiters to {", "} --use a comma and space as the delimiter

-- retrieve the keywords

set kws to its keywords as string if (not (exists kws) or (kws is "missing value")) then add {im} to kwa end if

end tell on error errText number errNum display dialog "Error: " & errNum & return & errText & "Trying again" try

delay 2 -- wait and try again tell im

--set the text item delimiter set AppleScript'stext item delimiters to {", "} --use a comma and space as the delimiter

-- retrieve the keywords

set kws to its keywords as string if (not (exists kws) or (kws is "missing value")) then add {im} to kwa end if

end tell on error errTexttwonumbererrNumtwo display dialog "Skipping image due to repeated error: " & errNumtwo & return & errTexttwo end try end try end repeat end ifend tell-- display dialog "Done"setAppleScript'stext item delimiterstosaved_delimiter--restore the delimiter

return "Done"

Dieses Dokument wurde anhand der folgenden Diskussion generiert: Wie kann ich in der Foto-App auf dem Mac Bilder ohne Schlagwort suchen?