Das Notes Forum

Domino 9 und frühere Versionen => ND7: Entwicklung => Thema gestartet von: bezi27 am 26.12.07 - 00:14:22

Titel: Mit Script ein Bild in die Kopfzeile eines EXCEL-Dokuments setzen - wie???
Beitrag von: bezi27 am 26.12.07 - 00:14:22

Hallo zusammen,

beim Suchen in den Foren habe ich zu meiner Freude festgestellt, dass hier auch viele Experten zum Thema "Script und EXCEL" vertreten sind.

Darum traue ich mich auch folgende Frage zu stellen:
Wie um alles in der Welt bekomme ich ein Bild in die Kopfzeile einer EXCEL-Tabelle - und das mit Script?

Ich habe folgende Zeilen (mit vielen un-erfolgreichen Abwandlungen) probiert:

[...]

Dim PageSetup As Variant
      Set pageSetup = .ActiveSheet.PageSetup   
      PageSetup.CenterHeaderPicture.Filename = "C:\Sample.jpg"
      PageSetup.CenterHeader = "&G"

[...]

Das Bild existiert natürlich, das Ergebnis ist aber, dass in der Kopfzeile gar nichts steht.
Alle anderen Einstellungen - wie z.B. Text in der Fusszeile u.ä. - funktionieren problemlos.

Weiß jemand Rat?

Herzlichsten Dank im Voraus!

(leicht verzweifelt)  ???

Bezi27

Titel: Re: Mit Script ein Bild in die Kopfzeile eines EXCEL-Dokuments setzen - wie???
Beitrag von: Axel am 29.12.07 - 10:31:29

Ich habe das selbst mal probiert und keine Lösung gefunden. Das scheint so ein Punkt zu sein, der über die COM-Schnittstelle nicht funktioniert, warum auch immer.

Als Lösungsalternativen bieten sich zwei Möglichkeiten an.

1. Du legst Vorlage(n) an in der(denen) du die Grafik bereits in die Kopfzeile eingebunden hast. Diese kannst du dann aus Notes heraus öffnen und weiter bearbeiten.

2. Du legst eine Vorlage an und fügst dort ein Makro ein, dass die Grafik in die Kopfzeile einfügt. Dieses Makro kannst du dann mit der Run-Methode aus dem Application-Objekt von Excel aufrufen. Der Methode lassen sich auch Parameter übergeben. So wäre es bspw. möglich den Dateinamen der Grafik zu übergeben und das Ganze so flexibel zu gestalten.

Axel

Titel: Re: Mit Script ein Bild in die Kopfzeile eines EXCEL-Dokuments setzen - wie???
Beitrag von: m3 am 29.12.07 - 12:26:39

Die Arbeitsblätter ev. gruppiert?
http://support.microsoft.com/kb/279305/

Welche Excel-Version? AFAIK geht das erst ab Excel 2002 (Office XP).
http://support.microsoft.com/kb/q288964/

Ev. hilft Dir der Thread weiter:
http://www.tutorials-win.com/WordVBA/replace-image-107113/

Titel: Re: Mit Script ein Bild in die Kopfzeile eines EXCEL-Dokuments setzen - wie???
Beitrag von: Axel am 30.12.07 - 11:45:36

Martin, dass hat aber alles relativ wenig mit der COM-Schnittstelle zu tun. Wenn man die Grafik händisch in Excel einfügt, bzw. mit einem Excel-Makro, dann fiunktioniert das Ganze ja.

Nur wenn der Code über die COM-Schnittstelle ausgeführt wird, dann bleibt die Kopfzeile leer.


Axel

Titel: Re: Mit Script ein Bild in die Kopfzeile eines EXCEL-Dokuments setzen - wie???
Beitrag von: bezi27 am 30.12.07 - 19:41:26

Herzlichen Dank für die Antworten - ich werd's also mit einer EXCEL-Vorlage lösen!
(und ich habe "gehofft", ich bin nur zu dämlich dazu - dabei ist's die Schnittstelle  ;) )

Der Vollständigkeit halber: es handelt sich um EXCEL 2003 und es ist wie Axel angemerkt hat - im EXCEL funktioniert das Bild in der Kopfzeile problemlos, mit Scipt geht's nicht ...


Danke nochmals!

Bezi27

Titel: Re: Mit Script ein Bild in die Kopfzeile eines EXCEL-Dokuments setzen - wie???
Beitrag von: Demian am 04.01.08 - 15:22:03

Moin,moin,

ich habe mir das eben mal angeschau und dabei festgestellt, dass aus dem &G ein &O in Excel wird (mittels msgbox pagesetup.leftheader in der erzeugten Tabelle ausgelesen). Warum auch immer. Habe jetzt einige Buchstaben ausprobiert und bei &I wird ein &G in Excel draus.

Also mit folgendem Code lässt sich das Ganze aus Notes heraus auch lösen:

Code

	Dim ex
	
	Set ex = createobject("Excel.Application")
	
	ex.workbooks.add
	ex.visible = True
	
	ex.activesheet.pagesetup.leftheaderpicture.filename = "H:\plugins\fahne.bmp"
	ex.activesheet.pagesetup.leftheader = "&I"

Was mich nur irritiert, ist das die Umwandlung scheinbar willkürlich vorgenommen wird. Kann da jedenfalls nicht wirklich ein System erkennen. Aus Word heraus findet diese Umwandlung nicht statt.


Gruß
Demian

Titel: Re: Mit Script ein Bild in die Kopfzeile eines EXCEL-Dokuments setzen - wie???
Beitrag von: bezi27 am 08.01.08 - 11:46:19

Hallo Demian,

fazinierend - das funktioniert!!!

Aus die Idee, dass hier eine Umwandlung der Parameter erfolgen könnte bin ich wirklich nicht gekommen - aber man sieht man wieder: MS macht's möglich  :-:

Allerherzlichsten Dank für die Mühe!

Grüsse

Bezi27