Results 1 to 2 of 2
  1. #1
    4 Star Lounger
    Join Date
    May 2004
    Location
    Toronto, Ontario, Canada
    Posts
    425
    Thanks
    5
    Thanked 0 Times in 0 Posts

    Picture control (Excel 2000)

    Hi all,

    I have been messing with a picture control on a form

    I have a Bitmap picture that I would like too not show under a certain condition.

    I have tried setting the picture control to none, and false, but didn't work, still have the picture loading with the form on the label......anyway around it?
    I would like to use one form, but because of the picture, I would have to use 2 forms....is there a way to load a set the bitmap picture for the label in code?


    Public Sub CASESS()
    Dim r As Range
    Set r = Cells(1, Selection.Column)
    If IsEmptyŽ Then
    Set r = r.End(xlDown)
    Select Case r.Value
    Case "Kills"
    Load FrmTSEV
    FrmTSEV.Show
    Case "SPRs"
    Load FrmTSEV
    FrmTSEV.Label1.Picture = false ' this didn't work
    FrmTSEV.Label1.Caption = "STOP PRESS"
    FrmTSEV.Caption = "STOP PRESS!!!"
    FrmTSEV.Show
    Case "Chases"
    Load frmNPEV
    frmNPEV.Show
    Case "2:10s"
    Load FrmTSEV
    FrmTSEV.Show
    Case Else
    MsgBox r.Value
    End Select
    End If
    End Sub


    Thanks,
    Darryl.

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 28 Times in 28 Posts

    Re: Picture control (Excel 2000)

    You can set the Picture property to Nothing:

    FrmTSEV.Label1.Picture = Nothing

    To load another picture:

    FrmTSEV.Label1.Picture = LoadPicture("C:TestMyPicture.bmp")

    You can also hide the control (.Visible = False) if you don;t want to show the picture.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •