Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1408to1412
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
Inhaltsverzeichnis

Bild aus Range in bestimmter Größe speichern

Bild aus Range in bestimmter Größe speichern
19.02.2015 13:43:54
Christian
Hallo Ihr Profis,
ich versuche mit dem folgenden Makro ein Teil meiner Tabelle zu einem Bild "umzuwandeln" und dieses dann zu exportieren und speichern. Das klappt auch ganz gut, nur wird das Bild im falschen Verhältnis gespeichert. Es müsste 1630 * 580px haben, wird jedoch immer in 1232 * 797px gespeicht. Ich versuchte schon alles mögliche und es scheint, als würde der Hintergrund (Diagrammbereich) das Problem sein. Habt ihr vielleicht eine Idee?
Danke
Hier der Code:
Sub saveimg()
Dim oRange As Range
Dim oCht As Chart
Dim oImg As Picture
Pfad = ThisWorkbook.Path
Set oRange = Range("A6:Y41")
Set oCht = Charts.Add
oRange.CopyPicture xlScreen, xlPicture
With ActiveSheet.ChartObjects.Add(Left:=oRange.Left, Top:=oRange.Top, _
Width:=oRange.Width, Height:=oRange.Height)
.Activate
End With
oCht.Paste
oCht.Export Filename:=pfad & "\SavedRange.png", FilterName:="PNG"
Application.DisplayAlerts = False
oCht.Delete
Application.DisplayAlerts = True
End If
End Sub

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bild aus Range in bestimmter Größe speichern
19.02.2015 19:00:12
Christian
hat keiner eine idee?
Anzeige

296 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige