elsone31
09-22-2016, 08:34 AM
Hello,
I keep getting that The specified file is not found with my code. The file path is correct any suggestions? Using excel 2013.
Thanks in advance.
Sub AddPicture()
Application.ScreenUpdating = False
Dim Student As Variant
Dim T As String
myDir = "Q:\ASSESSMENT\MIDDLE SCHOOLS\HERNANDEZ\ACADEMIC DATA ANALYSIS\ACADEMIC FACILITATORS"
'T = ".jpg"
Student = Range("G1")
ActiveSheet.Shapes.AddPicture Filename:=myDir & Student & ".jpg", linktofile:=msoFalse, _
savewithdocument:=msoTrue, Left:=300, Top:=10, Width:=120, Height:=120
Application.ScreenUpdating = True
End Sub
I keep getting that The specified file is not found with my code. The file path is correct any suggestions? Using excel 2013.
Thanks in advance.
Sub AddPicture()
Application.ScreenUpdating = False
Dim Student As Variant
Dim T As String
myDir = "Q:\ASSESSMENT\MIDDLE SCHOOLS\HERNANDEZ\ACADEMIC DATA ANALYSIS\ACADEMIC FACILITATORS"
'T = ".jpg"
Student = Range("G1")
ActiveSheet.Shapes.AddPicture Filename:=myDir & Student & ".jpg", linktofile:=msoFalse, _
savewithdocument:=msoTrue, Left:=300, Top:=10, Width:=120, Height:=120
Application.ScreenUpdating = True
End Sub