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

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 37 След.
Подсчёт одинаковых значений за определённый период
 
Владимир, Вариант
Код
=СУММПРОИЗВ((ЕОШ(ПОИСК(F$14;$A$2:$A$40))=ЛОЖЬ)*(ДАТА(ГОД($B$2:$B$40);МЕСЯЦ($B$2:$B$40);ДЕНЬ($B$2:$B$40))=$E15))
Только будет работать если приведете данные к 1му виду, если у вас в данных "Пакет 4,5 часа" пишется 4,5 через "," (Запятую) то и в шапке таблицы для подсчёта нужно писать так же через запятую.  
Формат даты в функции ТЕКСТ для компьютеров с разной локацией
 
manat78, Здравствуйте, тема с ответом на ваш вопрос ССЫЛКА
Форматирование текста внутри ячейки/формулы, Хочется сделать таблицу более аккуратной, но понимаю что не знаю ни одного способа.
 
Цитата
Dobshikov написал: Как вывести результат на разных строчках.
Код
="Да"&СИМВОЛ(10)&"Нет"
Цитата
Dobshikov написал: есть ли вообще способы изменять то что выводит формула, шрифты, размер текста
Нет
Количество каждой цифры в последовательности чисел от 1 до указанного числа (шаг 1)
 
Цитата
fourSTEP написал:
Но в ячейках выдает - #ИМЯ?
В формуле предложенной Игорем используется функция которая появилась начиная с MS Office 2019, ну или в офис 365. Возможно вы используете более раннюю версию.
Количество каждой цифры в последовательности чисел от 1 до указанного числа (шаг 1)
 
fourSTEP, Формула массива означает, что при вводе функции нажать не Enter, а комбинацию клавиш - Ctrl+Shift+Enter.
Объединение числа с текстом с отображением разрядности
 
Василька,  Вариант под ваш пример
Код
=ТЕКСТ(A1;"# ##0")&" "&A2

Предлагаю название темы: Сцепить число с текстом сохранив разделители групп разрядов
Выделенный текст в ячейке не окрашивается
 
Это происходит только если в ячейке число, причин не знаю, но если в ячейке текстовое значение, то хоть весь текст выделяйте, хоть часть, будет работать нормально
Изменено: Александр П. - 06.05.2021 09:23:44
Условное форматирование. Формула для сравнения производного без помещения производного в отдельную колонку.
 
Elena Tr, Вариант
Код
=СУММПРОИЗВ(($A$2:$A$64=A2)*($D$2:$D$64=D2)*$N$2:$N$64;$P$2:$P$64)>15000
Условное форматирование. Формула для сравнения производного без помещения производного в отдельную колонку.
 
Elena Tr, Вариант
Изменено: Александр П. - 30.04.2021 02:29:26
Выводить каждую четвертую строчку из столбца
 
Валентина Коршикова, Вариант
Код
=ИНДЕКС('Результаты поиска'!B:B;4*СТРОКА(A1))
Макрос блокирует возможность отмены действий, В развитие ранее заданного вопроса
 
Цитата
Эльбрус написал:
почему он блокирует (делает неактивными) кнопки отмены и возврата действий
Это нормально, после действий макроса пропадает возможность отмены действий совершенных до запуска макроса
Изменено: Александр П. - 23.04.2021 07:13:16
Заполнение данных по совпадению кадастрового номера, Требуется вставить значения в соответствии с кадастровым номером.
 
dr.loginoff, Вам поможет функция ВПР()
Вставка данных в несколько ячеек одной строки
 
Цитата
Bublee написал:
вставка данных из столбца А активной строки в столбцы с 3 по 5 этой же активной строки.
Вариант
Код
Range("C" & ActiveCell.Row & ":E" & ActiveCell.Row).Value = ActiveCell.Value
При выборе фильтрующего значения среза скрыть столбцы без значений, vba
 
Цитата
evgeniygeo написал:
так костылей никто не отменял вроде
Спасибо за пример. Никогда не сталкивался с подобной проблемой, так что ссылки в копилку  :)  
При выборе фильтрующего значения среза скрыть столбцы без значений, vba
 
Так нет событий листа которые бы срабатывали
Цитата
Михаил Л написал:
при выборе фильтрующего значения среза
из Excel в word, сохранение файла шаблона и готового фала в разные папки
 
