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, 9380 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!


mfg
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 ..
Ähnliche Inhalte
Batch & Shell
gelöst String automatisch anpassen (erweitern oder kürzen) (9)

Frage von CreatorX zum Thema Batch & Shell ...

Microsoft Office
gelöst Automatisch entscheiden ob prozentual oder fest anzahl von Datensätze (7)

Frage von hugothemagpie zum Thema Microsoft Office ...

VB for Applications
VBA - Welchen Inhalt hat eine Zelle die mit der Taste Enft geleert wird? (3)

Frage von Juckie zum Thema VB for Applications ...

Neue Wissensbeiträge
Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(8)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(6)

Anleitung von BassFishFox zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Windows Userverwaltung
gelöst Nicht Admins erlauben Verknüpfungen zu löschen (17)

Frage von WinLiCLI zum Thema Windows Userverwaltung ...

Windows Update
gelöst WSUS Produkte weiter einschränken (11)

Frage von thaefliger zum Thema Windows Update ...