Seite 1 von 1

Bilder in Zelle durch anklicken vergrößern

Verfasst: Mo, 20.10.2014 16:37
von allphons
Es geht um eine Inventartabelle mit Bildern der Objekte.
Für Excel hab ich einen Code für ein Makro gefunden, womit ein Bild in der Tabelle durch anklicken vergrößert wird:

Code: Alles auswählen

Sub Bild_aendern()
ActiveSheet.Shapes(Application.Caller).Select
If Selection.ShapeRange.Width < 100 Then
Selection.ShapeRange.Width = 600
Selection.ShapeRange.Height = 160
Selection.ShapeRange.ZOrder msoBringToFront
Else
Selection.ShapeRange.Width = 50
Selection.ShapeRange.Height = 13
End If
ActiveSheet.Cells(Selection.TopLeftCell.Row, 1).Select
End Sub
Kann ich sowas in OpenOffice Calc auch realisieren?
Ich freu mich auf jeden Lösungsansatz :)
Beste Grüße aus Wien



_________________
Moderation: Thema von OOo Calc nach OOo Basic und Java verschoben, wo alle Themen zur Programmierung hingehören.—lorbass, Moderator

Re: Bilder in Zelle durch anklicken vergrößern

Verfasst: Mo, 20.10.2014 16:51
von pmoegenb