ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Можно ли разным документам Office назначить разные значки?
13 сообщений из 13, страница 1 из 1
Можно ли разным документам Office назначить разные значки?
    #36595180
Fixin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Fixin
Участник
Есть две книги Excel, хочу чтобы в панели задач они подсвечивались по-разному, возможно?
...
Рейтинг: 0 / 0
23.04.2010, 15:58
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36595653
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
Fixin,

Это типа одна красная, а одна желтая ?
...
Рейтинг: 0 / 0
23.04.2010, 18:43
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36595907
Fixin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Fixin
Участник
big-dukeFixin,

Это типа одна красная, а одна желтая ?

главное, чтобы отличались друг от друга.
...
Рейтинг: 0 / 0
23.04.2010, 23:43
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36596439
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PlanB
Участник
FixinЕсть две книги Excel, хочу чтобы в панели задач они подсвечивались по-разному, возможно?ну, так сделайте ярлыки какие захотите...
...
Рейтинг: 0 / 0
24.04.2010, 20:36
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36596686
Сергей06
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сергей06
Участник
FixinЕсть две книги Excel, хочу чтобы в панели задач они подсвечивались по-разному, возможно?Тоже хотелось бы разноцветные кнопки на панеле задач, дак думается что такое невозможно
...
Рейтинг: 0 / 0
25.04.2010, 09:24
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36596874
Fixin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Fixin
Участник
PlanBFixinЕсть две книги Excel, хочу чтобы в панели задач они подсвечивались по-разному, возможно?ну, так сделайте ярлыки какие захотите...
Мне не ярлыки нужны разные, а значки в панели задач.
Может скопировать excel.exe ???
...
Рейтинг: 0 / 0
25.04.2010, 14:38
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36596891
Сергей06
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сергей06
Участник
FixinPlanBFixinЕсть две книги Excel, хочу чтобы в панели задач они подсвечивались по-разному, возможно?ну, так сделайте ярлыки какие захотите...
Мне не ярлыки нужны разные, а значки в панели задач.
Может скопировать excel.exe ???а смысл?
Даже если вы откроете 2 приложения экселя, то не сможете связывать книги между собою, копировать и вставлять диапазоны между двумя разными процессами экселя?
...
Рейтинг: 0 / 0
25.04.2010, 14:50
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36597021
Fixin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Fixin
Участник
Почему не смогу? Смогу.
В принципе, мне копировать друг из друга не надо. В каждом Экселе свои данные, хочется просто иконки друг от друга отличать.
...
Рейтинг: 0 / 0
25.04.2010, 16:57
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36597138
Фотография vlth
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vlth
Участник
FixinПочему не смогу? Смогу.
В принципе, мне копировать друг из друга не надо. В каждом Экселе свои данные, хочется просто иконки друг от друга отличать.
тогда такой пример (источник - здесь ):
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
Declare Function GetActiveWindow32 Lib "USER32" Alias _
"GetActiveWindow" () As Integer

Declare Function SendMessage32 Lib "USER32" Alias _
"SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, _
   ByVal wParam As Long, ByVal lParam As Long) As Long

Declare Function ExtractIcon32 Lib "SHELL32.DLL" Alias _
"ExtractIconA" (ByVal hInst As Long, _
   ByVal lpszExeFileName As String, _
    ByVal nIconIndex As Long) As Long

Sub ChangeXLIcon()
    Dim h32NewIcon As Long
    Dim h32WndXLMAIN As Long
    h32NewIcon = ExtractIcon32( 0 , "Notepad.exe",  0 )
    h32WndXLMAIN = GetActiveWindow32()
    SendMessage32 h32WndXLMAIN, &H80,  1 , h32NewIcon 'Icon big
    SendMessage32 h32WndXLMAIN, &H80,  0 , h32NewIcon 'Icon small
End Sub
...
Рейтинг: 0 / 0
25.04.2010, 18:59
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36597141
Фотография vlth
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vlth
Участник
Хотя, нет: так в панели задач иконка не меняется...
...
Рейтинг: 0 / 0
25.04.2010, 19:01
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36597202
Фотография vlth
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vlth
Участник
Тогда так:
Код: plaintext
1.
2.
3.
4.
5.
6.
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" _
    (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
    
Private Sub Workbook_Open()
hWB = FindWindow("MS-SDIa", Me.Name)
End Sub

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
Declare Function GetActiveWindow32 Lib "USER32" Alias _
"GetActiveWindow" () As Integer

Declare Function SendMessage32 Lib "USER32" Alias _
"SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, _
   ByVal wParam As Long, ByVal lParam As Long) As Long
   
Declare Function ExtractIcon32 Lib "SHELL32.DLL" Alias _
"ExtractIconA" (ByVal hInst As Long, _
   ByVal lpszExeFileName As String, _
    ByVal nIconIndex As Long) As Long
    
Public hWB As Long

Sub ChangeXLIcon()
    Dim h32NewIcon As Long
    Dim h32WndXLMAIN As Long
    h32NewIcon = ExtractIcon32( 0 , "Notepad.exe",  0 )
    h32WndXLMAIN = GetActiveWindow32()
    SendMessage32 hWB, &H80,  1 , h32NewIcon 'Icon big
    SendMessage32 hWB, &H80,  0 , h32NewIcon 'Icon small
End Sub
...
Рейтинг: 0 / 0
25.04.2010, 19:55
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36597210
Фотография vlth
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vlth
Участник
Да, забыл сказать, что так можно задавать разные иконки для разных книг и в одном экземпляре Excel. Но, думаю, и так понятно
...
Рейтинг: 0 / 0
25.04.2010, 20:02
| Ответить | Цитировать | Написать  
Можно ли разным документам Office назначить разные значки?
    #36597250
Фотография vlth
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vlth
Участник
Заметил недочёт: функция GetActiveWindow32() и, соответственно, её вызов
Код: plaintext
h32WndXLMAIN = GetActiveWindow32()
, а также объявление переменной h32WndXLMAIN теперь в коде лишние.
...
Рейтинг: 0 / 0
25.04.2010, 20:40
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Можно ли разным документам Office назначить разные значки?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=36596686&tid=2178200]:
 0ms
get settings:
 8ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 152ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 47ms
get tp. blocked users:
 1ms
others: 205ms
total:  447ms
созд. / загр.: 447ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]