Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Автоматическое заполнение данных по условию
 
Доброго времени суток друзья
я столкнулся с проблемой при выполнении задачи
у меня есть два листа в одном много кодов и услуг
А в другом мне нужно что бы при вводе кода появлялись услуги.
Буду благодарен за любую помощь.
Спасибо.
Изменено: zaur90 - 02.07.2017 17:32:53
____________________________________________
Для кого то это пара кликов решает все !
Подсчет Заработной платы используя критерии и используя Зависимые выпадающие списки
 
Доброго времени суток друзья не могли бы помочь в реализации задачи: необходимо из строки коды с помощью выпадающего списка выбрать нужный код (кодов много просто я сократил) Затем при выборе в строке услуги тоже из выпадающего листа  Автоматически появляется стоимость услуги. Затем из введенных дынных подсчитывалась зарплата.
____________________________________________
Для кого то это пара кликов решает все !
VBA: отключение alt+f8
 
Поискал у нас на планете не нашел.
Кому то однозначность пригодится.

Код
Sub disable_keys() 
Application.OnKey "%{F8}", ""
Application.OnKey "%{F11}", ""
End Sub
____________________________________________
Для кого то это пара кликов решает все !
Перенос Данных из одного листа на другой по условию, доработка Макроса
 
Доброго времени суток друзья у меня есть макрос который берет информация из разных столбцов и выгружает в один лист
проблема втом что в макросе указано номер страници в списке, Как убрать привязку к номеру а сделать привязку только к названию !
Код
Set lis = wb.Worksheets(23) - Как сделать что бы не было привязано 
Код
Sub qwe()
Dim wb As Workbook
Dim lis As Worksheet
Dim r As Worksheet
Set wb = ThisWorkbook
Set lis = wb.Worksheets(23)
w = 2
    For Each r In wb.Worksheets
        If Left(r.Name, 4) = "Bina" Then
            q = 7
            i = r.Cells(Rows.Count, 2).End(xlUp).Row
            For n = 7 To i
               If r.Cells(n, 15) > 0 Then
                   lis.Cells(q, w) = r.Cells(n, 2)
                   lis.Cells(q, w + 1) = r.Cells(n, 15)
                   lis.Cells(q, w + 3) = r.Cells(n, 13)
                 
                   q = q + 1

                End If
                End If
            Next n
            w = w + 6
        End If
____________________________________________
Для кого то это пара кликов решает все !
Выделять ячейку при защите строки
 
Доброго времени суток друзья на планете нашел интересный материал хотел переделать под себя но столкнулся проблемой,
подскажите пожалуйста как доработать так что при нажатии на строку выделялась ячейка B2.
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("A3:D5")) Is Nothing Then
        If Cells(Target.Row, 5).Value = "Çàêðûò" Then Cells(Target.Row, 2).Activate
    End If
End Sub
____________________________________________
Для кого то это пара кликов решает все !
Имитировать нажатие клавиши F2+Enter, активация ячейки
 
Доброго времени суток друзья в процессе работы столкнулся трудностью надеюсь на ваши советы,
Суть в том что для проверки наличия товара используется макрос, при ручном вводе отображается сразу
а вот если копируешь из другой книги приходится нажимать на F2 для активации ячейки и нажимаю Ентер
макрос потом сам отображает цветом наличии товара !
Вопрос в том как мне макросом активирость каждую нужную ячейку столбца ! (С имитировать F2+Enter)

Попытался макрорикордером но что то не получается !
вот что получилось рекордером:
Код
Range("A8").Select
    ActiveCell.FormulaR1C1
Изменено: zaur90 - 25.03.2016 17:21:33
____________________________________________
Для кого то это пара кликов решает все !
Замена Формулы на vba макрос, суммесли
 
