Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Grafik in Zelle einfügen und automatisch anpassen

Frage Microsoft Microsoft Office

Mitglied: sims

sims (Level 1) - Jetzt verbinden

02.08.2011 um 12:52 Uhr, 9035 Aufrufe, 2 Kommentare

Hallo liebe Admin Gemeinde,
ich habe eine Problem was ich bis jetzt nicht so wirklich lösen konnte!
Hab auch mit Google nichts gefunden was mir weiter geholfen hat!

Und zwar würde ich gerne in eine Zelle eine Grafik einfügen und die Grafik soll sich dann automatisch an die Zellen größe anpassen (oder vielleicht an einem vorgegebenen Wert, sprich Länge und Breite, orientieren).
Kann man das vielleicht mit VBA oder so umsetzen ? Wenn ja, wie?

Wäre eine feine Sache wenn mir wer weiterhelfen könnte - besten DANK!


Mit freundlichen Grüßen
sims
Mitglied: hmarkus
02.08.2011 um 13:12 Uhr
Hallo sims,

via Skript Grafiken verändern geht sehr gut mit Imagemagick. http://de.wikipedia.org/wiki/ImageMagick und http://www.imagemagick.org/script/index.php .
Zumindest unter Linux lässt sich imagemagick sehr gut aus Skripten heraus verwenden, also sollte es auch mit VB kein Problem sein.

Markus
Bitte warten ..
Mitglied: 76109
03.08.2011 um 01:12 Uhr
Hallo sims!

In etwa so:
01.
Sub test() 
02.
    Dim Grafik As Shape 
03.
     
04.
    For Each Grafik In ActiveSheet.Shapes 
05.
        With Grafik 
06.
            .LockAspectRatio = msoFalse 
07.
            .Width = .TopLeftCell.Width 
08.
            .Height = .TopLeftCell.Height 
09.
        End With 
10.
    Next 
11.
End Sub
Gruß Dieter
Bitte warten ..
Neuester Wissensbeitrag
Internet

Unbemerkt - Telekom Netzumschaltung! - BNG - Broadband Network Gateway

(3)

Erfahrungsbericht von ashnod zum Thema Internet ...

Ähnliche Inhalte
VB for Applications
gelöst Beim Bestätigen einer Zelle automatisch zwei neue Zeilen einfügen (5)

Frage von striding zum Thema VB for Applications ...

Microsoft Office
gelöst Wie kann man die Standard-Schriftart bei einfügen von Text in Word 2013 festlegen? (3)

Frage von Rene1976 zum Thema Microsoft Office ...

Netzwerkmanagement
gelöst Icingaweb2 Werte für das NRPE CheckDisk anpassen (8)

Frage von M.Marz zum Thema Netzwerkmanagement ...

Heiß diskutierte Inhalte
Switche und Hubs
Trunk für 2xCisco Switch. Wo liegt der Fehler? (17)

Frage von JayyyH zum Thema Switche und Hubs ...

Windows Server
Outlook Verbindungsversuch mit Exchange (15)

Frage von xbast1x zum Thema Windows Server ...

Microsoft Office
Keine Updates für Office 2016 (11)

Frage von Motte990 zum Thema Microsoft Office ...