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

Страницы: 1
Редактирование формул, как изметить диапазоны в формуле
 
#
18.02.2025 14:41:10
Есть формула, как изметить диапазоны одновременно? Сохраняя столбцы

=СУММ(СУММЕСЛИМН(N167:N180;C167:C180;{"ОТ";"ЭМ";"М";"НР*";"СП*"}))-СУММ(U167:U180)
 
Перейти    
Вставка формулы в ячейку, Вствка функции СУММЕСЛИ
 
#
22.02.2024 09:04:46
Подскажите пожалуйста что неправильно в коде при вставке функции в ячейку

  1 вариант      
        Range("H37").WorksheetFunction.SumIf(Worksheet("КС-2").Range("N37:AY37"),кол-во,Worksheet("КС-2").Range("N38:AY38")
в этом варианта надо приплюсовать      $J38  

2 вариант
        Range("H37").Select
        ActiveCell.FormulaR1C1 = "=СУММЕСЛИ($N$37:$AY$37;""кол-во"";$N38:$AY38)+$J38"
Изменено: Shuav - 22.02.2024 09:07:37
 
Перейти    
Редактирование ячейки через TextBox, Добавление вычисления в активную ячейку
 
#
09.02.2024 11:17:08
Добрый день!
Помогите пожалуйста, если это возможно
Написал макрос для вставки формулы в активную ячейку(не судите строго), но необходимо дописать чтобы произвести последующие расчеты

Вариант 1
Код
Sub КС2_Монтаж_РС()
'
' КС2_Монтаж_РС Макрос
'

'
    ActiveCell.FormulaR1C1 = "=AGGREGATE(9,7,R37C10:R2500C10)"
    ActiveCell.Select
    UserForm1.TextBox1.Text = ActiveCell
    UserForm1.Show 0
End Sub

но здесь при редакции текстбокса данные не передаются в активную ячейку

Вариант 2

В идеале надо отредактировать функцию Агрегат (отминусовать другую ячейку но адрес у нее всегда разный)
 
Перейти    
Надстройка Inquire, Сравнение файлов
 
#
30.11.2023 11:31:47
Открываю два файла для сравнения запускаю Compare Files в inquire, в меню выбираю что сравнить, процесс начинается, но нет итога сравнения, админ говорит что окно сравнения открывается и тут же закрывается.(Excel 2016). Подскажите что надо сделать чтоб работало. Заранее благодарен
 
Перейти    
Очистка значения в ячейке по адресу
 
#
12.09.2023 11:58:14
Помогите, что прописываю не правильно, нужно
1.перейти на последнюю пустую строку(ячейку) таблицы
2.перейти по координатам
3.удалить значения в этой ячейке

ActiveCell.SpecialCells(xlLastCell).Select
   ActiveCell.Offset(-11, -5).Select
   Selection.ClearContens
   End Sub
 
Перейти    
Можно ли поменять текст в модуле через форму не заходя в отладчик
 
#
18.04.2023 14:37:42
Код
ActiveCell.FormulaR1C1 = "11915-ДППД-22"
'ActiveCell.FormulaR1C1 = "17906-ДППД-22"
Нужно активировать запись 2 и деактивировать 1
 
Перейти    
Установка фильтра на содержание текста в критерии
 
#
13.04.2023 17:25:39
Подскажите как прописать код что бы фильтр устанавливался по критерию  если содержит текст - "Итого по разделу:"
Код
Range("A30").Select
    ActiveSheet.Range("$A$30:$K$1000").AutoFilter Field:=1, Criteria1:=Array( _
        "Итого по разделу: Замена кабеля на тросе на СИП", _
        "Итого по разделу: Замена однорожкового кроншнейна", _
        "Итого по разделу: Замена опор (Бухгалтерский № 10000214)", _
        "Итого по разделу: Замена светильников", _
        "Итого по разделу: Монтаж распределительной сети", _
        "Итого по разделу: Организация движения", "Итого по разделу: ПНР", _
        "Итого по разделу: Прочие работы"), Operator:=xlFilterValues
 
Перейти    
Формула на значение ячейки в конце таблицы по адресу
 
#
12.04.2023 16:56:28
Подскажите как прописать чтобы выделенная ячейка равнялась ячейке в конце таблицы по адресу
Код
Range("H31:I31").Select
    ActiveCell.SpecialCells(xlLastCell).Select
    ActiveCell.Offset(-7, -1).Select
 
Перейти    
вставить текст жирным шрифтом в ячейку
 
#
12.04.2023 09:30:58
Код
ActiveCell.Offset(-8, -13).Select
ActiveCell.FormulaR1C1 = "Итого по разделу: Монтаж распределительной сети"
помогите как вставляемый текст вставлять уже полужирным шрифтом?
 
Перейти    
Форматирование строк таблицы повторяющихся значений и выбор наименьшего значения в этой группе, Форматирование строк таблицы повторяющихся значений и выбор наименьшего значения в этой группе
 
#
31.03.2023 12:34:58
Форматирование строк таблицы повторяющихся значений и выбор наименьшего значения в этой группе (выделение жирным шрифтом)
Изменено: Shuav - 31.03.2023 12:39:06
 
Перейти    
Получить формулу с листа в TextBox, TextBox
 
#
22.11.2022 10:32:13
подскажите пожалуйста как можно редактировать в TextBox не зачение ячейки, а формулу которая в ней прописана?
Изменено: Юрий М - 22.11.2022 16:53:35
 
Перейти    
Редактирование формулы в форме
 
#
01.11.2022 14:54:50
Можно ли редактировать формулу через форму vba?  
Изменено: Shuav - 01.11.2022 15:01:16
 
Перейти    
Страницы: 1
Наверх