Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » CATS
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Чем заменить DTPicker Ecell 2016 64 бита?
 
#
26.04.2019 15:48:46
Цитата
Nordheim написал: На счет DTPicke
Я что-то не могу найти место куда надо положить календарик
 
Перейти    
Чем заменить DTPicker Ecell 2016 64 бита?
 
#
26.04.2019 15:32:26
Цитата
vikttur написал:
сможете объяснить дублирование тем?
Нууу, 1 вопрос-1 тема
 
Перейти    
Ищу того кто поможет мне создать программу состоящую из нескольких макросов( научить меня), Помощь в написании прогаммы на VBA
 
#
25.04.2019 16:00:35
Цитата
Лунтик написал:
Вообще-то удобнее будет коту учиться у кота, поэтому, наверное, лучше обратиться к Ran
А если я бесплатно хочу?)
 
Перейти    
Ищу того кто поможет мне создать программу состоящую из нескольких макросов( научить меня), Помощь в написании прогаммы на VBA
 
#
25.04.2019 15:30:56
Еще не нашел
 
Перейти    
Чем заменить DTPicker Ecell 2016 64 бита?
 
#
25.04.2019 14:45:59
Цитата
Jack Famous написал:
вызов какой-то
Вы знаете что такое Userform?
 
Перейти    
Чем заменить DTPicker Ecell 2016 64 бита?
 
#
25.04.2019 14:32:47
Я вот что-то из этого скачал вот скрин, как это поместить в Userform?
Изменено: CATS - 26.04.2019 16:01:48
 
Перейти    
Чем заменить DTPicker Ecell 2016 64 бита?
 
#
25.04.2019 11:19:10
Подходит ли это?
 
Перейти    
Чем заменить DTPicker Ecell 2016 64 бита?
 
#
25.04.2019 10:47:42
Чем заменить DTPicker Ecell 2016 64 бита?
 
Перейти    
Не могу найти DTPicker в Excel2016, Excel 2016
 
#
24.04.2019 17:06:23
Почему?(
P.S посмотрел, у меня 64 разрядный офис стоит
Изменено: CATS - 24.04.2019 22:01:41
 
Перейти    
Не могу найти DTPicker в Excel2016, Excel 2016
 
#
24.04.2019 17:02:39
Привет всем! При программировании в VBA создал Userform и там мне надо чтобы было окошечко с выбором даты. В Additional Controls который включается через Tool Box. И там я не нашел Microsoft Date and Time Picker Control
Изменено: CATS - 24.04.2019 17:06:04
 
Перейти    
Ищу того кто поможет мне создать программу состоящую из нескольких макросов( научить меня), Помощь в написании прогаммы на VBA
 
#
23.04.2019 20:33:15
Цитата
Ivan.kh написал:
На правах рекламы - если готовы оплачивать, то обратитесь к  Ігор Гончаренко Он раньше брался за обучение, и делал это хорошо
Спасибо)
 
Перейти    
Ищу того кто поможет мне создать программу состоящую из нескольких макросов( научить меня), Помощь в написании прогаммы на VBA
 
#
23.04.2019 16:15:59
Цитата
vikttur написал:
Перенести в платный раздел?
А он есть? Я что-то не видел, не ну если можно то просто поможет может кто :)  
 
Перейти    
Ищу того кто поможет мне создать программу состоящую из нескольких макросов( научить меня), Помощь в написании прогаммы на VBA
 
#
23.04.2019 16:10:56
Привет всем! Ищу того кто поможет мне создать программу состоящую из нескольких макросов научить меня. О задаче мне надо  сделать пару страниц в которые надо вводить данные  выбирать дату и т.д выпадающие списки. И они заполнялись в бланк, после сделать кнопку печати этого бланка после заполнения и чтобы все что печаталось ( данные которые вводились) заполнялись автоматически после нажатия на кнопку печать в реестр. Основы VBA чутка знаю, но не все.
 
Перейти    
Как задать в макросе - конкретную ячейку - в качестве адреса.
 
#
22.04.2019 15:21:32
Цитата
Lizard2 написал:
Вот я поставил в нем ячейку задающую начало и ячейку задающую конец.И линия не рисуется.
Я скачал, попробывал все работает надо ставить только точку в которую должна выйти линяя
 
Перейти    
Помещение функции в окошечко Userform, Помогите добавить функцию в окно Userform
 
#
22.04.2019 14:45:31
Я про подпись говорил а сайт этотпочему-то не открывается
Цитата
Sanja написал:
Мне кажется и не пытались. Если по ссылке непонятно, любой поисковик Вам еще с десяток выдаст по запросу 'Создание UserForm VBA'
 
Перейти    
Помещение функции в окошечко Userform, Помогите добавить функцию в окно Userform
 
#
22.04.2019 14:03:55
Цитата
Sanja написал:
Согласие есть продукт при полном непротивлении сторон.





Вообще ничего не понял
 
Перейти    
Помещение функции в окошечко Userform, Помогите добавить функцию в окно Userform
 
