ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
31 сообщений из 31, показаны все 2 страниц
  все  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34479964
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
У меня тут был такой случай на работе...
Подходит ко мне новенькая сотрудница, молоденькая, красивая...
И говорит: - А сделай мне 2(!) ведёрка!
Я: - Чего?
Она: - Ну, 2 ведёрка хочу!!!
Я: - ....
Она: - ну, вот там в ЕКСЕЛЕ ведёрко есть, с краской! хочу чтоб их было два!

Я осознав чего отменя хотят стал пытаться понять зачем?

Она: - ну, понимаешь всё время выбирать
цвет (она постоянно использует несколько цветов заливки), не удобно...вот если бы было хотя бы два с разными цветами...

Я сказал, что это требует очень много сили и времени....
И вот думаю...а как же всё таки так сделать?!

Есть идеи?
...
Рейтинг: 0 / 0
23.04.2007, 12:42:16
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480149
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
делай свой toolbar с кнопками выбора цвета и заливки и цвета из палитры.
...
Рейтинг: 0 / 0
23.04.2007, 13:29:46
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480201
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
Или по проще цвет по образцу! Например кнопка цвет как в ячейке A1

К vbapro
А как сделать выбор цвета, чтобы он потом кнопкой заливался?
...
Рейтинг: 0 / 0
23.04.2007, 13:44:51
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480221
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
можно попробовать с событием Worksheet_SelectionChange, должно что-то похожее получиться :)
...
Рейтинг: 0 / 0
23.04.2007, 13:49:26
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480274
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
Знаете, я не очень силён во всём этом, может напишите последовательность действий? Или код?
...
Рейтинг: 0 / 0
23.04.2007, 13:59:50
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480308
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
BACRЗнаете, я не очень силён во всём этом, может напишите последовательность действий? Или код?

Может я простые истины пишу, но по другому я не знаю!
Сделай лист "Цвет". На нём ячейка 'A1' будет служить образцом, а на панели инструментов создай кнопку и назначь ей макрос

Код: plaintext
1.
2.
3.
4.
Sub Цвет_A1()
Dim n As Long
 n = Sheets("Цвет").Range("A1").Interior.ColorIndex
 Selection.Interior.ColorIndex = n
End Sub

Естественно таких кнопок может быть сколько угодно, только меняй вместо А1 другую ячейку.


Но лучше наверное сделать 2-3 кнопки с наиболее часто используемыми цветами на панели инструментов и цвет сразу можно на кнопке заранее указать
Код: plaintext
1.
2.
Sub Цвет_A1()
 Selection.Interior.ColorIndex =  42 
End Sub
...
Рейтинг: 0 / 0
23.04.2007, 14:07:49
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480316
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
А цвет задаёться в 16-ной системе?
И имеет ли значение на каком именно листе будет находиться залитая ячейка?
...
Рейтинг: 0 / 0
23.04.2007, 14:09:44
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480320
KL (XL)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
KL (XL)
Участник
вот наспех переделанный пример Джона Уокенбаха

KL
[MVP - Microsoft Excel]
...
Рейтинг: 0 / 0
23.04.2007, 14:10:19
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480419
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
Я выкачал этот пример, но не понимаю что теперь делать с этими файлами...
Заменить такие же файлы в установленном офиссе?
Вы уж простите за тупость...:)
...
Рейтинг: 0 / 0
23.04.2007, 14:28:35
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480588
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
Выложил файл как бы сделал я, вдруг пригодится. Если да то сделай две кнопки на панели инструментов. 1- для макроса взять_цвет_из_ячейки() , другая для макроса залить() .
Единственное плохо, не знаю как для кнопки НА ПАНЕЛИ ИНСТРУМЕНТОВ цвет автоматом присваивать тот который выбран. Никто не подскажет?
...
Рейтинг: 0 / 0
23.04.2007, 15:02:35
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480589
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
DeggasadВыложил файл как бы сделал я, вдруг пригодится. Если да то сделай две кнопки на панели инструментов. 1- для макроса взять_цвет_из_ячейки() , другая для макроса залить() .
Единственное плохо, не знаю как для кнопки НА ПАНЕЛИ ИНСТРУМЕНТОВ цвет автоматом присваивать тот который выбран. Никто не подскажет?
...
Рейтинг: 0 / 0
23.04.2007, 15:02:58
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480592
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
DeggasadВыложил файл как бы сделал я, вдруг пригодится. Если да то сделай две кнопки на панели инструментов. 1- для макроса взять_цвет_из_ячейки() , другая для макроса залить() .
Единственное плохо, не знаю как для кнопки НА ПАНЕЛИ ИНСТРУМЕНТОВ цвет автоматом присваивать тот который выбран. Никто не подскажет?
...
Рейтинг: 0 / 0
23.04.2007, 15:03:15
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480741
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
Прошу Вас ещё раз - давайте по порядку...я не ламер, просто с этой областью так близко не сталкивался...

