ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Значение из калькулятора в поле формы
25 сообщений из 49, страница 1 из 2
  1  все
Значение из калькулятора в поле формы
    #35781314
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
Имеется форма с полями для ввода. Кнопкой на форме вызывается стандартный виндосовский калькулятор. Производятся какие то расчеты. Хотелось бы, чтобы другой кнопкой на форме значение из калькулятора попадало бы в конкретное поле на форме.

Мысли примерно следующие:

Public ABC ' объявлена как глобальная переменная

Private Sub Calc_Click()

ABC = Shell("Calc.exe", 1) ' запускается калькулятор

End Sub

Private Sub Itogi_Click()
Summa = ABC ' в поле вставляется НЕПОНЯТНОЕ ЧИСЛОВОЕ ЗНАЧЕНИЕ!
ХХХХХХХХХХХ 'Здесь хочу закрыть калькулятор, но как???
End Sub


В результате выполнения в поле "Summa" вставляются совершенно непонятные числа????
Посоветуйте кто может.
...
Рейтинг: 0 / 0
27.01.2009, 23:08:25
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35781750
vbhevbh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbhevbh
Гость
Очень интересует этот же вопрос. Калькулятор вызываю следующим образом:

Sub Calc()
Application.ActivateMicrosoftApp Index:=0
End Sub

А вот как вернуть значение из калькулятора не знаю?
...
Рейтинг: 0 / 0
28.01.2009, 09:47:57
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35784330
ZVI
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ZVI
Участник
Valll...
Посоветуйте кто может.
Разве что посоветовать

Ключевое слово - API.
По событию формы вызвать шеллом калькулятор. Можно и по событию листа, если нужен всплывающий калькулятор.
Найти хэндл окна калькулятора (GetForegroundWindow), в нем – хэндл текстбокса (FindWindowEx), чтобы можно было считывать его содержимое (SendMessage).
По таймеру несколько раз в секунду считывать в переменную содержимое текстбокса до тех пор, пока калькулятор активен. При этом проверять, не закрыто ли, и в фокусе ли приложение калькулятора, если нет, то остановить таймер, и из переменной записать результат куда-то в форму или после CDbl-а – числом в ячейку.
Записать результат по кнопке - это всего лишь переписать значение переменной куда требуется.
Закрывать по кнопке - тоже с помощью API (PostMessage).
Вместо таймера можно крутить цикл с DoEvents, если процессору больше нечем заняться.
Совет реальный – дерзайте, если есть время и желание.
...
Рейтинг: 0 / 0
29.01.2009, 06:41:14
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35787067
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
Поковырялся я еще. У меня сложилось мнение, что проще сделать самому калькулятор и организовать пересылку его результатов на форму. Вообще я немного удивлен Майкрософтом и Эклелем: из-за такой ерунды ломать столько копий и делать столько телодвижений.
...
Рейтинг: 0 / 0
30.01.2009, 09:02:25
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35787082
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
Поковырялся я еще. У меня сложилось мнение, что проще сделать самому калькулятор и организовать пересылку его результатов на форму. Вообще я немного удивлен Майкрософтом и Эклелем: из-за такой ерунды ломать столько копий и делать столько телодвижений.
...
Рейтинг: 0 / 0
30.01.2009, 09:10:48
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35787137
Algil70
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Algil70
Гость
http://www.piter.com/download/978594723499
Книга Гетца по Access 2002, скачайте - ChapterProjects.exe (Это архив примеров)
В Ch07 есть форма frmCalc, можно его использовать! OK!
...
Рейтинг: 0 / 0
30.01.2009, 09:45:46
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35788718
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
Большое спасибо! Попробую.
...
Рейтинг: 0 / 0
30.01.2009, 17:24:25
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35802043
Algol70
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Algol70
Гость
Vall, меня заинтересовал ваш вопрос. В Excele есть ActiveX Объект Mscal.ocx? Которую можно вставыть в форму а по нажатии кнопки в нужную ячейку вставлятся выбраная дата (как это сделать можно узнать в www.fontstuff.com/vba/vbatut07.htm). Но к сожалению для калькулятора такой рабочий (есть кое что в инете но у меня не пошло) файл ocx не нашёл. может ктото из форума может подкинуть? а так это верный выход из положения и без всякой рисования формы.
...
Рейтинг: 0 / 0
06.02.2009, 15:07:33
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35802217
_slan_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_slan_
Участник
ZVI, таймер не нужен. Это все таки разные приложения.форма висит в модальном режиме(или немодальном - все едино)
просто жмем кнопочку на форме, посылаем калькулятору, допустим, то же ctrl+c, потом достаем из буфера(или ищем текстбокс..). но таймер.. только, если очень хочется..
...
Рейтинг: 0 / 0
06.02.2009, 15:55:31
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35802971
Pavel55
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pavel55
Гость
Algol70 , Mscal.ocx - это Календарь 11.0 в Office 2003 и Календарь 12.0 в Office 2007

