Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
536to540
536to540
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

bilder auf UF aus ordner anzeigen

Forumthread: bilder auf UF aus ordner anzeigen

bilder auf UF aus ordner anzeigen
21.12.2004 11:16:46
ray
hallo,
auf meiner UF lasse ich mir bilder anzeigen, dessen name ich kenne.
jetzt möchte ich mir die Bilder in einem bestimmten Ordner anzeigen lassen, wobei ich die Namen der Bilder nicht kenne. Es soll 1 angezeigt werden und bei buttonclick das nächste.
Geht so etwas mit VBE? Nehme auch gern code für VB 6.0
Viele Grüße aus Hamburg, jetzt mir mehr Wolken...
ray
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: bilder auf UF aus ordner anzeigen
EtoPHG
Hallo Ray,
Hier ist ein kleines Beispiel:
Verzeichnis (z.B. C:\Bilder) in Zelle B1 eintragen
Dateitype (z.B. bmp) in Zelle B2 eintragen
Dann Userform aufrufen
https://www.herber.de/bbs/user/15136.xls
Gruss Hansueli
Korrektur Activate_Ereignis
EtoPHG
Hallo Ray,
Verbesserte Version mit folgendem Code

Private Sub UserForm_Activate()
cbBck.Enabled = False
cbFwd.Enabled = True
If IsError(ActiveSheet.Cells(3 + ixPicNr, 1).Value) Then
MsgBox "Es sind keine Bilder vorhanden"
Me.Hide
Else
ixPicNr = 1
Call showPic
If Not (IsError(ActiveSheet.Cells(3, 1).Value)) Then cbFwd.Enabled = True
End If
End Sub

Gruss Hansueli
Anzeige
AW: bilder auf UF aus ordner anzeigen
u_
Hallo Ray
natürlich geht das.
Option Explicit
Public cntBild As Integer

Private Sub CommandButton1_Click()
cntBild = cntBild + 1
With Application.FileSearch
.LookIn = "c:\bilder"
.Filename = "*.jpg"
.Execute
If .FoundFiles.Count > cntBild Then
Me.Image1.Picture = LoadPicture(.FoundFiles(cntBild))
End If
End With
End Sub

Gruß nach HH
Anzeige
Danke Euch zwei mT
21.12.2004 18:06:31
ray
Hallo und Danke Euch, ich bin immer wieder überrascht, mit welcher kleinen Lösung meine riesigen Probleme beiseitigt werden.
Ich wünsche Euch ein frohes Fest und guten Rutsch
Ray
PS: heute ich der kürzeste Tag, in Hamburg bei -2 Grad
;

Forumthreads zu verwandten Themen

Bild von Zelle in Zelle verlinken
Zelle

Hi Leute
Ich habe in Tabelle1 Zelle A1 einen Text, und danach habe ich in die Zelle ein Bild eingefügt
Nun möchte ich die gesamte Zelle A1 (Bild und Text) in Zelle Z17 haben.
Bei normalen Texten geht es ja mit =A1 (wenn ich in Zelle Z17 stehe)
Gibt es diesen Befehl auch für mein...
04.11.2008 16:19:07
Thread-ID: 1021687
4 Beiträge
summe bilden in abhängigkeit von zelleneintrag
zelleneintrag

hallo zusammen
ich hätte gerne gemäss dem beispiel gewusst, wie ich eine summe bilde in abhängigkeit
eines zelleintrages.
gruess
https://www.herber.de/bbs/user/56754.xls
13.11.2008 17:23:00
Thread-ID: 1024309
4 Beiträge
Bild in Zelle einfügen
ray

Hallo,
hallo, ich möchte in einer Zelle ein Bildanzeigen/einfügen. Es liegt aber vor allen Zellen.
Viele Grüße aus dem schneeweißen Hamburg
Ray
21.11.2008 08:25:00
Thread-ID: 1026601
9 Beiträge
Bilder aus dem Web in Excel2007 anzeigen
Thomas

Hallo Experten,
seit Stunden habe ich jetzt recherchiert und probiert, aber noch keine Lösung gefunden.
In Excel 2000 und 2003 konnte ich per VBA Bilder aus dem Internet direkt als Bild in einer Excel-Tabelle anzeigen lassen und so einen Katalog erzeugen:
Set image = ActiveSheet.Pic...
13.03.2009 18:43:51
Thread-ID: 1059977
11 Beiträge
mit Hyperlink zum linken Bildrand
Deister

