|
Компьютерный форум OSzone.net » Сфера Microsoft » Microsoft Office (Word, Excel, Outlook и т.д.) » 2007 - Excel | Название свернутого окна на панели задач |
|
2007 - Excel | Название свернутого окна на панели задач
|
Новый участник Сообщения: 1 |
Настроила отображение каждого документа в новом окне. Если открыто немного окон, то название открытого файла видно (Microsoft Excel-123.xlsm) Если же окон набирается достаточное кол-во, то уже сложно различать какой где документ открыт, т.к. названия обрезаются и видно лишь часть слова Microsoft. Можно ли как-то настроить Excel, чтобы название окна сразу начиналось с названия открытого документа?
|
|
Отправлено: 14:13, 21-01-2010 |
Новый участник Сообщения: 3
|
Профиль | Отправить PM | Цитировать Та же проблема.
|
Отправлено: 05:06, 25-01-2011 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Технолог Сообщения: 819
|
Профиль | Отправить PM | Цитировать alinusik, Camill, средствами Excel - невозможно. С использованием программирования и API - наверняка решаемо. Не проще ли расширить панель задач или не открывать много окон?
Если критично, что называется "до зарезу" - купите монитор на 45 дюймов ![]() |
Отправлено: 00:41, 29-01-2011 | #3 |
Новый участник Сообщения: 3
|
Профиль | Отправить 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
|
Профиль | Отправить PM | Цитировать Накидал тут на Delphi софтину. Скачиваете, добавляете в автозагрузку. Софтина удаляет в названии программ "Microsoft Excel - "
https://drive.google.com/file/d/1kTp...ew?usp=sharing |
|
Отправлено: 14:21, 24-11-2019 | #5 |
Ветеран Сообщения: 27449
|
Профиль | Отправить PM | Цитировать v1va, без исходного кода? Такое себе…
|
Отправлено: 15:19, 25-11-2019 | #6 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Интерфейс - [решено] как создать в панели задач кнопку "Свернуть все окна"? | 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 |
|