______________________________________________________________
Разрабатываю макросы под заказ.
Email: MacrosForYou собака yandex точка ru
...
Рейтинг: 0 / 0
06.02.2009, 22:23:26
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35802982
Algol70
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Algol70
Гость
Pavel55 да я знаю что Mscal.ocx - это Календарь.
А надо "кальькулятор.ocx"
...
Рейтинг: 0 / 0
06.02.2009, 23:08:22
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803085
Pavel55
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pavel55
Гость
Я вот думаю:

1) неужели никто так и не нарисовал свою формочку-калькулятор за всю историю VBA? Я поискал по инету, ну, что-то не нашёл ничего хорошего

2) может нарисовать свою форму-калькулятор, если ничего не найдём? Как думает программистское сообщество ? )

______________________________________________________________
Разрабатываю макросы под заказ.
Email: MacrosForYou собака yandex точка ru
...
Рейтинг: 0 / 0
07.02.2009, 01:09:55
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803157
Pavel55
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pavel55
Гость
Делать сегодня ночью было нечего, решил набросать небольшой калькулятор (пока все спят ) ). Результат вычислений я не проверял. Если что на меня не пинать ) Если будут баги, пишите - исправим.


______________________________________________________________
Разрабатываю макросы под заказ.
Email: MacrosForYou собака yandex точка ru
...
Рейтинг: 0 / 0
07.02.2009, 04:15:11
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803520
Algol70
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Algol70
Гость
Pavel55 OK!!! Отличная вещь!
...
Рейтинг: 0 / 0
07.02.2009, 15:55:55
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803525
KL (XL)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
KL (XL)
Участник
Pavel55Я вот думаю:

1) неужели никто так и не нарисовал свою формочку-калькулятор за всю историю VBA? Я поискал по инету, ну, что-то не нашёл ничего хорошего

2) может нарисовать свою форму-калькулятор, если ничего не найдём? Как думает программистское сообщество ? )

______________________________________________________________
Разрабатываю макросы под заказ.
Email: MacrosForYou собака yandex точка ru
Pavel55, а разве лист Excel сам по себе не калькулятор (и гораздо более мощьный и гибкий)?????
Зачем калькулятор в калькуляторе?
...
Рейтинг: 0 / 0
07.02.2009, 16:01:33
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803623
Pavel55
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pavel55
Гость
)))) Кирилл, я сам в шоке, но это не ко мне вопрос )) Просто на разных форумах часто возникает вопрос, как из калькулятора бросить полученный результат в ячейку Excel. Видно бухгалтера привыкли к настольному калькулятору или к калькулятору Windows

Вот пару ссылок лишь с одного сайта, где я с этим встречался

http://%5Dhttp://www.planetaexcel.ru/forum.php?thread_id=3942%5B/url]
http://www.planetaexcel.ru/forum.php?thread_id=4071
http://%5Dhttp://www.planetaexcel.ru/forum.php?thread_id=4994%5B/url]
http://www.planetaexcel.ru/forum.php?thread_id=4196
http://%5Dhttp://www.planetaexcel.ru/forum.php?thread_id=3195%5B/url]
http://www.planetaexcel.ru/forum.php?thread_id=7127

P.S. Надеюсь модератор не забанит меня )

______________________________________________________________
Разрабатываю макросы под заказ.
Email: MacrosForYou собака yandex точка ru
...
Рейтинг: 0 / 0
07.02.2009, 17:38:05
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803624
Pavel55
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pavel55
Гость
ой, что-то ссылками, выложу так

http://www.planetaexcel.ru/forum.php?thread_id=3942
http://www.planetaexcel.ru/forum.php?thread_id=4071
http://www.planetaexcel.ru/forum.php?thread_id=4994
http://www.planetaexcel.ru/forum.php?thread_id=4196
http://www.planetaexcel.ru/forum.php?thread_id=3195
http://www.planetaexcel.ru/forum.php?thread_id=7127

P.S. Надеюсь модератор не забанит меня )


______________________________________________________________
Разрабатываю макросы под заказ.
Email: MacrosForYou собака yandex точка ru
...
Рейтинг: 0 / 0
07.02.2009, 17:39:23
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803729
Valll
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valll
Участник
[quot Pavel55]Делать сегодня ночью было нечего, решил набросать небольшой калькулятор (пока все спят ) ). Результат вычислений я не проверял. Если что на меня не пинать ) Если будут баги, пишите - исправим.

Pavel55, уж коль я все это затеял... вообщем пиво передать я не смогу, а небольшую толику деньжат - с удовольствием! Отпиши мне свой яндекс-кошелек или номер мобильника
(valery-wУХОmail.ru), я скину денежку. Я сам уже собирался такое сделать, но было все некогда. Вообще, я обдумывал уже "строковый" калькулятор непосредственно в окне своей формы (так для меня удобней). Если "запал" не пропал... ТЗ я напишу. Вот так сделает человек хорошее дело, а ему тут же на шею садятся (шутка!)
...
Рейтинг: 0 / 0
07.02.2009, 19:48:58
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803784
_slan_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_slan_
Участник
Pavel55,
хорошо, красиво.

