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

Страницы: 1
Автоматическое заполнение ячеек по значению ячейки в другой таблице
 
Добрый день.
Прошу помощи в заполнении одного столбца таблицы на основании данных, введенных в соседний столбец.

Файл во вложении.

Нужно чтобы:
- пользователь вводит цифры от 1 до 122 в столбец "С" на Листе1;
- происходит поиск введенной цифры в столбце А на Листе 2;
- при нахождении такой же цифры, данные из ячейки в столбце В Листа 2 переносились в ячейку столбца D на листе1.

Попробовала сделать по найденным в архиве примерам, пока не очень получилось.
Построение графика с помощью функции 'ряд', График строится только на основании нескольких строк таблицы. Необходимо, чтобы график строился на всей длине таблицы.
 
Добрый день. Во вложении файл. Интересует только лист "объединенная карта" (предпоследний).
На листе должна строиться диаграмма на основании введенных в столбцы "О" и "W" значений. Значения из столбца "О" строятся в виде жирной горизонтальной черты, значения из столбца "W" в виде пунктирной наклонной линии. Почему-то строится верно только до 27-28 строчки.
не могу разобраться, как протянуть до конца таблицы эту функцию построения.
Прошу помощи.
Вторичная круговая диаграмма, Лишний ряд в первичной диаграмме.
 
Добрый день.
Прошу помощи в построении вторичной круговой диаграммы.
Первичная состоит из двух блоков: 85,7 и 14,3.
Вторичная дробит ряд 14,3.
Здесь всё четко.
но в первичной диаграмме простраивается ряд, который является суммой первого и второго ряда (85,7+14,3) и я не могу от него избавится.
Макрос отбора ячеек и построения диаграммы, необходимо найти номера строк и по ним построить диаграмму
 
Добрый вечер.
Помогите, пожалуйста, дописать макрос.
У меня есть таблица (дата, время, номер, значение).
Я создала форму, в которой пользователь с помощью выпадающих списков выбирает дату и время, которое нужно отобразить на диаграмме.
Данные из combobox "склеиваются" в переменные.
Переменных две: дата и время.

Код
itogoA = day & "." & mth & "." & year
itogoB = st

Необходимо, чтобы далее происходил отбор тех строк в таблице, где значение по столбцу А равно значению в первой переменной (itogoA),
а значению по столбцу В равно значению второй переменной (itogoB).
И из этих строк (их примерно по 12 штук каждый раз) строилась диаграмма из столбцов C и D (стойка и значение) соответствующих номеров строк.
Помогите сделать такой отбор строк и построить по ним диаграмму, пожалуйста.
Файл прилагаю.
То, как должна выглядеть каждый раз диаграмма - лист 1.
На листе 2 - данные для combobox-ов просто.
Форма запускается при открытии книги.
Пока, при нажатии на кнопку "Построить", я добилась только склеивания данных из combobox-ов в переменные.
Цикл поиска номера строки, начинающейся с пробела
 
Добрый вечер.
Не могу разобраться с циклом.
В цикле требуется перебирать строки на листе, пока не будет найдена строка, которая начинается с пробела.

Код
For i = 1 To n
    cities_revenue(i, 1) = ActiveWorkbook.Worksheets(i).Name ' в массив заносится название листа
    
    row_num = 1 ' счетчик строк  на листе 
    Do Until ActiveWorkbook.Worksheets(i).Left(Cells(row_num, 1), 1) = " "
        row_num = row_num + 1
    Loop
    
Next i


Для проверки вывела в MsgBox этот кусок Left(Cells(5, 1), 1)) возвращает правильно первую букву в указанной ячейке.
Однако в цикле не работает.
В чем ошибка?
Пользовательская функция с двумя аргументами
 
Добрый день.
Прошу помощи в написании пользовательской функции с двумя аргументами.
Нужно проверить два параметра (при вызове функции в ячейке данные параметры указываются мышкой путем клика на нужные ячейки): первый должен быть больше 1млн, а второй равен слову "Постоянный". Если оба условия верны, то функция возвращает значение в размере 5% от первого аргумента.
Как это реализовать с одним аргументом я знаю (через Select case):
Код
Function Five(amount As Double) As Double
Select Case amount
Case Is > 1000000
    Five = 0.05 * amount
Case Is < 1000000
    Five = 0
End Select
End Function


А вот как реализовать проверку второго параметра, я не знаю.
Были такие попытки:
Код
If amount > 1000000 And status = "Постоянный" Then Five = 0.05 * amount


Но как приэтом задавать значение параметров, я не понимаю.
Диаграмма работы оборудования.
 
Добрый день.
Изменено: Маргарита Пыркина - 18.03.2021 13:40:47
Блокировка ячеек по условию
 