#
22.04.2019 13:47:28
Мне надо чтоб выскакивало окно при включении макроса в которое надо ввести 3 значения и онго посчитается а именно расход топлива на 100км
 
Перейти    
Помещение функции в окошечко Userform, Помогите добавить функцию в окно Userform
 
#
22.04.2019 13:41:45
Вот сам файл
 
Перейти    
Как задать в макросе - конкретную ячейку - в качестве адреса.
 
#
22.04.2019 13:29:26
Прошу прощения возможно тупой ответ, а это не подходит? Application.ThisWorkbook.Sheets(1).Cells(4, 8)
Смайлик рисует там 4, 8 ) без пробела последнего
4 и 8 это получается строка и столбец
вначале столбец после строка
в данном случае: Application.ThisWorkbook.Sheets(1).Cells(56, 14)
Изменено: CATS - 22.04.2019 13:36:11
 
Перейти    
Помещение функции в окошечко Userform, Помогите добавить функцию в окно Userform
 
#
22.04.2019 13:22:33
Как добавить функцию в окошечко Userform
Код
Option Explicit

Sub Calculator()
    Dim perem As String
    
    perem = MyFunc("Ðàñõîä òîïëèâà = ", 160, 415, 100)
    
    Call MsgBox(perem)
    
    MsgBox "Êîíåö ïðîãðàììû"
    
End Sub


Function MyFunc(ByVal text As String, ByVal fuel As Integer, ByVal km As Long, ByVal ccc As Integer) As String
    Dim total As Double
    
    total = fuel * km / ccc
    
    MyFunc = text & total
End Function
 
Перейти    
Калькулятор расхода топлива, Вроде все правильно, но не получается
 
#
22.04.2019 13:15:03
Цитата
Ivan.kh написал:
Цитировать  
Видимо я ступил и не ту формулу написал)
 
Перейти    
Калькулятор расхода топлива, Вроде все правильно, но не получается
 
#
22.04.2019 13:07:15
Как сделать чтоб считалось не целым числом а с десятками и единицами, если не ошибаюсь тип данных Currency
Изменено: CATS - 22.04.2019 13:08:47
 
Перейти    
Калькулятор расхода топлива, Вроде все правильно, но не получается
 
#
22.04.2019 13:05:33
Цитата
Artem1977 написал:
В конце уберите ;
Все было из-за ; только почему-то посчиталось 664 литра на 100 км при 160 литрах на 415 км  
 
Перейти    
Калькулятор расхода топлива, Вроде все правильно, но не получается
 
#
22.04.2019 13:03:24
Цитата
Artem1977 написал:
Только зачем столько переменных передавать - и строки и цифры? Чтобы запутаться?
Я только начинаю писать на VBA еще не все тонкости знаю, как можно написать по другому? Помогите пожалуйста :)
 
Перейти    
Калькулятор расхода топлива, Вроде все правильно, но не получается
 
#
22.04.2019 13:01:01
Поменял все MyFunk на MyFunc и теперь вылазит в клетке в которой я ввожу"=MyFunc("Расход  топлива=";160; 415;100;)"  и теперь в ней пишется не "#ЗНАЧ!" А "#ИМЯ?"
Изменено: CATS - 22.04.2019 13:01:20
 
Перейти    
Калькулятор расхода топлива, Вроде все правильно, но не получается
 
#
22.04.2019 12:53:29
Цитата
Artem1977 написал:
У вас названия функций разное. В одном месте MyFunk, а в другом MyFunc
Да, не заметил, поменял, проблема осталась
Изменил код на тот который сейчас, посмотрите
Изменено: CATS - 22.04.2019 12:55:09
 
Перейти    
Калькулятор расхода топлива, Вроде все правильно, но не получается
 
#
22.04.2019 12:28:08
Убрал ' теперь высвечивается invalid outside procedure и выделяет это: "Расход топлива = "
Скрины не могу загрузить, тяжелые  
Изменено: CATS - 22.04.2019 12:42:11
 
Перейти    
Калькулятор расхода топлива, Вроде все правильно, но не получается
 
#
22.04.2019 12:22:10
Здравствуйте, мне надо написать калькулятор расхода топлива на VBA, сижу пишу код, вроде написал, захожу на лист и пишу "=MyFunk("Расход  топлива=";160; 415;100;)" получается 160=топливо, 415=километры, а 100 это по формуле надо :D
И почему-то вылазит в той клетке где я писал "#ЗНАЧ!" Что делать? что не так?

Код
Option Explicit

Sub Calculator()
    Dim perem As String
    
    perem = MyFunc("Расход топлива = ", 160, 415, 100)
    
    Call MsgBox(perem)
    
    MsgBox "Конец программы"
End Sub


Function MyFunk(ByVal text As String, ByVal fuel As Integer, ByVal km As Long, ByVal ccc As Integer) As String
    Dim total As Double
    
    total = fuel * km / ccc
    
    MyFunk = text & total
End Function
Изменено: CATS - 22.04.2019 12:56:13
 
Перейти    
Страницы: 1
Наверх