Форум программистов
 
О проблемах, например, с регистрацией пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail


Ответ
 
Опции темы
Старый 26.09.2011, 13:25   #11
ghool
Новичок
Джуниор
 
Регистрация: 26.09.2011
Сообщений: 1
По умолчанию

https://rapidshare.com/files/4224894..._ru_monday.rar
вот русский вариант с понедельником.
Спасибо за комментарии, как его сделать.
А как можно сделать этот же календарик, но в обычном файле эксель с тычкой "вставить дату в эту ячейку"?
ghool вне форума Ответить с цитированием
Старый 30.01.2012, 12:25   #12
KOSTIK1
Форумчанин
 
Аватар для KOSTIK1
 
Регистрация: 06.10.2009
Сообщений: 193
По умолчанию

В продолжении темы;
русский вариант с понедельником.
с кнопкой "Today" - сегодня. (по вопросу из этой страницы)
Вложения
Тип файла: zip samradDatePicker3.zip (172.5 Кб, 190 просмотров)
С Уважением, Костик
KOSTIK1 вне форума Ответить с цитированием
Старый 15.03.2012, 19:51   #13
skkkk
 
Регистрация: 22.04.2011
Сообщений: 4
По умолчанию

А нельзя ли еще продолжить тему? Поправить для Win 7 x64 Office 10? Заранее спасибо.
skkkk вне форума Ответить с цитированием
Старый 19.04.2012, 17:43   #14
skkkk
 
Регистрация: 22.04.2011
Сообщений: 4
По умолчанию

Разобрался. В коде всех модулей нужно везде после слова "Declare" вставить "PtrSafe" через пробел, например, вместо
Код:
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
должно быть
Код:
Public Declare PtrSafe 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
Исправленный файл на всякий прикреплю. (не забываем, пароль "1"). Разобраться помогли тут.
Но.
Раньше (в Office 2003 и WinXPx32) при выделении ячейки с форматом "Дата" справа показывалась иконка календаря. Теперь, если ячейка пустая (формат "Дата"), иконка не появляется. Она появляется только в ячейке с уже вставленной датой и в следующей ячейке ниже. Как сделать, чтоб иконка появлялась во всех ячейках с форматом "Дата"?
Конструкция вроде
Код:
If IsDate(ActiveCell) Then ....
не помогает, хотя, может, вставляю не туда... Кто знает, как подлечить календарик?


Цитата:
Сообщение от KOSTIK1 Посмотреть сообщение
В продолжении темы;
русский вариант с понедельником.
с кнопкой "Today" - сегодня. (по вопросу из этой страницы)
Спасибо, KOSTIK1, очень полезная кнопка, когда дату прошлого года, например надо поменять на текущую
Вложения
Тип файла: rar samradDatePicker3 x64.rar (118.4 Кб, 103 просмотров)

Последний раз редактировалось skkkk; 19.04.2012 в 18:07.
skkkk вне форума Ответить с цитированием
Старый 05.06.2012, 17:36   #15
KOSTIK1
Форумчанин
 
Аватар для KOSTIK1
 
Регистрация: 06.10.2009
Сообщений: 193
По умолчанию

Исправил некоторые ошибки.
Вложения
Тип файла: zip samradDatePicker3.zip (167.4 Кб, 79 просмотров)
Тип файла: zip samradDatePicker3 x64.zip (167.2 Кб, 137 просмотров)
С Уважением, Костик
KOSTIK1 вне форума Ответить с цитированием
Старый 06.06.2012, 10:07   #16
staniiislav
Форумчанин
 
Аватар для staniiislav
 
Регистрация: 16.04.2010
Сообщений: 695
По умолчанию

а можно использовать данный календарь не как надстройку, а зашить в фаил, чтобы его можно было использовать на разных компьютерах (допустим если его отправить по почте)?
Спасибо
staniiislav вне форума Ответить с цитированием
Старый 06.06.2012, 14:59   #17
KOSTIK1
Форумчанин
 
Аватар для KOSTIK1
 
Регистрация: 06.10.2009
Сообщений: 193
По умолчанию

Цитата:
Сообщение от staniiislav Посмотреть сообщение
а можно использовать данный календарь не как надстройку, а зашить в фаил, чтобы его можно было использовать на разных компьютерах (допустим если его отправить по почте)?
Спасибо
Попробуйте это.
Вложения
Тип файла: zip DatePicker.xlsm.zip (219.2 Кб, 121 просмотров)
С Уважением, Костик
KOSTIK1 вне форума Ответить с цитированием
Старый 06.06.2012, 15:27   #18
staniiislav
Форумчанин
 
Аватар для staniiislav
 
Регистрация: 16.04.2010
Сообщений: 695
По умолчанию

Цитата:
Сообщение от KOSTIK1 Посмотреть сообщение
Попробуйте это.
Спасибо
А как это чудо работает? через правую кнопку мыши? календарик не вылетает ((( Чет я не догоняю
staniiislav вне форума Ответить с цитированием
Старый 06.06.2012, 15:42   #19
KOSTIK1
Форумчанин
 
Аватар для KOSTIK1
 
Регистрация: 06.10.2009
Сообщений: 193
По умолчанию

Цитата:
Сообщение от staniiislav Посмотреть сообщение
Спасибо
А как это чудо работает? через правую кнопку мыши? календарик не вылетает ((( Чет я не догоняю
И через правую и на вкладке "Надстройки", а макросы у Вас включены?
С Уважением, Костик
KOSTIK1 вне форума Ответить с цитированием
Старый 06.06.2012, 16:16   #20
staniiislav
Форумчанин
 
Аватар для staniiislav
 
Регистрация: 16.04.2010
Сообщений: 695
По умолчанию

Цитата:
Сообщение от KOSTIK1 Посмотреть сообщение
И через правую и на вкладке "Надстройки", а макросы у Вас включены?
Да все включено... Возможно какого-то компонента не хватает ((( наверное...
staniiislav вне форума Ответить с цитированием
Ответ

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сравнение дат for_regist1 БД в Delphi 21 26.01.2009 01:29
фортран, ввести квадратную матрицу 4-го порядка ,элементы которой заданы для ввода построчно slepen346 Помощь студентам 0 09.12.2008 18:58
свое окно ввода Login и Password для ADOConnection1 antoni БД в Delphi 5 03.11.2008 15:05
Помогите пожалуйста написать проверку ввода для этой программы Saaashka Помощь студентам 1 01.07.2008 08:11
сравнение дат Geddar Общие вопросы Delphi 2 04.06.2008 18:09


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS
Здесь нужно купить рекламу за 7 тыс руб в месяц! )
пишите сюда - alarforum@yandex.ru
ИКС 840