![[あすかぜ・ねっと]](/image/asukaze.png "あすかぜ・ねっと"){kind=small}
あすかぜ・ねっと[473] 連番作成について
サイトウ [2019/01/09 14:27:27]
お世話になります。
1列目に元々データが存在しており、
2列目1列目のデータが存在している行まで連番を挿入したいのですが、どのようにすればよろしいでしょうか。
1行目はタイトル行となっております。
当方マクロの知識が無い為、初歩的な質問かと存じますが、
ご教授の程、宜しくお願い致します。
Re: [473] 連番作成について
あすかぜ [2019/01/09 22:33:55]
連番はマクロを使わなくても作成可能です。下記の手順を試してみてください。
1. 連番の初期値（1）を一番上のセル（2行目2列目）に入力する
2. 連番を作成する範囲を選択する（一番下の行の2列目でShift+クリック）
3. メニューから、[編集(E)]-[連続データ(W)]-[連番作成(S)] を実行
よろしくお願いします。
Re: [473] 連番作成について
サイトウ [2019/01/16 15:40:24]
ご教授頂きありがとうございます。
連番作成単体のみを行う場合、頂いた手順で対応したいと思います。
複数の操作工程をマクロ化する際に、連番作成を組み込みたい場合、どのように埋め込めば実現可能でしょうか。
Re: [473] 連番作成について
あすかぜ [2019/01/16 23:04:47]
マクロで連番を作成するには、2通りの方法が考えられます。
1つめは、[編集(E)]-[連続データ(W)]-[連番作成(S)] をマクロから実行する方法です。
// 初期値を設定
[2,2] = 1;
// 範囲を選択
SelLeft = 2;
SelTop = 2;
SelRight = 2;
SelBottom = Bottom;
// 連番作成
SequenceS();
2つめは、for 文で繰り返し処理をしてセルの値を1つずつ設定する方法です。
for (y = 2; y <= Bottom; y++) {
[2,y] = y - 1;
}
どちらの方法でも動くと思うので、好きな方を組み込んでみてください。
よろしくお願いします。
Re: [473] 連番作成について
サイトウ [2019/01/23 10:00:53]
わかりやすくご教授頂きありがとうございます。
希望の動作をさせることができました。
ありがとうございました。