У меня есть следующая функция:
Function myFunc() As String
Application.Volatile
Dim i As Long, lTotal As Long
For i = 3 To 10
If Range("H3").Value = Cells(i, 2).Value And Range("I3").Value < _
Cells(i, 4).Value And _
Range("I3").Value >= Cells(i, 3).Value Then
lTotal = Cells(i, 5).Value + lTotal
End If
myFunc = lTotal
Next i
End Function
Я хочу, чтобы эта функция автоматически заполнялась при перетаскивании ее вниз по столбцу.Как я могу это сделать?
[Редактировать] Прикрепленное изображение.Рассматривайте таблицу Dasboard как отдельную таблицу, в которой вводятся записи вручную.Рассматривайте таблицу журнала как таблицу продолжения, в которой хранится запись каждого часа для каждой даты.Записи из таблицы Dashboard публикуются в таблице журнала.Я использую эту функцию в выходной столбец в таблице журнала.Я хочу иметь возможность перетащить его вниз, чтобы заполнить таблицу журнала.