Just wondering why you included this routine:

Private Sub App_WorkbookBeforeClose(ByVal Wb As Workbook, Cancel As Boolean)
App_WindowActivate Wb, Windows(Wb.Name)
End Sub

The captions seem to get updated fine without it.



Bob Phillips wrote:

Stefan,

I would have put it in Personal.xls, not have another file opened.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Stefan" <123@abc wrote in message
...
Bob,

With an 'on error goto' statement i can prevent that 'subscript out of
range' error. Complete path-name still occurs.

The second problem was solved by saving the file in the 'XLStart'
directory
of Microsoft Office and put an extra program line so that Excel
automatically
starts with that file and immediately minimizes the windowstate of it.

Again thanks for putting me on the way.
Stefan

--

Dave Peterson