I have developed a logsbook with 6 sheets for different workgroups to
status work. It is stored on a network drive and accessed by many
users. The logsheet was developed in excel 97. but recently the
company upgraded to Excel 2002 from excel 97 Now there are problems.
On most computers the workbook works fine but on one particular
machine attempting to access the listbox generates the runtime error.
I have been reading the groups and have seen some hints that it may be
a syntax problem. Please check the code below and offer any insights.
The code is driven by rectangle click events on all the pages and is
in the module so that it can be accessed by all sheets. BTW after the
one person gets the runtime error if he exits the book and reopens it
Excel repairs the workbook which consists of stripping all the macros
rendering them unusable for the rest of the workgroup. Thanks in
advance and sorry for being so long winded, its my first post!

Sub Caller()

Dim L As Double
Dim T As Double
s = ActiveSheet.Shapes(Application.Caller).TopLeftCell .Address
Range(s).Activate


L = ActiveCell.Offset(0, -1).Left
T = ActiveCell.Top
ActiveSheet.ListBox1.Top = T
ActiveSheet.ListBox1.Left = L
ActiveSheet.ListBox1.Width = 100
ActiveSheet.ListBox1.Height = 180
ActiveSheet.ListBox1.Text = ""
ActiveSheet.ListBox1.Visible = True
End Sub