• Как отфильтровать таблицу с данными в ЭКСЕЛЬ и вывести результат на другой лист?

    Hollib
    @Hollib
    Вы можете использовать формулу FILTER в Excel для фильтрации таблицы с данными и вывода результата на другой лист. Однако, формула FILTER не поддерживает прямую работу с таблицами. Вместо этого, вы можете использовать формулу FILTER в сочетании с функцией INDIRECT для фильтрации данных в таблице.

    Создайте новый лист, на котором будет отображаться отфильтрованная таблица.

    В ячейке B3 на новом листе введите дату, по которой вы хотите отфильтровать данные.

    В ячейке A1 на новом листе введите формулу:

    =FILTER(INDIRECT("Expenses"), INDIRECT("Expenses[date]") < B3)

    Эта формула использует функцию INDIRECT для ссылки на диапазон данных на листе Expenses. Затем, формула FILTER фильтрует данные, используя условие, что значение в столбце "date" меньше значения в ячейке B3.

    Нажмите Enter, чтобы применить формулу. Теперь вы увидите отфильтрованную таблицу данных на новом листе, основанную на заданной дате.

    Обратите внимание, что в формуле использованы косые скобки ({}) вместо квадратных ([]), чтобы обратиться к столбцу "date". Это синтаксис массивов в Excel.
    Ответ написан
    1 комментарий
  • Где глобально устанавливаются настройки языка в Microsoft office?

    Hollib
    @Hollib
    Настройки языка в Microsoft Office можно изменить в разделе "Язык" настроек приложения. Вот как это сделать в Excel 2013:

    Откройте Excel и выберите вкладку "Файл" в верхнем левом углу.
    В открывшемся меню выберите "Параметры".
    В окне "Параметры Excel" выберите раздел "Язык".
    В разделе "Язык приложения" выберите нужный язык из выпадающего списка.
    Нажмите "ОК", чтобы сохранить изменения.
    Убедитесь, что выбранный язык соответствует русскому языку (например, "Русский" или "Russian").

    Также, убедитесь, что в настройках Windows 10 язык системы и формат времени и даты установлены на русский язык. Для этого:

    Откройте "Параметры" Windows 10, нажав на значок "Пуск" и выбрав шестеренку.
    В открывшемся окне выберите раздел "Время и язык".
    В левой панели выберите "Регион".
    Убедитесь, что в поле "Страна или регион" выбрана "Россия" и в поле "Язык" выбран русский язык.
    Нажмите "Применить" или "Сохранить", чтобы сохранить изменения.
    Если после изменения настроек языка в Office 2013 проблема с кодировкой в CSV файле все еще остается, возможно, вам потребуется использовать другой формат сохранения, который поддерживает русские символы, например, UTF-8.
    Ответ написан
    Комментировать
  • Как сказать vba userform в excel, если данные не введены в строку возьми их из ячейки?

    Hollib
    @Hollib Автор вопроса
    Смог решить проблему таким методом:
    Данная функция срабатывает вторая при условии нажатии на кнопку. она записывает те данные в ячейку, которые вы вписали в userform TextBox1
    Private Sub CommandButton4_Click()
      With UserForm1
        Range("A3").Value = Me.TextBox1.Value
      End With
    End Sub

    ---------------------------------------------------------------------
    Первым делом срабатывает эта функция, она читает данные в ячейках и вносит их в строку в строку ввода userform.
    Private Sub UserForm_Initialize()
    Dim adr, str
        str = ActiveCell.row
        adr = "A" & str
        TextBox1.Value = Range("A3").Value
    End Sub


    Изложил как сам понял, извините зеленый в этом деле.
    Но свою проблему решил :)
    Ответ написан
    Комментировать
  • Как сделать Сокращение Полного Фио до первых букв на языке VBA?

    Hollib
    @Hollib Автор вопроса
    Еще такой способ нашел,
    Может кому поможет
    Sub inicial2FIO()
    Dim fulname
    Dim FIO
    Dim i
        fulname = Cells(3, 2) ' Ячейка для полного ФИО
        FIO = Left(fulname, InStr(1, fulname, " "))
        fulname = Right(fulname, Len(fulname) - Len(FIO))
        FIO = FIO & Left(fulname, 1) & "."
        fulname = Right(fulname, Len(fulname) - InStr(1, fulname, " "))
        FIO = FIO & Left(fulname, 1) & "."
        Cells(3, 19) = FIO ' Ячейка для результата ФИО
    End Sub


    Вы можете выбрать строку и ячейку ввода полного ФИО и результат вывода сокращенного ФИО
    Cells(3, 19) = FIO.
    Где 3 это номер строки, 19 номер ячейки.
    Ответ написан