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

Страницы: 1 2 3 4 5 6 7 След.
округление до второго значимого числа, с подстановкой значения
 
решение есть, дополнительно в ячейку поставить значение нужное, и оттуда уже подтягивать ВПРом, но с другой стороны получается придется использовать допольнительный столбец, как прописать сразу формулу в одной ячейке я что то не пойму никак
округление до второго значимого числа, с подстановкой значения
 
Цитата
написал:
=СЛУЧМЕЖДУ(ОКРУГЛ(AL1;1-ЦЕЛОЕ(LOG(ОСТАТ(ABS(AL1);1)))))*10000;AJ1*10000)/10000)
все равно ругается на скобки, я вижу что в моей есть в конце скобка, в той нет, все равно что то не нравится
округление до второго значимого числа, с подстановкой значения
 
Цитата
написал:
Цитата
denka1982 написал:
уже пробовал
Показывайте )))
=СЛУЧМЕЖДУ(ОКРУГЛ(AL1;1-ЦЕЛОЕ(LOG(ОСТАТ(ABS(AL1);1)))))*10000;AJ1*10000)/10000) как то так
округление до второго значимого числа, с подстановкой значения
 
не получается, пишет ошибка со скобками, уже пробовал
округление до второго значимого числа, с подстановкой значения
 
в ячейке AL проводится рассчет, в ячейку R1 передается посредством ВПР значение из ячейки AL, поэтому можно или там или там сделать это сокращение знаков, все остальное не столь важно
Изменено: denka1982 - 17.08.2022 11:23:01
округление до второго значимого числа, с подстановкой значения
 
Здравствуйте, встала такая вот задача, нужно округлить до второго значимого знака, формула такая вот, =ОКРУГЛ(A2;1-ЦЕЛОЕ(LOG(ОСТАТ(ABS(A2);1)))), но нужно что б он это округление проводил или в ячейке где идет рассчет, или в ячейке куда подставляется с помощью ВПР, пример прилагается, зеленым выделены ячейки где нужно довести до второго ЗНАЧАЩЕГО знака, это ячейка R1 или AL1, а также бы не помешало бы что б это считалось и в ячейке T1, выделена красным цветом
Изменено: denka1982 - 17.08.2022 11:16:54
округление до второго значимой цифры в десятичной дроби.
 
ну такое случается, и дальше будет скорее всего как передать это значение в ворд не в кривом виде, можно конечно добавить столбец, но тогда рушится вся структура
округление до второго значимой цифры в десятичной дроби.
 
