Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 08:26:15
Rückgabewert mehrere Suchkriterien Datumsbereich
23.04.2024 08:20:37
VBA: Blatt als pdf per Mail. Blatt mit anderen pdfs vereinen
23.04.2024 08:04:28
4-fach verschachtelte WENN-Funktion
22.04.2024 22:36:13
Marko automatisch ausführen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
964to968
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
964to968
964to968
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bild vergrössern

Bild vergrössern
03.04.2008 22:35:39
ogni
Hallo
Ich möchte in Excel ein Bild per Mausklick vergrößern
und mit einem zweiten Klick wieder in den Ausgangszustand
zurück versetzen.
Ist das möglich und wenn ja wie?
Vorab vielen Dank
Ingo

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bild vergrössern
03.04.2008 23:09:02
Josef
Hallo Ingo,
weise den Grafiken folgendes makro zu.
Sub GrossKlein()
Dim objShp As Shape
Dim f As Single, a As Variant

f = 2 'Vergößerungsfaktor

Set objShp = ActiveSheet.Shapes(Application.Caller)

If objShp.AlternativeText = "" Then
    With objShp
        .AlternativeText = .Width & ";" & .Height
        .ScaleWidth f, msoFalse
        .ScaleHeight f, msoFalse
    End With
Else
    With objShp
        a = Split(.AlternativeText, ";")
        .Width = a(0)
        .Height = a(1)
        .AlternativeText = ""
    End With
End If

Set objShp = Nothing
End Sub


Gruß Sepp



Anzeige
AW: Bild vergrössern
04.04.2008 00:53:00
ogni
Hallo Sepp
Danke für deine Mühe,
aber wo und wie trage ich das ein?
Gruß
Ingo

AW: Bild vergrössern
04.04.2008 08:23:17
Hajo_Zi
Hallo Ingo,
wie fügst Du das Bild ein? Auf dieser Seite http://hajo-excel.de/vba_bild.htm werden Code vorgestellt und bei vielen ist Dein Klick Ereignis schon dabei.

AW: Bild vergrössern
04.04.2008 09:54:46
ogni
Hallo Hajo
Ich habe ein Bild über – Einfügen – Grafik – Aus Datei – eingefügt
und möchte dieses vergrößern.
Mit deinem Link kann ich leider nichts anfangen, dazu bin ich zu d..
Vielleicht hast Du noch eine andere Möglichkeit
Gruß Ingo

Anzeige
AW: Bild vergrössern
04.04.2008 09:56:50
Hajo_Zi
Hallo Ingo,
bei dem Verfahren kannst Du dem Bild kein Makro hinzufügen soweit mir bekannt.
Gruß Hajo

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige