Einfuegen von jpgs in Powerpoint (VIELE jpgs)

Dieses Thema im Forum "Scripting und Automatisierung" wurde erstellt von talla, 27.02.2006.

  1. talla

    talla Thread Starter MacUser Mitglied

    Beiträge:
    120
    Zustimmungen:
    0
    MacUser seit:
    03.10.2005
    Hallo,

    wie stelle ich es am besten an, mehrere tausend jpgs in Microsoft PowerPoint zu importieren und zwar so, dass zuerst jeweils eine neue Folie aus einem Template eingefuegt wird, anschliessend das jpg in einer bestimmten Groesse und Position auf diese leere Folie kopiert wird. Alle auf einmal geht sicher nicht, also braeuchte ich auch noch sowas wie einen Zaehler (z.b. "if count jpgs=50 then open new presentation based on template x " und dann dasselbe wie zuvor). Ich steig da grade ueberhaupt nicht durch + natuerlich sollte das Ganze gestern schon fertig sein... :(
    Bin sehr dankbar fuer Input!
     
  2. w2lab

    w2lab MacUser Mitglied

    Beiträge:
    125
    Zustimmungen:
    1
    MacUser seit:
    21.02.2006
    Code:
    set myFolder to choose folder
    tell application "Finder"
    	set allFiles to files 10 thru 15 of myFolder --to every file of myFolder
    end tell
    
    tell application "Microsoft PowerPoint"
    	activate
    	--make new presentation
    	repeat with aFile in allFiles
    		set thisSlide to make new slide at the end of the active presentation
    		--with properties {layout:slide layout object over text}	
    		tell the active presentation
    			set pictureShape to make new picture at thisSlide ¬
    				with properties {top:10, left position:10, height:100, width:150, file name:aFile as text}
    		end tell
    	end repeat
    	set the slide of the view of document window 1 to thisSlide
    end tell
     
Die Seite wird geladen...
Ähnliche Themen - Einfuegen jpgs Powerpoint
  1. Stephan R
    Antworten:
    2
    Aufrufe:
    724

Diese Seite empfehlen