1. Как создать кнопку с возможностью добавления макроса?
2. Нельзя ли написать такой макрос который и цвет бы выбирал и заливал бы ячейку?

Ведь Майкрософт это уже сделали. Не уж то ещё нигде не опубликовали как именно они это сделали?
Может ссылки есть?
...
Рейтинг: 0 / 0
23.04.2007, 15:32:01
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480790
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
BACRПрошу Вас ещё раз - давайте по порядку...я не ламер, просто с этой областью так близко не сталкивался...

1. Как создать кнопку с возможностью добавления макроса?
2. Нельзя ли написать такой макрос который и цвет бы выбирал и заливал бы ячейку?

Ведь Майкрософт это уже сделали. Не уж то ещё нигде не опубликовали как именно они это сделали?
Может ссылки есть?


1. Правой кнопкой по панели инструментов - настоить - вкладка команды - Категории: Макросы - настраиваемая кнопка (перетягивается куда нужно)- при открытом окне настройки правой кнопкой мыши по новой кнопке на панели - самый нижний пункт конктекстного меню - назначить макрос!
2. Я думал что тебе раздельно нужно сначала присвоить какой-то цвет кнопке а потом её использовать, вот и сделал 2 макроса! Первый который по образцу запоминает, а второй заливает последним цветом, который запомнил.

А как там в Майкрософте я не знаю, по тому что я как раз ламер...
...
Рейтинг: 0 / 0
23.04.2007, 15:42:11
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480804
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
)
Ну, и на том спасибо!!!
...
Рейтинг: 0 / 0
23.04.2007, 15:44:17
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480818
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
Кстати, так получаеться что при включении
один макрос автоматом назначит кнопке цвет!
А другой уже будет заливать выбранную мной ячейку?
Если так, то в принципе - попрёт!

Но если я правильно понял нужно, на одну кнопку - 2 макроса?
или я что-то не так понял?
...
Рейтинг: 0 / 0
23.04.2007, 15:47:02
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480857
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
BACRКстати, так получаеться что при включении
один макрос автоматом назначит кнопке цвет!
А другой уже будет заливать выбранную мной ячейку?
Если так, то в принципе - попрёт!

Но если я правильно понял нужно, на одну кнопку - 2 макроса?
или я что-то не так понял?

2 кнопки:
1-запоминает цвет по образцу выбранной ячейки (макрос - Взять_цвет_из_ячейки())
Цвет запоминается в форме (UserForm1).Поэтому она тоже нужна в файле!
2-заливает выбранную впоследствии ячейку последним запомненным цветом (макрос - Залить())
...
Рейтинг: 0 / 0
23.04.2007, 15:53:15
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480884
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
А можно назначит кнопке цвет!?
Зачем брать его из ячейки?
...
Рейтинг: 0 / 0
23.04.2007, 15:57:12
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480909
Granata005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Granata005
Участник
Да назначай....
но почему-то меня гложат сомнения насчёт целесообразности всех этих попыток...
тётя ж хотела два разных ведёрка, чтобы у каждого можно было удобно цвет выбрать... а так выйдет не совсем то что она просила...
...
Рейтинг: 0 / 0
23.04.2007, 16:00:13
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480933
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
ДА...но это не совсем тётя...скорее девочка, и потом, всё же есть надежда, что её это утроит!
...
Рейтинг: 0 / 0
23.04.2007, 16:05:05
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480969
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
BACRА можно назначит кнопке цвет!?
Зачем брать его из ячейки?

Хотел по простому! Нате по сложному!
Твои 2 макроса:
назначить цвет() и залить() к кнопкам приделай!
Одно плохо я не знаю как кнопке цвет сделать! Который выбран. Вот если бы изначально на несколько кнопок заранее известные цвета прицепить, то тогда да!
...
Рейтинг: 0 / 0
23.04.2007, 16:12:07
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34480983
Granata005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Granata005
Участник
Ах... ну да... точно - "молоденькая, красивая" - ну тогда с такой можно и договориться...
я просто привык что у меня почти все бухи "ТЁТИ"
...
Рейтинг: 0 / 0
23.04.2007, 16:14:00
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34481102
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
Это конечно весело!!!
НО что-то я кнопочек выполняющих эти макросы не нашёл!!!
...
Рейтинг: 0 / 0
23.04.2007, 16:35:06
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34481155
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
BACRЭто конечно весело!!!
НО что-то я кнопочек выполняющих эти макросы не нашёл!!!

Так сделай на панели инструментов как мы ранее договаривались
...
Рейтинг: 0 / 0
23.04.2007, 16:44:45
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34481167
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
А...ну да.... томожу.....
:)
Спасибо... завтра попробую сёдня уже башка трещит!
...
Рейтинг: 0 / 0
23.04.2007, 16:48:39
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34481176
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
BACRА...ну да.... томожу.....
:)
Спасибо... завтра попробую сёдня уже башка трещит!
Посмотри тут должны быть
...
Рейтинг: 0 / 0
23.04.2007, 16:49:45
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34489669
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
Если кому то интеерсно...ВОТ ОНО - ПРОСТОЕ решение!

