Grafik in Prozent der Originalgröße

Forumthread: Grafik in Prozent der Originalgröße
5 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Grafik in Prozent der Originalgröße

13.11.2006 12:03:08

Mike

Hallo
Ich möchte die Höhe einer Grafik immer auf 75% der Original-Größe einstellen.
Aus Faulheit soll dies automatisch geschehen. Ich habe die Daten zwar in der Maske entsprechend angegeben und das Makro aufgezeichnet, dennoch wird die angabe nicht als Prozent sondern z.b. als 210,0 gespeichert. Wisst ihr rat.
Danke
Mike René

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Grafik in Prozent der Originalgröße

13.11.2006 12:30:54

Rudi
AW: Grafik in Prozent der Originalgröße

13.11.2006 13:09:21

Mike
AW: Grafik in Prozent der Originalgröße

13.11.2006 14:03:49

Rudi
Habe es gefunden

14.11.2006 15:49:38

Mike
zu

14.11.2006 16:46:37

zu

AW: Grafik in Prozent der Originalgröße

13.11.2006 12:30:54

Rudi

Hallo,
dann rechne die neue Höhe doch einfach aus.
.height=.height*0.75
Gruß
Rudi

AW: Grafik in Prozent der Originalgröße

13.11.2006 13:09:21

Mike

eigentlich eine gute Idee Rudi, aber es muss immer von der Originalhöhe sein und diese ist bei deiner Lösung nicht umbedingt = .height
gruß
m.r.

AW: Grafik in Prozent der Originalgröße

13.11.2006 14:03:49

Rudi

Hallo,
wie willst du die Originalhöhe ermitteln?
Gruß
Rudi

Habe es gefunden

14.11.2006 15:49:38

Mike

Hallo Rudi
Ich habe es gefunden.
Es gibt die Funktion . ScaleHeight und ScaleWidth
Mit folgenden Befehlen warden 75% der Originalgröße verwendet.
.ShapeRange.ScaleHeight 0.75, msoTrue
.ShapeRange.ScaleWidth 0.75, msoTrue
Supi
Gruß
Mike

14.11.2006 16:46:37