Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
19.04.2024 11:45:34
Feld im SAP auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
560to564
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
560to564
560to564
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Grafik erscheint bei zugehöriger Zelle

Grafik erscheint bei zugehöriger Zelle
06.02.2005 20:24:11
Thomas
Hallo Excel-Gemeinde,
ich möchte, dass bei Aktivierung einer Zelle ein dieser Zelle zugeordneter Rahmen erscheint. Beim Aktivieren der nächsten Zelle soll dieser Rahmen verschwinden und ein anderer Rahmen erscheinen, der dieser neuen Zelle zugeordnet ist.
Hintergrund: Ich habe mir eine Datenbank mit über 300 Pflanzen erstellt, die ich auch fotografiert habe. Wenn ich nun einen Pflanzennamen anklicke, möchte ich gerne, dass das entsprechende Foto eingeblendet wird. Ich stelle mir vor, dass jeweils ein Rahmen eingeblendet wird, dem ich das entsprechende Bild als Hintergrund zugeordnet habe.
Der Verweis auf die Bilddatei mittels Hyperlink gefällt mir optisch nicht so gut.
Vielen Dank im Voraus.
Thomas

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Grafik erscheint bei zugehöriger Zelle
Ramses
Hallo
Rahmen kann ich dir keinen bieten, aber einen Kommentar mit deinem Bild als Hintergrund.
Hat den gleichen Effekt-
Mauszeiger auf Tabelle mit deinen Bildernamen
Rechte Maustaste
Code anzeigen
Dort den Code reinkopieren
Den Bezug musst du halt anpassen wo deine Pflanzenbezeichnungen stehen

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim addRange As Range
Dim myCom As Object
Dim insPic As String
'Fügt im bezeichneten Bereich  in die ausgewählte Zelle einen Kommtar ein
'und fügt ein zu definierendes Bild als Hintergrund ein
'Bezug bitte anpassen
Set addRange = Range("A1:A300")
If Intersect(Target, addRange) Is Nothing Then
'Ausstieg wenn mehrere Zellen
'markiert sind
Exit Sub
End If
If Target.Comment Is Nothing Then
Target.AddComment
With Target.Comment
.Text Text:=""
End With
insPic = Application.GetOpenFilename("Bilder (*.jpg; *.gif; *.bmp), *.txt, *.gif, *.bmp")
If insPic = "" Then
MsgBox "Keine Datei ausgewählt. Der Kommentar wird wieder gelöscht"
ActiveCell.Comment.Delete
End If
Set myCom = ActiveCell.Comment.Shape
With myCom
.Fill.UserPicture insPic
.Width = 100
.Height = 100
End With
End If
End Sub

Danach einfach eine Zelle auswählen und dem Assistenten folgen.
Gruss Rainer
Anzeige
AW: Grafik erscheint bei zugehöriger Zelle
06.02.2005 21:36:30
Thomas
Hi Rainer,
auf dich ist ächt Verlass...
Das mit den Kommentaren gefällt mir sehr gut. Wenn ich nun mit der Maus über über das entsprechende Feld fahre, kommt jetzt ein schönes Bildchen. Was will man mehr?
Jetzt muss ich nur noch versuchen, den Code auch zu verstehen, damit ich besser damit umgehen kann.
Aber vielen, vielen Dank für deine Hilfe.
Grüße
Thomas

300 Forumthreads zu ähnlichen Themen

Grafik laden - Dateipfad in Zelle
Marcus

Hallo,
habe zu folgendem Code eine Frage: Private Sub CommandButton1_Click() With Application .Calculation = xlAutomatic .MaxChange = 0.001 ActiveWorkbook.PrecisionAsDisplayed = False End With If MsgBox("Alles berechnet!" & Chr(13) & "Richtiges Papier eingelegt?" & Chr(13) &...
14.10.2009 08:06:01
Thread-ID: 1109489
12 Beiträge
Anzeige
UserForm über Grafik - Inhalt aus aktiver Zelle
Rainer

Hallo,
habe hier mal diesen Code bekommen: ActiveSheet.Shapes(Application.Caller).TopLeftCell.EntireRow.Insert
Es dürfte doch dann sicher auch einen Code geben, der mir die Adresse des "ActiveSheet" wiedergibt.
Möchte eine Zelle mit etlichem Textinhalt über UserForm lesen und b...
10.06.2010 10:40:37
Thread-ID: 1161193
6 Beiträge
Tablle an Diagramm anbinden??????
Heiko

Hallo Leute,
ich brauche mal eure Hilfe.
Folgendes Problem:
Ich möchte gerne unter einem Säulendiagramm (siehe Anhang) eine Tabelle unter dem Diagramm darstellen welche an das Diagramm angebunden bzw. eingebunden ist. Also auch "mitgeht" wenn man das Diagramm verschiebt oder seine...
09.09.2010 11:51:44
Thread-ID: 1176581
15 Beiträge
Anzeige
Grafik in Zelle - Durchschnitt darstellen
Stef@n

Hallo Excel-Freunde
ich möchte gern,
1. dass in einer Zelle die Min / Max - Bandbreiten grafisch dargestellt werden (Formel ?)
2. dass in einer Zelle (farblich markiert) der Durchschnittswert mit einem Strich o.ä markiert wird.
Zur Verdeutlichung habe ich das Sheet beigefügt
18.02.2011 22:27:11
Thread-ID: 1201721
6 Beiträge
Funktion die ermittelt ob Grafik in Zeile/Zelle
Lutz

Hallo Excel-Profis,
ich bekomme eine Liste mit diversen Zeilen und in Spalte A gibt es Zeilen die eine Grafik enthalten (Grafik heißt immer BeX am Anfang)
Ich bräuchte eine Funktion die ermittelt, ob in der Zelle A der betreffenden Zeile eine Grafik steht (oder eben eine Grafi die Bex a...
30.03.2011 13:03:33
Thread-ID: 1208257
20 Beiträge
Checkbox in zelle fixieren
Felix

Hallo,
ich habe mir aus Archiveinträgen diesen Code zusammengeflickt und theoretisch funktioniert er auch, um eine Zeile neben der Checkbox grün einzufärben, wenn diese aktiviert wird.
Private Sub CheckBox1_Click() If CheckBox1 Then Range("A2:l2").Interior.ColorIndex = 4 Else Range("A...
06.04.2011 14:03:12
Thread-ID: 1209300
5 Beiträge
Bilder in Zellen einlesen und fixieren
Christina

Hallo,
in Spalte A ab A2 stehen Artikelnr, in Spalte E Bildnamen, die sich aus der Artikelnr & „.jpg“
gebildet werden. Die Bilder selbst sind im Ordner C:\Bilder gespeichert.
Nun sollen die Bilder in Spalte D ab D2 eingelesen werden und die Bilder der Zellgröße angepasst und von...
20.11.2011 23:23:02
Thread-ID: 1238624
5 Beiträge
Bilder an Zellen binden
Alex

Hallo zusammen,
ich will in einer tabelle die spalten zeit, datum, etc, und Einstellungsgröße eingeben. In der Spalte Einstellungsgröße würde ich gerne Jpegs 8irgendwelche Bilder einfügen). Wie kann ich die Bilder an die Zellen binden.
Vieleb Dank schonmal und ein schönes Wochenende
02.03.2012 17:55:00
Thread-ID: 1253245
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
11
3
5
14
4
5
19
4
4
1
4
4
3
4
2
1
2
11
5
2
2
1
1
1
2