Новости:

Новая редакция правил форума: 2.4. Если вопрос или ответ содержится во вложенном файле, все-равно кратко описывайте в сообщении вопрос или суть решения. Это необходимо, чтобы тему можно было найти через поиск.

Главное меню

Сразу не закрывает Excel

Автор symbio, 10.03.2011, 12:54

« назад - далее »

symbio

Привет!
Есть вопрос.
При закрытили Excel листа (даже пустого), закрываются клетки но остается там просто вместо клеток голубой фон. Потом только можно совсем закрыть. Ранше закрывался сразу. Как исправить?


Uploaded with ImageShack.us

Uploaded with ImageShack.us

а вот когда закрываю то остается это и просто надо закрыть еще раз:


Uploaded with ImageShack.us



Пожалусто подскажите что делать?

P.S. У меня Windows 7 Ultimate SP1 и Microsoft Offiss 2007 и сервис пак установлен. На другом компе закрывается сразу.

Prist

Есть подозрение, что на одном компе(на том, где сразу не закрывается) есть книга PERSONAL.XLS, а на другом нет. Макросами пользовались? Если при закрытых всех книгах зайти в Вид-подраздел "Окно"-Отобразить. Появиться ли какая-нибудь книга?
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
www.excel-vba.ru
Просто СПАСИБО [+оказать+]
Считаешь СПАСИБО мало? Яндекс.Деньги: 41001332272872; WM: R298726502453

symbio

Цитата: Prist от 10.03.2011, 19:17
Есть подозрение, что на одном компе(на том, где сразу не закрывается) есть книга PERSONAL.XLS, а на другом нет. Макросами пользовались? Если при закрытых всех книгах зайти в Вид-подраздел "Окно"-Отобразить. Появиться ли какая-нибудь книга?
Вы правы! при Вид-подраздел "Окно"-Отобразить появляется окошко, и там есть PERSONAL.XLS.
Да как то пропробовал макрос по инструкции. Но ничего не понял. А как это удалить, не получается! И там где был совет, обьяснение
как удалить так и не дали! Не поможете?

Prist

Почему же не поможем - поможем.
Private Sub Проверка_на_наличие_книги_PERSONAL_XLS()
    With Application
        If Dir(.StartupPath & .PathSeparator & "Personal.xls", vbArchive + vbHidden + vbReadOnly) = "" Then
            MsgBox "Личная книга макросов " & iFile$ & vbNewLine & _
                   "- не была создана" & vbNewLine & _
                   "- была переименована, удалена" & vbNewLine & _
                   "- или же была перемещена ...", , ""
        Else
            MsgBox "Личная книга макросов находится :" & vbNewLine & .StartupPath
        End If
    End With
End Sub

Выполнив данный код Вы узнаете, где расположена книга Personal.xls. Обычно она расположена по пути: C:\Users\The_Prist\AppData\Roaming\Microsoft\Excel\XLSTART

Вместо The_Prist - Ваша учетная запись. Находите там Вашу Personal.xls и удаляете. Ну или переименовываете.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
www.excel-vba.ru
Просто СПАСИБО [+оказать+]
Считаешь СПАСИБО мало? Яндекс.Деньги: 41001332272872; WM: R298726502453

symbio

ЦитироватьPrist
Спасибо! Я код даже не использовал! А пошел по пути, нашел и удалил! Сейчас все хорошо!
Может еще кому пригодится.