Добрый день.
Нашла кучу информации по этой теме, но все равно что-то делаю не так, видимо.
Код
Sub Block()
If Range("Q13").Value = "Согласовано" Then
'MsgBox Range("Q13").Value
Range("C13").Locked = True
End If
End Sub

Сам механизм не пойму. Пробую на примере двух ячеек пока.
Если в ячейке Q13  написано "Согласовано", то защитить от изменения ячейку C13. MsgBox писала, чтобы проверить, что условие выполняется. Но ячейка С13 не блокируется.

Что я делаю не так?
Вставить однотипную формулу в группу ячеек с привязкой к адресу ячейки и пропуском пустых ячеек
 
Добрый день.
У меня при щелчке по кнопке выполняется следующий макрос:
Код
Sub Кнопка3_Щелчок()
If Not IsEmpty(Cells(12, 1)) Then
Range("Q12").Formula = "=VLOOKUP(A12,'[Сводная_777.xlsm]Сводный'!$A$3:$Q$5016,17,FALSE)"
End If
If Not IsEmpty(Cells(13, 1)) Then
Range("Q13").Formula = "=VLOOKUP(A13,'[Сводная_777.xlsm]Сводный'!$A$3:$Q$5016,17,FALSE)"
End If
If Not IsEmpty(Cells(14, 1)) Then
Range("Q14").Formula = "=VLOOKUP(A14,'[Сводная_777.xlsm]Сводный'!$A$3:$Q$5016,17,FALSE)"
End If
End Sub

Но я прописываю руками для каждой строки.
Подскажите, пожалуйста, как запечатать это в цикл, если в таблице 5000 строк, допустим.
Заполнение одной таблицы из нескольких других с одинаковой структурой данных
 
Добрый вечер.

Не могу придумать, как реализовать такую идею. Прошу помощи, может кто подскажет.
Имеется 4 разных книги. В каждом по одной таблице.  И имеется книга, в которую хочется собирать данные из тех 4-х книг.
Структуры таблиц во всех 5-ти книгах одинаковые.  Просто 4-е таблицы содержат данные по одной теме. А 5-ая выступает в роли сборника.

Как через Query подключить каждую книгу в отдельную таблицу я знаю. А вот как сгружать все таблицу в одну общую таблицу - похоже не знаю.
Структуру таблиц одного из 4-х файлов и сводного файла прикладываю.
Всплывающие подписи данных
 
Добрый день. Прошу помощи, если так можно реализовать.
Диаграмма состоит из двух графиков: факт и цель.
При наведении мышкой на столбец диаграммы появляется надпись (ряд такой-то, значение такое-то).
Можно ли как-то прописать, чтобы при наведении мышкой на столбец в качестве подписи подтянулись данные из ячейки таблицы с описанием причины отклонения?
То есть, например, при наведении на февраль было написано не точка "Февраль" значение 99., а всплывало "Превышение цели. Изменение маршрута движения". То есть данные из ячеек Q3 и R3.
Изменено: Маргарита Пыркина - 08.02.2021 12:00:26
Вывести список агентов согласно выбранному графику работы
 
Добрый вечер.

Есть следующая задача:
На первом листе есть таблица, которую нужно заполнить. Заполнить ее нужно данными из таблицы, находящимися на листе 2. При условии, что в первом столбце таблицы указано "8-20".

Сначала думала, что справлюсь ВПР:  
Код
=ВПР(Лист2!A3;Лист2!A2:B21;2;0)

Но данные начали задваиваться.
Добавила условие ИЛИ, чтобы сравнивать с предыдущими ячейками (для второй и третьей ячеек):
Код
=ЕСЛИ((ВПР(Лист2!$A$3;Лист2!$A$2:$B$21;2;0))=B11;ВПР(Лист2!$A$3;Лист2!$A$4:$B$21;2;0);ВПР(Лист2!$A$3;Лист2!$A$2:$B$21;2;0))
=ЕСЛИ(ИЛИ((ВПР(Лист2!$A$3;Лист2!$A$2:$B$21;2;0))=B11;(ВПР(Лист2!$A$3;Лист2!$A$2:$B$21;2;0))=B12);ВПР(Лист2!$A$3;Лист2!$A$5:$B$21;2;0);ВПР(Лист2!$A$3;Лист2!$A$2:$B$21;2;0))

Стало понятно, что для 20-ой ячейки формула будет огромной. И плюс ко всему, если следующей условие на листе 2 выполнится, допустим, в 8-ой строке, то опять будет дубль.

Скрины 1-го и 2-го листов прилагаю.
Целевое состояние: чтобы на лист 1 в таблицу выгрузились только те Агенты, у которых на листе 2 стоит график "8-20".

Прошу помощи, не соображу, как сделать.
Страницы: 1
Наверх