Цитата
empty написал:
необходимо сохранять на уровень выше
Как вариант, можно получить путь к папке на уровень выше таким способом
Код
Sub test()
HomeDir$ = ThisWorkbook.Path
a = Split(HomeDir$, "\")
b = Len(a(UBound(a))) + 1
c = Left(HomeDir$, Len(HomeDir$) - b)
MsgBox c
End Sub
Выделить диапазон последней заполненной строки
 
Chubazaka, Пример:
Код
Sub test()
lrow = Cells(1, 3).End(xlDown).Row
Range("A" & lrow & ":H" & lrow).Select
End Sub
Определить ФИО по дате и номеру терминала
 
Marat Ta,
Варианты формулами:
Код
=ИНДЕКС($B$4:$B$9;АГРЕГАТ(14;6;($A$4:$A$9=I4)*(H4>=$C$4:$C$9)*СТРОКА($A$1:$A$6);1))
Код
=ГПР($B$3;$B$3:$B$9;АГРЕГАТ(14;6;($A$4:$A$9=I4)*(H4>=$C$4:$C$9)*СТРОКА($A$2:$A$7);1);0)
Копировать видимое значение (объединить значение и формат ячейки)
 
Цитата
Dualerov написал:
Можно ли каким-либо образом встроить эту функцию в код, а не в ячейку?
Можно, Например
Код
Function VisualVal_Text(rc As Range)
VisualVal_Text = rc.Text
End Function
Sub test()
MsgBox VisualVal_Text(Range("A1"))
End Sub
В диапазоне чисел нужно посчитать количество ячеек, меньше определенного значения.
 
Цитата
NAV_313 написал:
посмотрел немало материала,
А справку по данной функции решили не читать
Получить список дат и дней недели по названию выбранного месяца
 
Mershik,Тогда уж, что б как в примере было формат не "дддд" а "ддд" =)
Что первое в голову пришло, то и сваял, спасибо за вариант
Цитата
недели как-то странно работает
Это не день недели странно работает, а по умолчанию видимо Эксель считает началом недели Воскресенье
Изменено: Александр П. - 03.03.2021 09:23:26
Получить список дат и дней недели по названию выбранного месяца
 
Название: Получить список дат и дней недели по названию выбранного месяца
Вариант в приложении
Автоперенос уникальных данных из одной таблицы в другую
 
Цитата
Максим Голубченко написал:
функция ЕСЛИОШИБКА - идет по значению "если ошибка"
Простите, мне непонятно что вы хотели сказать этим.
Формула в примере - формула массива, вводится нажатием ctrl + shift + enter, возможно ваша проблема связана с этим
Автоперенос уникальных данных из одной таблицы в другую
 
Максим Голубченко, Как вариант.
Дополнительный фильтр через макро рекордер, Не срабатывает дополнительный фильтр если его записать через макро рекордер и запустить
 
lextoys,Что бы заработало вам надо:
1) В таблице с данными сделать числа записанные как текст числами
2) В таблице условий записывать дробные числа используя как разделитель целого и дробного "." (Точку) а не "," (запятую)
Изменено: Александр П. - 14.01.2021 09:09:10
Разность забитых мячей в записях 2-1, 3-4, 5-2
 
Владимир Осипов,  Почитайте статью про функцию ВЫЧИСЛИТЬ, думаю поможет.
Тему думаю можно назвать - как вычислить выражение записанное в ячейке
Копирование формул из одного отфильтрованного столбца в другой отфильтрованный столбец
 
derekT, Вариант. Немного изменил макрос отсюда, http://www.excelworld.ru/forum/2-37980-1
Код
Option Explicit

Public Sub Фильтр_Копировать_Параллельно()
Dim rng As Range
Set rng = Selection.SpecialCells(xlCellTypeVisible)

On Error Resume Next
Dim rngInput As Range
Set rngInput = Application.InputBox(Prompt:="Выберите ячейку или введите в формате A1:", Type:=8)
On Error GoTo 0

If Not rngInput Is Nothing Then
    Dim СтолбецСмещения
    
    СтолбецСмещения = rngInput.Column - rng.Column
Else
    
    Exit Sub '==>>
End If

Dim eL As Range

For Each eL In rng
    eL.Copy
    eL.Offset(0, СтолбецСмещения).PasteSpecial xlPasteFormulas
Next

MsgBox "Всё !"
End Sub
Сохранение листа в отдельный файл с именем из ячейки, Как сохранить лист из книги в отдельный файл с именем из ячейки?
 
alexexcel1990,
Код
sPath = ThisWorkbook.Path & "D:\"
Вот эту строку вы изменили неверно. естественно у вас ошибка, ибо нет такого пути
Если вам надо сохранять файл по пути "D:\"
то она должна выглядеть так
Код
sPath = "D:\"
Изменено: Александр П. - 04.12.2020 05:12:21
Сохранение листа в отдельный файл с именем из ячейки, Как сохранить лист из книги в отдельный файл с именем из ячейки?
 
Цитата
alexexcel1990 написал:
привязал макрос на кнопку
И где же тут кнопка ?) Кстати в файлах с расширениями xlsx макросы не живут, так что и макроса в файле нет.
Изменено: Александр П. - 04.12.2020 05:02:35
Сохранение листа в отдельный файл с именем из ячейки, Как сохранить лист из книги в отдельный файл с именем из ячейки?
 
alexexcel1990, ещё раз, приложите файл пример с ошибкой.
Mershik, судя по первому сообщению у ТСа версия 2007 или выше, должно работать без проблем.
Изменено: Александр П. - 03.12.2020 10:02:33
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 37 След.
Наверх