Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Сфера Microsoft » Microsoft Office (Word, Excel, Outlook и т.д.) » 2007 - Excel | Название свернутого окна на панели задач

Ответить
Настройки темы
2007 - Excel | Название свернутого окна на панели задач

Новый участник


Сообщения: 1
Благодарности: 0

Профиль | Отправить PM | Цитировать


Настроила отображение каждого документа в новом окне. Если открыто немного окон, то название открытого файла видно (Microsoft Excel-123.xlsm) Если же окон набирается достаточное кол-во, то уже сложно различать какой где документ открыт, т.к. названия обрезаются и видно лишь часть слова Microsoft. Можно ли как-то настроить Excel, чтобы название окна сразу начиналось с названия открытого документа?

Отправлено: 14:13, 21-01-2010

 

Новый участник


Сообщения: 3
Благодарности: 1

Профиль | Отправить PM | Цитировать


Та же проблема.

Отправлено: 05:06, 25-01-2011 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Аватара для Pliomera

Технолог


Сообщения: 819
Благодарности: 117

Профиль | Отправить PM | Цитировать


alinusik, Camill, средствами Excel - невозможно. С использованием программирования и API - наверняка решаемо. Не проще ли расширить панель задач или не открывать много окон?
Если критично, что называется "до зарезу" - купите монитор на 45 дюймов

Отправлено: 00:41, 29-01-2011 | #3


Новый участник


Сообщения: 3
Благодарности: 1

Профиль | Отправить PM | Цитировать


На самом деле в 2007 экселе эта проблема решалась - при открытии второй книги эксель ставил в заголовке название файла вперед, а при ее закрытии забывал сменить обратно. Соответственно, спасал макрос:
Set wb = Workbooks.Add
wb.Activate
ActiveWindow.Close

В 2010 склероз вылечили, а я уже несколько файлов переделал под новые контролы, и переставлять обратно 2007 не хочется.

WinAPI - это мысль, попробую. Получится - отпишусь.

Час моего времени, потраченного на ковыряние WinAPI, к сожалению, значительно дешевле монитора на 45 дюймов.


UPD
Код: Выделить весь код
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByRef lParam As Any) As Long
 
Private Const WM_SETTEXT = &HC

Private Sub Workbook_Open()
    УбратьПрефикс
End Sub

Sub УбратьПрефикс()
    Dim hwnd As Long
    Dim Заголовок as String
    Заголовок = ActiveWorkbook.Name
    hwnd = FindWindow(vbNullString, "Microsoft Excel - " & Заголовок)
    if hwnd > 0 then SendMessage hwnd, WM_SETTEXT, 0, ByVal Заголовок
    ' OnTime нужен, так как через некоторое время эксель сам меняет заголовок обратно
    Application.OnTime Now + TimeValue("00:00:10"), "УбратьПрефикс"
End Sub

Последний раз редактировалось Camill, 29-01-2011 в 15:52.

Это сообщение посчитали полезным следующие участники:

Отправлено: 15:24, 29-01-2011 | #4


Новый участник


Сообщения: 1
Благодарности: 0

Профиль | Отправить PM | Цитировать


Накидал тут на Delphi софтину. Скачиваете, добавляете в автозагрузку. Софтина удаляет в названии программ "Microsoft Excel - "
https://drive.google.com/file/d/1kTp...ew?usp=sharing

Отправлено: 14:21, 24-11-2019 | #5


Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


v1va, без исходного кода? Такое себе…

Отправлено: 15:19, 25-11-2019 | #6



Компьютерный форум OSzone.net » Сфера Microsoft » Microsoft Office (Word, Excel, Outlook и т.д.) » 2007 - Excel | Название свернутого окна на панели задач

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Интерфейс - [решено] как создать в панели задач кнопку "Свернуть все окна"? woldemarok Microsoft Windows 7 20 23-03-2010 23:25
Интерфейс - [решено] Как изменить размер запущенного окна на панели задач xakepokwow Microsoft Windows 7 4 23-01-2010 11:16
Интерфейс - Затемнение панели задач и заголовка окна, при развертывании на весь экран. amzir Microsoft Windows 7 5 01-10-2009 18:16
Ресайз панели задач с растановкой панели быстрого запуска и области открытых окон DImaN! Автоматическая установка Windows 2000/XP/2003 0 29-08-2008 11:30
Интерфейс - [решено] Размер панели задач и панели быстрого запуска Don Giovanni Microsoft Windows 2000/XP 9 26-05-2008 12:44




 
Переход