Impress - Bildwerte ändern über Makro

[JCR]

Irgendwie hakt mein Makro:
Mit der Zeile
numgamma = oShape.gamma
kann ich den Gamma-Wert des Bildes in oShape auslesen.
aber wie kann ich einen Gamma-Wert setzen?
oShape.gamma = 1.5
geht nicht

[JCR]

Als separate Funktion geht es, aber nicht direkt zugewiesen.

sub bildwerte(gamma, contrast, luminance)
oCurrSel = ThisComponent.getCurrentSelection()
    For i = 0 To  oCurrSel.getCount()-1
        With oCurrSel.getByIndex(i)
			.Gamma = gamma
			.AdjustContrast = contrast
			.AdjustLuminance = luminance
        End With
    Next
End Sub