増える繰り返し文が作れない

Question

Excelでゲームのエミュレータを作っています
レベルが1上がるごとにポイントが3つ貰えて、レベルが3上がるごとに貰えるポイントが1増える式を作りたいです

最終目標は参照したセルに書いてある数字(レベル)が5ならポイントは18、8ならポイントは33と表示されるようにしたいです

調べた範囲ではREPT関数を使うのかなと思っていましたが、それだけだと増える分のポイントの計算で詰まってしまいます

よろしくお願いします

Answer 1

みんな大好きごり押しタイムはっじまっるよ～。(夜中のテンション)

A1:元のレベル
C1:=ROUNDDOWN(A1/3,0)
D1:=C1+3
E1:=(1+D1)(D1/2)
F1:=E1-1-2
G1:=F13
H1:=G1-D1*(2-MOD(A1,3))
I1:=H1-3

Answer 2

Excelが標準で備えている関数で行うのは難しいと思うので
指定されたレベルのポイントを返す関数を作るのはいかがでしょうか？

Function Point(level As Integer) As Integer
    If level = 1 Then
        Point = 3
    Else
        ' 現在のレベルでのポイントに、1つ下のレベルのポイントを足してリターン。
        ' Int(level/3)で何回取得ポイントアップが回数
        ' +3はLevel1からもらえるポイント
        Point = Int(level / 3) + 3 + Point(level - 1)
    End If
End Function

(Levelが0や、マイナスの対応を入れていないので適宜対応が必要です)

Excelの関数のみで作成した場合、再帰的な表現が難しいと思いますので
各レベル毎に取得するポイントと累計ポイントを数式で算出し、Vlookupで参照することで
該当レベルでのポイントを算出できるものも作成してみました。
この場合、参照する可能性のあるレベルすべてを表にする必要があります。