Hallo,
Folgendes zur aktuellen Situation:
Auf Blatt A sind +/- 1000 Namen in Kolonne A erfasst. Von den Namen (Zellen in Kolonne A) kann ich über Hyperlink die bezüglichen Zellen in Reihe 1 in den Blättern B bis E ansteuern.
In den Blättern B bis E sind die Kolonnen A bis D "freeze...
13.05.2009 12:09:02
Thread-ID: 1074779
8 Beiträge
Internetbild in Zelle anzeigen
stef@n

Hallo zusammen
bin auf der Suche nach einer Möglichkeit, ein Bild aus dem Internet in einer Zelle anzeigen zu lassen.
Ich habe es mit einem Hyperlink probiert z.b.
src="http: //www.google.de/intl/de_de/images/logo.gif" />
(Leerzeichen nach http: damit das Logo hier im Thre...
21.05.2009 15:50:09
Thread-ID: 1076569
9 Beiträge
Bilder aus Verzeichnis in Userform anzeigen
Rainer

Hallo,
jetzt hab ich nochmal eine Frage:
Gibt es eine Möglichkeit, Bilder nacheinander direkt aus einem Ordner (zB D:\Bilder) per Schaltflächen in einem Userform anzeigen zu lassen? Also im Prinzip wie bei einem Bildbetrachter:
Bei jeder Betätigung eines Vorwärts-Schalters werde...
16.06.2009 22:15:03
Thread-ID: 1082074
3 Beiträge
Bild hinter Zellen
joerg

Hallo Zusammen,
habe ein kleines Problem.
Gibt es in XLS eine Möglichkeit ein Bild "hinter" die Zellen zu legen, sodass eine Art Raster entsteht? Als Hintergrundbild ist etwas zu unflexibel, da es 3-4 Bilder auf einer A4 - Seite sein sollen.
Abhängig von der angewählten Zelle auf...
02.11.2009 16:11:56
Thread-ID: 1113879
2 Beiträge
Anzeige
Einfügen von Bildern in Kommentar geht nicht mehr
Bildern

Hallo zusammen,
ich habe ein Problem mit folgenden Codezeilen:
For spalte = 4 To 13
'*********
If Cells(zeile, spalte).Hyperlinks.Count 1 Then 'Abfrage, ob Hyperlink vorhanden
GoTo weiter2
Else
Dim mycom As Object
On Error Resume Next
Pfad = ActiveWorkbook.P...
30.11.2009 15:34:28
Thread-ID: 1121036
2 Beiträge
Anzeige
Bilder in Zelle einfügen wenn
Andre´

Hallo alle zusammen,
ich möchte für den Bereich C5:F10 Bilder einfügen (jeweils mittig in Zelle), in Abhängigkeit des Zellwertes.
Ist der Zellwert = 1 dann Bild1 von Tabelle "Bilder" einfügen
Ist der Zellwert = 2 dann Bild2 von Tabelle "Bilder" einfügen
Ist der Zellwert = 3 dann...
15.12.2009 09:51:03
Thread-ID: 1123961
5 Beiträge
Anzeige
VBA Zwischensumme einfügen kombiniert mit Links | Herbers Excel-Forum
Julia
Hallo zusammen.
ich habe folgendes Problem, für das ich ein Makro haben möchte:
In Spalte A habe ich von Zeile 3 bis 9 verschiedene Kriterien, die über einen Zeitablauf
(Zeile 2, Spalte B bis M) verschiedene Werte tragen können.
Dynamisch halte ich den Zeitablauf und die Kriterien...
31.01.2010 20:28:46
Thread-ID: 1134675
2 Beiträge
Anzeige
VBA Zwischensumme einfügen kombiniert mit Links | Herbers Excel-Forum
Julia
Hallo zusammen.
ich habe folgendes Problem, für das ich ein Makro haben möchte:
In Spalte A habe ich von Zeile 3 bis 9 verschiedene Kriterien, die über einen Zeitablauf
(Zeile 2, Spalte B bis M) verschiedene Werte tragen können.
Dynamisch halte ich den Zeitablauf und die Kriterien...
31.01.2010 20:32:30
Thread-ID: 1134677
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige