HI, HOW TO NOT SHOW 00/01/1900 WHEN USE FILTER SEARCH?

I WISH TO SHOW BLANK OR NOTHING.

HOW TO FIX THE SEARCH OF THE IMAGE ERROR?

I HAVE A FOLDER WITH ALL PICTURES, BUT LET’S SAY THAT I DONT HAVE ONE OR THE NAME IS WRONG. SO I WANT TO SHOW 0 = BECAUSE ON THE FOLDER HAVE ONE IMAGE WITH THE NAME “NO IMAGE”.

EXCEL 365

WINDOWS 64

NOTEBOOK

HERE IS THE CODE:

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
FOTO = “C:AFOTO JBA” & Range(“O1”).Value & “.JPG”
ActiveSheet.Shapes(“Imagem 1”).Fill.UserPicture (FOTO)
Exit Sub
ERRORDATO:
ActiveSheet.Shapes(“Imagem 1”).Fill.UserPicture (“C:AFOTO JBA.JPG”)
Exit Sub
End Sub

​HI, HOW TO NOT SHOW 00/01/1900 WHEN USE FILTER SEARCH?I WISH TO SHOW BLANK OR NOTHING.HOW TO FIX THE SEARCH OF THE IMAGE ERROR?I HAVE A FOLDER WITH ALL PICTURES, BUT LET’S SAY THAT I DONT HAVE ONE OR THE NAME IS WRONG. SO I WANT TO SHOW 0 = BECAUSE ON THE FOLDER HAVE ONE IMAGE WITH THE NAME “NO IMAGE”. EXCEL 365WINDOWS 64NOTEBOOK HERE IS THE CODE:Private Sub Worksheet_Change(ByVal Target As Range)On Error Resume NextFOTO = “C:AFOTO JBA” & Range(“O1”).Value & “.JPG”ActiveSheet.Shapes(“Imagem 1”).Fill.UserPicture (FOTO)Exit SubERRORDATO:ActiveSheet.Shapes(“Imagem 1”).Fill.UserPicture (“C:AFOTO JBA.JPG”)Exit SubEnd Sub     Read More

​