ID非公開

2022/7/1 2:41

55回答

エクセル初心者です。

ベストアンサー

0

その他の回答(4件)

0

Excel365 や 2019、2021 のスピルするバージョンでしたら A1 セルの数式 =MOD(SEQUENCE(8000,1,0),6)+1 これ 1つだけで出来ます。 バージョンが不明でしたので、非対応でしたらすみません。 無料の Web版 Excel でこの数式が使えるので、そちらで 8000行分までの繰り返す数値を生成しておき、入力が必要なファイルへコピペという方法も可能です。

0

同じ操作をまたするならマクロを作成しておけばこれより確実で速い操作は無いです。 ショートカットに登録しておけば1秒もかからないです。 又、マクロの作成の仕方によって範囲を問答形式にしたり選択形式にして可変に出来るので便利ですね。 以下のコードは範囲が今回の質問のセル範囲と同じです。 Sub 繰り返し() Range("B1:B6").AutoFill Range("B1", Cells(Rows.Count, 1).End(xlUp).Offset(0, 1)), xlFillCopy End Sub

0

他の人と敢えて違う方法を書いときます。 この手法の良いところは、ABCや16進にも対応できるところです。 B1~B6まで1~6を入力します。 B7に「=B1」と入力します。 B7をコピーします。 名前ボックスにB8000を入力し、エンターキーを押下します。 B8000に選択が飛んだはずなので、Shift+Ctrl+↑キーを押下します。 貼り付けます。 数式が不要なら、B列を選択し、コピー&値で貼り付け。

1

名前ボックスにB1:B8000と入力し、Enter (B1:B8000セル選択される) B1セルがアクティブになっているのを確認して数式バーに =MOD(ROW()-1,6)+1 て入力してCtrl + Enterキーで確定 数式が不要ならコピーして、値貼り付け を行う

1人がナイス!しています