Но KL прав..

для простых вычислений не проще ли написать строчку вычислений и нажать F9(если в строке формул) ?

если же сложные инженерные вычисления ... то Вым еще есть над чем поработать :)
...
Рейтинг: 0 / 0
07.02.2009, 21:05:53
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803799
Pavel55
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pavel55
Гость
Valll, спасибо. Но как-нибудь потом )

Slan, я не говорю, что KL не прав. Я вообще двумя руками "ЗА", чтобы использовать Excel в расчётах, а не мою форму калькулятора.

Давайте я ещё раз попытаюсь объяснить

Я на протяжении многих месяцев-лет встречаю на разных форумах темы, где люди просят сделать им калькулятор, чтобы результат вычислений можно было передать в ячейку Excel. Но все эти темы оставались без ответа или топикстартер не получал нужного ему результата.

Сегодня ночью мне делать было нечего и я сам (шутки ради) решил сделать формочку на подобие калькулятора Windows, код я вообще не хотел писать. Когда я сделал формочку, то в инете случайно нашёл калькулятор под Access (ссылку на него оказывается уже давали в это теме выше).

И я переделал код из того примера для Access под свою форму.

Правильно я переделал или неправильно, хорошо или плохо - я не знаю. Я не проверял этот калькулятор на правильность расчётов и т.д. Я об этом сразу написал.

Я вообще не понимаю, что вы все на меня накинулись? Ну, люди хотят какой-то калькулятор, с возможностью передачи результата на лист. Я его сделал (ради себя, может он вообще не работает). А вы тут на меня все набросились.

Не надо меня учить, как ввести формулу в ячейку Excel. Я это умею (хоть и плохо).

Вам надо обращаться не ко мне с вашими предложениями, а к каждому топикстартеру на каждом форуме и рассказывать им, что они занимаются "глупостью" (по вашему мнению), что всё гораздо проще рассчитать в самом Excel.

То что мой калькулятор не считает сложные формулы - возможно, я этой целью вообще не задавался. Я сделал формочку. А дальше уже пусть каждый, кто захочет дорабатывает код под свои нужны.

Если ещё кто-нибудь напишет, что лучше расчёты делать в Excel, а не в моём калькуляторе - пошлю на 3 весёлых буквы!

Я занимаюсь Excel и макросами лично для себя - как хобби. И написал этот макрос ради интереса, для себя. Если он вам не нравится - либо напишите лучше, либо оставьте своё мнение для меня при себе.

Меня не итересует ваше мнение "нужно это или не нужно". Лучше бы подсказали, КАК дополнить код, что нужно исправить, что нужно выкинуть из кода, как было бы оптимальней, каких возможностей не хватает. Если эта тема ваз интересует.

Теперь по теме. В предыдущей версии калькулятора не работала кнопка +/-. Исправил. См. файл


______________________________________________________________
Разрабатываю макросы под заказ.
Email: MacrosForYou собака yandex точка ru
...
Рейтинг: 0 / 0
07.02.2009, 21:30:20
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803821
_slan_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_slan_
Участник
Pavel55,

а вдруг Вы и на это обидитесь? нет уж, лучше промолчу :)
...
Рейтинг: 0 / 0
07.02.2009, 21:51:19
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803874
Pavel55
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pavel55
Гость
Конструктивную критику по работе калькулятора - я приму ото всех )

Вот подсказали, что не работает кнопка с процентами (%), исправил, см. файл

______________________________________________________________
Разрабатываю макросы под заказ.
Email: MacrosForYou собака yandex точка ru
...
Рейтинг: 0 / 0
07.02.2009, 23:12:23
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35803881
f
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
f
Участник
Pavel55,
да молодец, молодец!
...
Рейтинг: 0 / 0
07.02.2009, 23:24:46
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35804015
Pavel55
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pavel55
Гость
Переделал немного калькулятор, теперь можно
1) просматривать всю введённую формулу в строке ввода
2) можно использовать скобки

Если найдёте ошибки при вычислении или выполнении макроса - пишите, исправим

______________________________________________________________
Разрабатываю макросы под заказ.
Email: MacrosForYou собака yandex точка ru
...
Рейтинг: 0 / 0
08.02.2009, 04:17:36
| Ответить | Цитировать | Написать  
Значение из калькулятора в поле формы
    #35804023
Pavel55
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pavel55
Гость
Немного доработал предыдущую версию. См. файл

______________________________________________________________
Разрабатываю макросы под заказ.
Email: MacrosForYou собака yandex точка ru
...
Рейтинг: 0 / 0
08.02.2009, 05:32:27
| Ответить | Цитировать | Написать  
25 сообщений из 49, страница 1 из 2
  1  все
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Значение из калькулятора в поле формы
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=35781750&tid=2179765]:
 0ms
get settings:
 10ms
get forum list:
 15ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 186ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 40ms
get tp. blocked users:
 1ms
others: 209ms
total:  474ms
созд. / загр.: 474ms
x
x
Закрыть


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