Excel en VB ??

Status
Niet open voor verdere reacties.
Geplaatst door the_dannyboy
En, doet het probleem zich ook bij jou voor?

En dan nog ff een vraagje: Ik heb een image, deze kan worden veranderd door d'r op te klikken. Hoe krijg ik .....

moet je eve de kode naar dezen veranderen

Private Sub Image1_Click()
With CommonDialog1
.Filter = "Logo's (*.jpg; *.gif; *.bmp; *.jpeg; *.pcx)| *.jpg; *.gif; *.bmp; *.jpeg; *.pcx"
.DialogTitle = "Selecteer een nieuw logo"
.ShowOpen
If Err Then
MsgBox "Foutje" 'Dit werkt dus niet !!
else
Image1.Picture = LoadPicture(.FileName)
end if
End With
End Sub
[B/]
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan