Thema Datum  Von Nutzer Rating
Antwort
Rot Problem mit der Farbtiefe --- Userform
20.08.2015 10:56:25 Mia
NotSolved
20.08.2015 13:04:20 Mia
NotSolved

Ansicht des Beitrags:
Von:
Mia
Datum:
20.08.2015 10:56:25
Views:
1168
Rating: Antwort:
  Ja
Thema:
Problem mit der Farbtiefe --- Userform
Guten Morgen zusammen,
 
ich habe in meiner Userform eine ListBox und ein Image. Wird ein Eintrag aus der ListBox angeklickt, füllt sich das Image automatisch anhand des jeweiligen Dateipfades.
 
Mit einem Bild habe ich keine Probleme, beim zweiten bekomme ich "Invalid Picture". Meine Suche hat ergeben, dass das Problem wohl die Farbtiefe ist (einmal 24 -> geht, einmal 32 -> geht nicht). An einer anderen Stelle kann man die Bilder hinzufügen, sodass ich nicht einfach meine Auswahl auf 24 Bit beschränken kann. Habt ihr eine Idee?
 

 

Private Sub ListBox1_Change()
    lastR = Worksheets("Partner").Cells(Rows.Count, 1).End(xlUp).Row
    For i = 1 To lastR
        If Worksheets("Partner").Range("A" + CStr(i)).Value = ListBox1.Value Then
            If Dir(ThisWorkbook.Path + "\Logos\" + Worksheets("Partner").Range("B" + CStr(i)).Value + ".jpg") <> "" Then
                Image1.Visible = True
                'MsgBox ThisWorkbook.Path + "\Logos\" + Worksheets("Partner").Range("B" + CStr(i)).Value + ".jpg"
                Image1.Picture = LoadPicture(ThisWorkbook.Path + "\Logos\" + Worksheets("Partner").Range("B" + CStr(i)).Value + ".jpg")
            Else:
                Image1.Visible = False
            End If
        End If
    Next i
End Sub


 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Problem mit der Farbtiefe --- Userform
20.08.2015 10:56:25 Mia
NotSolved
20.08.2015 13:04:20 Mia
NotSolved