2019年7月10日水曜日

sql DATE_ADD

select DATE_ADD('2019-01-31', INTERVAL + 1 MONTH);
2019-02-28

select DATE_ADD('2019-01-30', INTERVAL + 1 MONTH);
2019-02-28

select DATE_ADD('2019-01-29', INTERVAL + 1 MONTH);
2019-02-28

select DATE_ADD('2019-01-28', INTERVAL + 1 MONTH);
2019-02-28

select DATE_ADD('2019-01-27', INTERVAL + 1 MONTH);
2019-02-27

2019年7月2日火曜日

2019年7月1日月曜日

vlookupではできない、範囲指定のカスタマイズ関数

Function vlookups(val As Range, min As Range, max As Range, col As Range) As String
Dim cl As Range
For Each cl In min
    If val.Value >= cl.Value And val.Value <= cl.Worksheet.Cells(cl.Row, max.Column) Then
        vlookups = cl.Worksheet.Cells(cl.Row, col.Column)
        Exit For
    End If
Next
End Function
使い方: =vlookups(E4,$A$1:$A$4,$B$1:$B$4,$C$1:$C$4) 結果: