Wie kann ich in eine UserForm ein Bild einfügen, wenn dort schon ein anderes ist?
Das heist ich möchte das alte entfernen und das neue an der gleichen Stelle einfügen! Einfügen geht ja mit LoadPicture aber wie dann weiter?
Danke!
Brit
Userform1.CommandButton1.Picture = LoadPicture("Pfad\bspdatei.jpg")
in allgemeines Modul:
Public t As Boolean
in UserForm-Modul:
Private Sub UserForm_Click()
If t = True Then
t = False
Image1.Picture = LoadPicture("cmdstopp.bmp") 'bsp-bild und wesentlich kleiner als das andere
Else
t = True
Image1.Picture = LoadPicture("privateBilder031.jpg") 'bsp-bild und wesentlich größer als das andere
End If
End Sub