спасибо, работает как надо, осталось ее связать с этим вот...=ВПР(D33;R33:Y118;8;0;(((ОКРУГЛ(Y33;1-ЦЕЛОЕ(LOG(ОСТАТ(ABS(Y33);1))))), что то не соображу с этими скобками, как правильно формулу написать, на красном фоне в желтой ячейке, заранее спасибо
Изменено: denka1982 - 20.06.2022 13:44:44
округление до второго значимой цифры в десятичной дроби.
 
а куда эту формулу поставить?
округление до второго значимой цифры в десятичной дроби.
 
Подскажите пожалуйста, как сделать округление до второго значимого числа, при слиянии с ворд, или как это сделать в экселе, или в ворде, идея не в том что бы до второго знака после запятой, а именно до второго значимого знака например 5,2358 = 5,23 или 0,0001943 = 0,00019, что то типа того, в общем что б оставлял две циферки или после нулей, или после целого числа, заанее спасибо
выделение цветом нескольких строк
 
типа того, длина закрашивания не принципиальна, главное именно так что б было, документ огромный, 4 строчки дублируются, их как то выделить, что б с ними удобнее было работать, а то глаза в кучку
выделение цветом нескольких строк
 
Добрый день, стала такая вот задача, как покрасить цветом одним 4 строчки, потом другим еще 4, и так по циклу до конца листа, условное форматирование что то не справляется, можно им сделать что б была покаршена каждая 4, но не все 4, заранее спасибо
копирование с одного листа на другой при помощи диалогового окна
 
вопрос решен, но в чем была ошибка так и не понял, скорее всего связано с каким то другим форматом ячеек, вчера пытался настроить до двух значимых значений, возможно нарушил формат, сегодня вернул все как было, стало все работать, за помощь спасибо
копирование с одного листа на другой при помощи диалогового окна
 
огромное спасибо, и еще вопрос, макрос сломался, вчера работал, сегодня ошибку начал выдавать, в чем может быть причина?
Код
Sub JoinRows()
Dim rng As Range, i, item, Dict, lCol As Long, lRow As Long
    Set Dict = CreateObject("Scripting.Dictionary")
    Set rng = Application.InputBox("Выберите диапазон", Type:=8)
    For Each i In rng.Rows
        item = Application.Transpose(Application.Transpose(i.Value2))
        Dict.Add i.Row, item
    Next i
    lCol = 1
    lRow = Worksheets("то что должно получиться").Cells(Rows.Count, 1).End(xlUp).Row + 1
    For Each item In Dict.items()
        Worksheets("то что должно получиться").Cells(lRow, lCol).Resize(1, UBound(item)) = item
        lCol = UBound(item) + lCol
    Next item
End Sub
выдает ошибку в этой строчке, до этого все было норм, хз что ему не нравится
Код
item = Application.Transpose(Application.Transpose(i.Value2))
копирование с одного листа на другой при помощи диалогового окна
 
тут он копирует в пределах одного листа, а нужно по идее с одного на другой
копирование с одного листа на другой при помощи диалогового окна
 
да
копирование с одного листа на другой при помощи диалогового окна
 
не работаеть(((ругается на эту строчку
Код
Sh.Cells(Split(Sh.UsedRange.Address, "$")(4), 1).Offset(1).Resize(UBound(x), UBound(x, 2)).Value = x
копирование с одного листа на другой при помощи диалогового окна
 
Здравствуйте, подскажить такой вот ответ на такой вот вопрос, нужно написать макрос, при запуске которого открывается диалоговое окно, где можно выбрать диапазон, затем он копируется на другой лист, к последней строке, что б не было пустых строк, и что б копировались только значания, нашел два макроса, но ни один не подходит, первый всегда тупо копирует только верхнюю строчку, втрой вообще не запускается
Код
Sub macroc2()
Application.ScreenUpdating = False
Dim i As Long
i = Sheets("лист1").Cells(Rows.Count, 4).End(xlUp).Row
Sheets("лист1").Range("D16:L" & i).Copy
i = Sheets("лист3").Cells(Rows.Count, 2).End(xlUp).Row + 1 'Îïðåäåëÿåì íèæ.Ñòðîêó
Sheets("лист3").Range("A" & i).Paste
Application.ScreenUpdating = True
End Sub
Код
Sub Macro1()
    Range("A1:P1").Copy
    Cells(Application.Max(25, Cells(Rows.Count, 1).End(xlUp)(2).Row), 1).PasteSpecial xlPasteValues
End Sub
макрос 1 в принципе подошел бы, если б конечно было копирование на другой лист, или выделения всего диапазона, или выделения ячейки, в которой строчке он находится, макрос 2 теоретически тоже подойдет, но не ясно как он работает
на листе 1 идут все рассчеты, на лист 3 должны попадать только скопированные значения
Изменено: denka1982 - 17.05.2022 15:47:20
условное форматирование по нескольким условиям
 
для циферок на синем фоне, их тут 9, пока что, разделов 12 основных, сколько будет по итогу сложно сказать, ну около сотни наверно, а строк в этом документе несколько десятков тысяч, и эти циферки там будут периодически попадаться
Изменено: denka1982 - 13.05.2022 15:36:26
условное форматирование по нескольким условиям
 
в общем не получится похоже сделать это формулой, для многоуровневых списков похоже это не работает, придется ручками прописать каждое условие в отдельности((((
условное форматирование по нескольким условиям
 
вот рабочий файл, он максимально сокращен, есть столбец С в нем выбирается тип продукции, далее выбирается подтип, столбец D , автоматом подстроятся все последующие значения, выбрать ничего не получится, так как выпадающий список подвязан к внешнему файлу, в стоблце В и Y  стоят циферки, на которые стоит обратить внимание, если в выпадающем списке выберется в столбце D что то из того списка.  
условное форматирование по нескольким условиям
 
короче ничего не понимаю, вот пример, там это условное форматирование работает явно как то чудесно
условное форматирование по нескольким условиям
 
не получается что то, может это из за того что список выпадающий? тут структура документа, как она есть в рабочем документе, формулы везде одинаковые, но в нужной книге не работает
Изменено: denka1982 - 13.05.2022 14:24:59
условное форматирование по нескольким условиям
 
а если там число и текст?
условное форматирование по нескольким условиям
 
как то так
условное форматирование по нескольким условиям
 
Добрый день, подскажите пожалуйста такой момент, можно ли условым форматированием выделить ячейки, содержащие текст, но текст может быть разным, идет к примеру так 2021 2021 2023 2025 2021 2028 2025 2021 2008 2117 1970 875 2014 2014 319 , нужно выделить красным 2117, 2023, 319 это идет в столбик,или в строчку, для каждого прописывать свое условие, или как то можно одним, просто если много очень условий, то эксель тормозить начнет, 100 условий конечно можно прописать, но если есть более просто способ, был бы благодарен, заранее спасибо
скрытие числа в ячейке
 
спасибо огромное, не было верхней части макроса, хотя не понятно как он работал в примере, в общем все работает теперь
скрытие числа в ячейке
 
Цитата
написал:
В какой? В той же, где нужен результат, т.е. рабочей
да в рабочей книге, именно там где должен быть
скрытие числа в ячейке
 
выше пример, там все работает, но там другие ячейки, я так думаю, а может и нет
скрытие числа в ячейке
 
он в книге, переменная в ячейке G такая =WithOutDgt(E283)
Код
Function WithOutDgt$(s)
  Dim re: WithOutDgt = s
  Set re = CreateObject("VBScript.RegExp"): re.Pattern = "^\d+"
  If re.test(s) Then WithOutDgt = re.Replace(s, "")
End Function
Изменено: denka1982 - 12.05.2022 15:14:56
Страницы: 1 2 3 4 5 6 7 След.
Наверх