Доброго времени суток друзья не подскажите как можно заменить формулу:
Код
=СУММЕСЛИМН(Пят_Прод!F:F;Пят_Прод!C:C;$B:$B)+СУММЕСЛИМН(Пят_Прод!P:P;Пят_Прод!M:M;$B:$B
Там длинная формула суммирования просто я стал засорять эфир.
Если кто нибудь знает как заменить макросом.
благодарен за внимание!
____________________________________________
Для кого то это пара кликов решает все !
Фильтр отрицательных значений, сбор данных с 3-х листов в 1
 
Доброго времени суток друзья я столкнулся с проблемой при соборе данных и фильтрации
Мне необходимо отфильтровать только отрицательные значения из 3 листов и 1 лист !
По пробовал использовать Супер фильтр но при его использовании другие столбцы со значениями скрываются,
Помогите пожалуйста найти решение !
____________________________________________
Для кого то это пара кликов решает все !
Определение остатков товара учитывая день продажи, Используется формела (Суммеслимн) для общего учета но нет разбивки по дням
 
Доброго времени суток друзья, я столкнулся с тяжелой проблемой при работе и прошу вашей помощи или подсказок при решении задачи которая стала предо мной.

Суть такова что есть 3-и листа
в 1-м листе написано сколько товаров было в начале месяца
на 2-м написано общие итоги
а в 3-м продажи и возврат

необходимо что бы в 3-м листе отображалось сколько товара оставалось после продажи и возврата в определенный день.
P.S. Я могу использовать много столбцов и разбить их по дням но тогда 2-й лист становится очень объемным !
Спасибо за ваше время.
Изменено: Zaur Gasymov - 11.03.2016 09:13:47
____________________________________________
Для кого то это пара кликов решает все !
подключения Excel к хостингу и импорта данных
 
Как макросом подключатся к хостингу и импортировать данные ?
чтобы можно было укаать в макросе

хост
протокол Фтп
Тип пароля
пользователь
пароль
____________________________________________
Для кого то это пара кликов решает все !
Каталог в виде примечание и поиск, доработать макрос. Выдает ошибку на пустой ячейке.
 
Доброго времени суток
Нашёл на просторах Планеты макрос, который показывает примечание и делает поиск
не много доработал его но есть сложность !
Есть список наим-ний и картинка в примечании
есть бутон поиска и список после того как список заканчивается и оказывается на пустой вкладке выходит ошибка !
как устранить ошибку !
____________________________________________
Для кого то это пара кликов решает все !
Отображение количества оставшегося товара после продажи
 
Доброго времени суток уважаемые читающие ,
У меня во время работы возникли сложности, не могли бы мне подсказать если не сложно !
Задача такова что имеется 3 листа учет товара остатки где указываются общая картина расходов
и продажи, как сделать что бы после продажи отображалось в третьей вкладке кол-во оставшегося товара !
Спасибо за ваше внимание к моему вопросу !
Изменено: zaur90 - 20.02.2016 19:35:13
____________________________________________
Для кого то это пара кликов решает все !
Сумировать несколько строк, учитывая один критерий, упрощение
 
Доброго времени суток уважаемые участники у меня возникли сложности при роботе я бы хотел упростить таблицу расчетов !

У меня есть два листа один с продажей а другой со списком товаров. при использовании формулы Суммеслимн

количество проданного товара отображается не верно. Буду рад любой помощи образец внизу !
Сори что нарушил правила впредь буду внимателен, на ошибках учатся !))
____________________________________________________________­_____________________
Нашел приблизительное решение но оно не удобное может кто подскажет другие варианты
=СУММЕСЛИМН(Продажа!E:E;Продажа!C:C;B4)+СУММЕСЛИМН(Продажа!O:O;Продажа!M:M;B4)
Изменено: Zaur Gasymov - 11.03.2016 09:13:13
____________________________________________
Для кого то это пара кликов решает все !
Подсветка значений которых нет в списке
 
Доброго времени суток уважаемые участники Планеты,
Я бы хотел по просить помощи или совета, в решении задачи
в которой у меня имеется два листа на первом заполняются ежедневные данные
Код__цена__Количество_Сумма Таких стообцов у меня большое множество, а во второй
Есть коды, суть заключается в том что бы при вводе в первый лист в столбец коды
он отображал есть ли такой код во втором списке или нет !
Я постарался максимально подробно описать надеюсь не чего не нарушил !
Пример Внизу,
P.S я пытался решить проблему своими силами с помощью условного фармотирования и вроде бы смог
найти решение но оно не удобное в моем случаи =И(НЕ(ЕПУСТО(A1));СЧЁТЕСЛИ(Остатки!B598:B1048575;A1)=0)
____________________________________________
Для кого то это пара кликов решает все !
Начисление ЗП с использованием выпадающего списка, выпадающие списки
 
Доброго времени суток уважаемые эксперты и люди знающие многое о многом ))
У меня возникла проблема при формировании таблицы с расчетом заработной платы !
У меня есть столбцы с именами работников кодом услугой и ценой, у каждого кода разные услуги и разные цены,
Я пытаюсь сформировать таблицу где при выборе кода у нас выпадал список с услуг и затем при выборе услуг автоматически выходила цена !
Кодов у меня в процессе работы очень много !
Буду рад любой помощи !
Изменено: Zaur Gasymov - 11.03.2016 09:10:24
____________________________________________
Для кого то это пара кликов решает все !
Страницы: 1
Наверх