1) Сервис - Макрос - Начать запись... Теперь нажимаем кнопочку с "ведром", затем нажимаем кнопочку "Стоп" для макроса. Собственно сам макрос записан.
2) Идем Сервис - Макрос - Макросы. В появившемся меню выбираем вновь записанный макрос, нажимаем Изменить. Открывается Visual Basic с текстом нашего макроса (в приложении). Тут обращаем внимание на ".ColorIndex = 48" - это и есть цвет закраски. Попробуйте менять цифру, будут разные цвета. Или изначально выбрать нужный цвет - т.е. во время записи макроса, выбрать в заливке нужный цвет!
3) Соответтственно записываем второй такой же Макрос (а потом третий, 4ый и сколько вообще понадобится).
4) Итак, Макросы записаны. Правой кнопокй по панели инструментов, Настройка, там выбираем Команды - Макросы и "вытаскиваем" на Панель инструментов "Настраиваемая кнопка" (она с таким смайликом рядом). Когда первый раз на нее нажмете - надо будет выбрать нужный Макрос для этой кнопки. Повторяем "вынос кнопки" для других макросов.
5) Кнопки одинаковые, неудобно. Поэтому: правой кнопкой по панели инструментов, Настройка. Теперь правой кнопкой мышки по кнопке макроса (которая со смайликом), появится меню, где можно ее переименовать, задать другой рисунок и т.д.

В результате: получили кнопочки на панели инструментов. Выделяем ячейки для раскраски и щелкаем по нужной.
...
Рейтинг: 0 / 0
26.04.2007, 13:52:52
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34490064
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
orunbek
Участник
можно еще горячими клавишами, можно на номера назначить цвета или на буквы и т.д.
...
Рейтинг: 0 / 0
26.04.2007, 15:00:05
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34490092
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Deggasad
Участник
BACRЕсли кому то интеерсно...ВОТ ОНО - ПРОСТОЕ решение!

1) Сервис - Макрос - Начать запись... Теперь нажимаем кнопочку с "ведром", затем нажимаем кнопочку "Стоп" для макроса. Собственно сам макрос записан.
2) Идем Сервис - Макрос - Макросы. В появившемся меню выбираем вновь записанный макрос, нажимаем Изменить. Открывается Visual Basic с текстом нашего макроса (в приложении). Тут обращаем внимание на ".ColorIndex = 48" - это и есть цвет закраски. Попробуйте менять цифру, будут разные цвета. Или изначально выбрать нужный цвет - т.е. во время записи макроса, выбрать в заливке нужный цвет!
3) Соответтственно записываем второй такой же Макрос (а потом третий, 4ый и сколько вообще понадобится).
4) Итак, Макросы записаны. Правой кнопокй по панели инструментов, Настройка, там выбираем Команды - Макросы и "вытаскиваем" на Панель инструментов "Настраиваемая кнопка" (она с таким смайликом рядом). Когда первый раз на нее нажмете - надо будет выбрать нужный Макрос для этой кнопки. Повторяем "вынос кнопки" для других макросов.
5) Кнопки одинаковые, неудобно. Поэтому: правой кнопкой по панели инструментов, Настройка. Теперь правой кнопкой мышки по кнопке макроса (которая со смайликом), появится меню, где можно ее переименовать, задать другой рисунок и т.д.

В результате: получили кнопочки на панели инструментов. Выделяем ячейки для раскраски и щелкаем по нужной.

:-)
Смотри мой первый ответ:

Deggasad
Но лучше наверное сделать 2-3 кнопки с наиболее часто используемыми цветами на панели инструментов и цвет сразу можно на кнопке заранее указать
Код: plaintext
1.
2.
Sub Цвет_A1()
 Selection.Interior.ColorIndex =  42 
End Sub
...
Рейтинг: 0 / 0
26.04.2007, 15:05:35
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34490130
Granata005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Granata005
Участник
ХОЧУ ДВА ВЕДЁРКА!!!!!!!
...
Рейтинг: 0 / 0
26.04.2007, 15:12:26
| Ответить | Цитировать | Написать  
Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
    #34490146
BACR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BACR
Гость
Granata005

вот точно так же и мне когда то заявили!!!

Ну, у тебя теперь все козыри!!!

Deggasad

Да, ты прав!!! Всё правильно, я просто собрал всё по пунктикам...да, и то сцитировал...
...
Рейтинг: 0 / 0
26.04.2007, 15:15:22
| Ответить | Цитировать | Написать  
31 сообщений из 31, показаны все 2 страниц
  все  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вот пристанут к тебе УЗЕРЫ - и не знаешь что им ответить!!!
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?all=1&fid=61&tid=2183072]:
 0ms
get settings:
 5ms
get forum list:
 14ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 30ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 56ms
get tp. blocked users:
 1ms
others: 187ms
total:  305ms
созд. / загр.: 305ms
x
x
Закрыть


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