Excel - Показать дату (месяц до даты)

Question

Я хочу вставить колонку с датой в свой лист.Но я только хочу отображать данные из года в год и могу обновляться автоматически.Например: в этом столбце даты будут отображаться данные с 01.01.08 по сегодняшний день (06.06.2008), а затем с 01.01.2017 по 06.06.2008 завтра (автоматически).

ЕслиВы знаете эту функцию, пожалуйста, помогите мне!

Большое спасибо.

Answer 1

Вот решение VBA, если интересно.Вставьте следующий код в объект ThisWorkbook в Visual Basic Editor, нажав (Alt + F11):

Option Explicit

Private Sub Workbook_Open()
    Dim wks As Excel.Worksheet
    Set wks = ActiveWorkbook.Worksheets("Sheet1")  '''Change to name of worksheet.

    Dim rng As Excel.Range
    Set rng = wks.Cells(Rows.Count, 1).End(xlUp)  '''Change column if necessary (ex. column h = 8).

    Dim iCount As Integer
    Dim i As Integer

    If Not rng = Date Then
        iCount = Date - rng.Value
        For i = 1 To iCount
            rng.Offset(i, 0).Value = rng.Value + i
        Next i
    End If
End Sub

Этот код будет запускаться каждый раз, когда вы открываете книгу.Даже если вы не открывали его в течение нескольких дней, он все равно будет увеличивать каждую строку в столбце A на одну единицу от последней записанной даты.Просто введите дату в ячейку A1.Формула не нужна.Вам нужно будет сохранить файл с расширением .xlsm (книга с поддержкой макросов).Надеюсь, это поможет!

Answer 2

Некоторые предположения изменяются по мере необходимости: Столбец с датами - это столбец A. Первая дата находится в ячейке A1. В первой ячейке, которая должна быть началом года, введите следующую формулу, она будет обновляться каждый год:

=DATE(YEAR(TODAY()),1,1)

Затем под этим введите следующую формулу и перетащите вниз:

=IF(A1="","",IF(A1=TODAY(),"",A1+1))