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

Страницы: 1
добавление данных из одной таблицы в дургую
 
#
31.01.2024 21:10:49
Всем привет!
Помогите с решением следующей задачи:
Имеется основная таблица которая заполняется каждый день («продукты»)
Как сделать так чтобы таблицы «результат 2022» и «вид 2022» (такие же таблицы будут по другим годам, 2023, 2024 и тд.) заполнялись на основании данных в таблице «продукты».
Изначально, наверное нужно, чтобы в таблице «продукты» был дополнительный лист в котором будет указываться период который относится к определенному кварталу: к примеру: с 12.12.2021 по 28.03.2022 – это 1 квартал 2022; с 29.03.2022 по 20.06.2022 – это 2 квартал 2022 и тд.
И нужно чтобы после определения какие даты ходят в определенный квартал – эти цифры уже заносились в таблицы «результат» и «вид» соответственно кварталам
 
Перейти    
Добавление строки на одном листе, чтобы она добавлялась и на другом
 
#
27.01.2022 11:57:25
Всем привет, помогите в решении такого вопроса: можно ли сделать так, чтобы при добавлении строки на листе "январь" в "Продукты", такая же строка добавлялась в "Материалы" на том же листе, а также в остальные листы и таблицы ( "Февраль", "Март", а также в "Итог"). И, главное, чтобы все формулы автоматически сдвигались и считали также эту новую добавленную строку. В приложенном примере, допустим, в таблице "Продукты", в категорию "поставщики" в лист "январь", либо "февраль" добавить строку "ПродукТорг" (между строк "АгроПром" и "КолосПро") с разбивкой "Москва" и "СПБ". Как это сделать с добавлением этой строки в другие листы и с сохранением формул и расчетов? Заранее спасибо за помощь!
 
Перейти    
Проставление текущей даты в соседнем столбце при определенном условии, нужно проставлять дату в столбе при обнаружении корня слова "исполн" в предыдущем столбце
 
#
15.12.2020 08:49:59
Всем привет, помогите дописать макрос, чтобы при выборе в 7 столбце (H) из списка значения "исполнено" или "без исполнения"  в 8 столбце проставлялась дата
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells.Count > 1 Then Exit Sub
    If Target.Column = 2 And Target.Row > 1 And Not IsEmpty(Target.Value) And Target.Offset(0, 1).Value = "" Then _
        Target.Offset(0, 1).Value = Date
    If Target.Column = 11 And Target.Row > 1 And Not IsEmpty(Target.Value) And Target.Offset(0, 1).Value = "" Then _
        Target.Offset(0, 1).Value = Date
    If Target.Column = 8 And Target.Row > 1 And Not IsEmpty(Target.Value) And Target.Offset(0, 1).Value = "" Then _
        Target.Offset(0, 1).Value = Date
    If Target.Column = 43 And Target.Row > 1 And Not IsEmpty(Target.Value) And Target.Offset(0, 1).Value = "" Then _
        Target.Offset(0, 1).Value = Date
     If Not Intersect(Target, Range("E2:E99999")) Is Nothing Then
       i = Split(Target.Address, "$")(2)
       LastRow = Sheets("РФ").Cells(Rows.Count, 1).End(xlUp).Row
        If InStr(Cells(i, 4), "РФ") > 0 Then
          Range("A" & CStr(i) & ":E" & i).Copy Sheets("РФ").Range("A" & LastRow + 1)
        End If
     End If
End Sub
Изменено: konkruk - 15.12.2020 08:51:17
 
Перейти    
Перенос значений листа1 на лист2 в Excel при ряде условий
 
#
18.12.2019 08:31:44
Всем привет, имеется несколько вопросов по таблице в Excel:
1. нужно, чтобы значения из столбцов "А-Е" листа1 переносились на лист 2 в те же столбцы, но при условии, что значение столбца "D" листа1 = "Россия";
2. на листе1 имеется макрос:
Код
Private Sub Worksheet_Change(ByVal Target As Range)
     If Target.Column = 2 And Target.Row > 1 And Not IsEmpty(Target.Value) Then _
           Target.Offset(0, 1).Value = Date
End Sub

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