VBA͌lpƂč쐬ꂽՂWT[N`FbNpvOłB
gp@Ȃӓ_悭ǂ񂾂ł肢܂B


ygz
PD`FbNT[NA[check]̃ZyȊOzœhԂĂB

QD̍ہAЕz̃f[^Ȃǂ̓V[guXgvɋLĂB
@@ (V[gu`FbNXgv̕ɋLƁAXg㏑鎞ɗOȂ܂Bj

RDuXg쐬v{^ĂB
@@i̎Au}N̐ݒLɂvYȂ悤ɁBj

SD΂炭΃Xgł܂B
@@܂Ōlp̓ˊVBAȂ̂ŏ͒xłB

TD̂܂܃XgȂȂȂ肵ĂB

s̒ǉȂǂł܂A̍ۂɒǉŝ`ɂFYȂłB
@FYƁAǉsXgɔf܂B

̐ł킩ȂΓSSĂB


yT[NHP̏Cɂāz
Z̐FuFFNǉvugFNCvƂȂĂ܂B
2/7݁A400T[NHPǉC120T[NHPC[ړ],J,N؂etc...]
c̖680T[Ni܎̃Xy[Xǰ͑ł؂܂B

NǉECD揇ʂ́A
@lHPpixivcircle.msî݌J͏OjtwitterƂȂĂ܂B
@mixijRjR̃R~jeB́A
@炠郊NA݂ĂĂOĂ܂̂łB


y̗\z
EꕔႤWŕ\LĂ̂ŏC
EuLPvuQvuvƁuCLvŕ\L
@iex.T[NJbg~AꍇAugفvu~AvƂɁj
@@WLu\vɂȂĂ̂ŏC
EWׂ̗ɍځuR-18vǉ
E2/23炢ōXVł؂
c


y̑z
̃vOɂĐsȂǂ̐ӔC͈؎܂B
ǂȂǂ͂RɂǂB

J^O͐΍wĂB





Ey
VBAFor`to\̐l悻500T[N(500s)`FbN̂Ɖ肵Ă܂̂ŁA
̍DȒlɂĂΏ͌yȂ͂łB
ʂ200炢ŏ\Ǝv܂B

    For N = 2 To 500yz
        For M = 1 To 13
            Sheets("`FbNXg").Cells(N, M).Interior.ColorIndex = xlNone
            Sheets("`FbNXg").Cells(N, M) = ""
        Next M
    Next N