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

Страницы: 1
Открыть книгу при помощи VBA и перенести данные в текущую книгу.
 
Доброго времени суток!
Интересует такой вопрос, видел в одной книге реализована подгрузка данных по нажатию кнопки (видимо выполняется макрос), открывается окно "открытие файла" и в нем пользователь выбирает интересующий его файл (названия открываемых файлов могут быть разные), потом необходимые данные из открытой книги копируются в текущую. Так вот интересно как реализовать открытие файла из которого необходимо перенести данные. Если возможно, было бы круто увидеть код)
Заранее благодарен!
Остановка макроса при обнаружении одинаковых значений
 
Доброго времени суток!
Прошу помочь, есть определенный макрос который необходимо выполнить, он берет данные из определенного диапазона, если в этом диапазоне встречаются одинаковые данные, его работа прерывается ошибкой. Необходим поиск всех одинаковых значений в заданном диапазоне и если они есть указать макросу завершить его выполнение.
Заранее благодарен.
Не вставляется формула VBA, Добрый день! Подскажите, почему не работает макрос, не вставляет формулу, выдает ошибку.
 
При выполнении макроса возникает ошибка, не пойму почему, подскажите пожалуйста. Макрос должен вставлять формулу, но выскакивает ошибка которая на картинке.
Защита ячеек макросом, доработать макрос защиты одной ячейки
 
Добрый день!
Уважаемые знатоки, подскажите, есть макрос который защищает ячейку, ранее не защищенную, на закрытом листе, таким образом он ее делает закрытой для дальнейшего редактирования. Макрос работает как нужно, но, возникла проблема в том, что там более 90 ячеек которые нужно закрыть, а код прописываю отдельно для каждой ячейки, можно ли как то оптимизировать это дело? К примеру, макрос отслеживает диапазон ячеек {А3:А5}, если меняется ячейка А4, он защищает ее и т.д.
Заранее благодарен.
Код
Private Sub worksheet_change(ByVal Target As Range)
Dim rng As Range: Set rng = [b3]
If Not Intersect(rng, Target) Is Nothing Then
Range("B3").Select
    Selection.Locked = True
    Selection.FormulaHidden = True
    ActiveSheet.Protect userinterfaceonly:=True
End If

Dim rng1 As Range: Set rng1 = [b4]
If Not Intersect(rng1, Target) Is Nothing Then
Range("B4").Select
    Selection.Locked = True
    Selection.FormulaHidden = True
    ActiveSheet.Protect userinterfaceonly:=True
End If

Dim rng2 As Range: Set rng2 = [b5]
If Not Intersect(rng2, Target) Is Nothing Then
Range("B5").Select
    Selection.Locked = True
    Selection.FormulaHidden = True
    ActiveSheet.Protect userinterfaceonly:=True
End If
End Sub
Боюсь, что на 90 ячеек будет длинноватый код... а там есть еще, что прописать.
Нахождение и суммирование нескольких значений по 1 критерию., Нахождение и суммирование нескольких значений по 1 критерию.
 
Всем добрый день, прошу помочь!
Используя формулу ВПР я могу найти значение из массива по определенному условию. (см пример), но возникла проблема, если есть в массиве несколько одинаковых значений (равных критерию поиска), ВПР находит самую верхнюю позицию, и ниже не проверяет. Как сделать так, чтобы ВПР находила все значения удовлетворяющие критериям поиска и складывала их значения в ячейке.

Пример:
В таблице: 2 Федора, одному 23, другому 45 (см пример), необходимо чтобы функция нашла и значение 23, и значение 45 и сложила их.
Условное форматирование (поиск одинаковых значений) по нескольким столбцам
 
Добрый день!
Прошу помочь, если это вообще возможно, необходимо применить условное форматирование (поиск одинаковых значений) к нескольким столбцам, в моем случае, 2-м, но выделяться должны не все повторяющиеся значения в каждом столбце, а только если и значение из первого столбца и значения из второго столбца повторились.
Можно было бы суммировать и первый и второй столбец, в отдельном и применить условное форматирование к сумме, но одинаковые суммы могут давать разные числа, такой вариант не подошел.
Во вложении файл с конкретной задачей, наглядно понятнее.
Будь то макрос или формула и т.д - разницы нет.
Заранее спасибо!
Разделение оси графика по месяцам
 
Здравствуйте, подскажите пожалуйста!
Есть график Ганта, в котором по оси х располагаются даты, с 1.03.14 и почти до конца 2015 года, цена деления 1, т.е. каждый день! Можно ли, сделать так, что бы 1.03.14 и ее деление, 31.03.14 и ее деление, 30.04.14 и т.д. Выделялись, цветом, жирностью шрифта, и т.д. без разницы!
Спасибо!
Как к дате прибавить пол года и год без учета лет!
 
Здравствуйте, помогите пожалуйста!
Нужно, например, прибавить к 12.03.12 такое количество месяцев, чтобы получилось 12.09.14. Но проблема в том, что в массиве с датами даты разных годов, пример:   12.03.12
                01.02.11
                03.08.09
как получить соответственно:
                12.09.14
                01.08.14
                03.02.14
Выбор данных и их отображение из массива по определенному признаку
 
Нужно с помощью выпадающего списка выбирать месяц,  в таблице рядом должны появляться данные соответствующие этому месяцу.
Заранее спасибо! Пример прилагаю!
Построить график промежутков времени,
 
Есть даты:
12.01.14
20.02.14
13.02.14
11.11.13
14.03.13
Так вот, нужно сделать чтобы на нем автоматически создавался отрезок времени в 14 дней (дата из списка, минус 14 дней, т.е. допустим для первой даты 12.01.14: должен быть отрезок с 30.12.13 по 12.01.14 - который собственно и будет выводиться на график (шаг графика 0,5 месяца, график на 1 год)
P.S.
Этот график должен отображать отпуск сотрудников, а временные отрезки нужны чтобы видеть сколько отпусков за месяц накладываются или пересекаются.
Заранее благодарен.
Дата после полуночи не поменялась, а осталась прежней.
 
Здравствуйте, подскажите, как сделать автоматическую дату, которая будет отображать сегодняшнее число а после полуночи, не настоящую дату а предыдущую?
Результат разности дат в месяцах
 
Как от сегодняшней даты отнять какую нибудь дату и получить результат в месяцах?
Суммирование только определенных ячеек
 
Помогите сделать автоматическое суммирование! Пример: меню состоит из множества блюд, мне нужно подсчитать вес ингредиентов во всех блюдах, как это сделать проще, если не во все блюда входит определенный ингредиент, мне нужно что бы он подсчитал только блюда с этим ингредиентом!
не прибавляется пол года к дате корректно!
 
Выдает ошибку, разница несколько дней!
Как разбить ячейку на две?
 
Как разбить 1-у ячейку на 2-е?
Условное форматирование
 
В условном форматировании ввожу:
красный - просрочено
0<=А$1$<=14 - желтый
зеленый - Годен
не работает
Так будет работать?
В условном форматировании ввожу:
Просрочено - красный
(и(0<=А$1$;А$1$<=14)) - желтый
Зеленый - годен
Если нет то подробно опишите как? Excel 2010 Starter
Страницы: 1
Наверх