11.2.19

Конфликт имен в Excel

alt+f11


Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    On Error Resume Next
    Me.Names("_FilterDatabase").Delete
End Sub

Private Sub Workbook_Open()
    On Error Resume Next
    Me.Names("_FilterDatabase").Delete
End Sub




http://www.sql.ru/forum/543092/excel-2007-konflikt-imen

Комментариев нет:

Отправить комментарий