□ 戻る □VBAのサロン □ 使用方法 □ 新着記事 □ 新規に質問する！ □ トピック一覧 □ 検索 □ 過去ログ
[ 最新記事及び返信フォームをトピックトップへ ]
| 特定の個数分 行を追加する方法 | |
|---|---|
[133917] 特定の個数分 行を追加する方法- ■親トピック/記事引用/メール受信=ON■ □投稿者/ asa -(2023/08/23(09:59)) □U R L/ ①のようなデータを②のように表示する方法、関数はありますか？ ②のデータができる場所は、どこでもいいです（タブが変わってもいいです。） よろしくお願いいたします。 ① リンゴ ２ バナナ ３ ② リンゴ １ １ バナナ １ １ １ | |
[133918] Re[1]: 特定の個数分 行を追加する方法- ■記事引用/メール受信=OFF■ □投稿者/ Mike -(2023/08/23(11:58)) □U R L/ ♪迷い道クネクネ♪の非常に愚直な力技(ﾁｶﾗﾜｻﾞ)ですが、…
Sheet1
A B C D
1 果種 数 MAX
2 リンゴ 2 3 ← D2: =MAX(B:B)
3 バナナ 3
Sheet2
A B C D
1 果種 数 作業列
2 リンゴ 1 1
3 リンゴ 1 2
4 リンゴ 1 3 #N/A
5 バナナ 1 1
6 バナナ 1 2
7 バナナ 1 3
A2: =OFFSET(Sheet1!$A$2,(ROW(A1)-1)/Sheet1!D$2,)
B2: =VLOOKUP(A2,Sheet1!$A:$B,2,FALSE)/VLOOKUP(A2,Sheet1!$A:$B,2,FALSE)
C2: =COUNTIF(A$2:A2,A2)
D2: =IF(C2<=INDEX(Sheet1!B:B,MATCH(A2,Sheet1!A:A,0)),"",NA())
範囲 A2:D2 のフィルハンドルを下方にオートフィル
同範囲内の任意のセルを選択⇒Ctrl+G⇒[セル選択]⇒“アクティブセル領域”に目玉入れ⇒[OK]⇒Ctrl+C⇒Ctrl+G⇒マウスの右クリック⇒[貼り付けのオプション]直下の[123](値)アイコンをツン⇒任意のデータセルを選択⇒Ctrl+G⇒[セル選択]⇒“アクティブセル領域”に目玉入れ⇒[OK]⇒Ctrl+G⇒[セル選択]⇒“定数”に目玉入れ⇒“エラー値”以外のチェック外し⇒[OK]⇒マウスの右クリック⇒[削除]⇒“行全体”に目玉入れ⇒[OK]
オ・シ・マ・イ(ﾌｩ～) | |
[133919] Re[2]: 特定の個数分 行を追加する方法- ■記事引用/メール受信=OFF■ □投稿者/ Mike -(2023/08/23(15:54)) □U R L/ [133918]の説明「同範囲内の任意のセルを選択⇒」以降の改行を確実に再掲しておきます 同範囲内の任意のセルを選択⇒Ctrl+G⇒[セル選択]⇒“アクティブセル領域”に 目玉入れ⇒[OK]⇒Ctrl+C⇒Ctrl+G⇒マウスの右クリック⇒[貼り付けのオプション] 直下の[123](値)アイコンをツン⇒任意のデータセルを選択⇒Ctrl+G⇒[セル択]⇒ “アクティブセル領域”に目玉入れ⇒[OK]⇒Ctrl+G⇒[セル選択]⇒“定数”に目玉 入れ⇒“エラー値”以外のチェック外し⇒[OK]⇒マウスの右クリック⇒[削除]⇒ “行全体”に目玉入れ⇒[OK] | |