Export einer Excel-Datei als Grafik (jpg)

Hallo zusammen,
ich habe eine Excel-Datei (Office 2007) in welcher der Status der aktuellen Prüfungen über Symbole (Schriftart: Windings) eingetragen wird.
Aktuell wird diese Tabelle dann durch eine Verknüpfung (Bereich A1-W9) in Power-Point angezeigt und von dort mittels dem Tool "Update Links during Show" (http://skp.mvps.org/updtlinks.htm) während der Präsentation aktualisiert.
Unsere Datenschutzrichtlinien schreiben allerdings vor, dass der Bildschirmschoner nach spät. 15 Minute aktiviert werden muss.

Für eine andere Anwendung exportiere ich ich ein PPT-Datei manuell als Jpg und lasse den Bildschirmschoner dann die Bilder anzeigen.
Allerdings ist dieser Aufwand für die halbstündige Aktualisierung der Daten zu aufwendig.

Ich dachte entweder an einen direkten Jpg-Export aus Excel z.B. über einen Button oder einen automatischen Export aus PowerPoint direkt nach der Aktualisierung der Daten.

Alle Tools und Codes welche ich bei Google gefunden habe zerteilen entweder die verbundenen Zellen oder geben eine schlechte Qualität des Bildes aus (Ziel ist ein 32" Monitor mit einer Auflösung von 1366 x 768 Pixeln)

Hat jemand noch eine passende Idee, evtl. schon inkl. Code?

Merci und Gruß

#include <Constants.au3>
Opt("TrayOnEventMode",1)  
Opt("TrayMenuMode",1)  
GLOBAL $AKTIV = True
;Intervall in Sekunden
GLOBAL $INTERVALL = 600
$menu_itm_disable_ss = TrayCreateItem("Bildschirmschoner deaktiveren")  
$menu_exitItem = TrayCreateItem("Exit")  
TrayItemSetState($menu_itm_disable_ss,$TRAY_CHECKED + $TRAY_ENABLE)
TrayItemSetOnEvent($menu_itm_disable_ss,"switchSS")  
TrayItemSetOnEvent($menu_exitItem,"exitProg")  
TraySetState()
While 1
        Sleep($INTERVALL * 1000)
	if $AKTIV = True then
		Send("{LSHIFT}")  
	EndIf
	
WEnd


func switchSS()
	if TrayItemGetState($menu_itm_disable_ss) = ($TRAY_UNCHECKED + $TRAY_ENABLE) then
		$AKTIV = false
	Else
		$AKTIV = true
		TrayItemSetState($menu_itm_disable_ss,$TRAY_CHECKED + $TRAY_ENABLE)
	EndIf
	return
EndFunc

func exitProg()
	exit 0
EndFunc