The following code works good and inserts the picture at the location for the path specified when executed locally ..

While doing so on servers(TOMCAT) it gives an error on this line saying insert cannot cannot happen ..though the path is correct
ActiveSheet.Pictures.Insert(path).Select

[VBA]
Private Sub Worksheet_Activate()
Dim path As String
path = ActiveSheet.Range("A66").Value
Range("F1:I1").Select ActiveSheet.Pictures.Insert(path).Select
Selection.ShapeRange.IncrementLeft 90.4
Selection.ShapeRange.IncrementTop 4.8
Range("A1").Select
End Sub
[/VBA]