□ 戻る　 □VBAのサロン　 □ 使用方法　 □ 新着記事 　□ 新規に質問する！　 □ トピック一覧　 □ 検索 　□ 過去ログ
[ 最新記事及び返信フォームをトピックトップへ ]
このトピック参照回数 :
連続したデータを、複数回繰り返す連続したデータに変換したい

    [134221] 連続したデータを、複数回繰り返す連続したデータに変換したい-

    ■親トピック/記事引用/メール受信=OFF■

    □投稿者/ とばっち -(2024/01/12(15:27))
    □U R L/

      連続したデータを、任意の回数繰り返す連続したデータに変換したいです。
      手軽な方法があればご教示いただけますと幸いです。
      何卒宜しくお願いします。


      例
      A,B,C...のような並びデータを、
      A,A,B,B,C,Cのように並び替えたデータにしたいです。

      イメージ
      A　→　A
      B　　　A
      C　　　B
      D　　　B
      E　　　C
      C
      D
      D
      E
      E




      ++++++++++++++++++++
      OS      ⇒OTHER
      Version⇒OTHER
      ++++++++++++++++++++



    [134222] Re[1]: 連続したデータを、複数回繰り返す連続したデータに変換したい-

    ■記事引用/メール受信=OFF■

    □投稿者/ メジロ -(2024/01/13(09:01))
    □U R L/ 
      B1: =INDEX($A$1:$A$10,ROUNDUP(ROW(A1)/2,0))
下にコピーします。
エラー処理等はしていません。

「エクセルの学校」にも同じ質問をしていませんか。



    [134223] Re[2]: 連続したデータを、複数回繰り返す連続したデータに変換したい-

    ■記事引用/メール受信=OFF■

    □投稿者/ かんたんレシピ -(2024/01/13(10:17))
    □U R L/ 
       イメージはこうですか？

	A	B
---------------------
1	A	A
2	B	A
3	C	B
4	D	B
5	E	C
6		C
7		D
8		D
9		E
10		E

365なら「学校」の回答でできるでしょう。

＞=TOCOL(IF(SEQUENCE(1,3),A1:A3,""))
2個ずつの繰り返しなら SEQUENCE(1,2) です。
　
B1：=TOCOL(IF(SEQUENCE(1,2),A1:A5,""))
コピーしなくてもスピルします。

＞任意の回数
繰り返しの回数をC1セルに入力
B1：=TOCOL(IF(SEQUENCE(1,C1),A1:A5,""))
 
ちなみにここはマルチポスト禁止です。



    [134224] Re[3]: 連続したデータを、複数回繰り返す連続したデータに変換したい-

    ■記事引用/メール受信=ON■

    □投稿者/ Mike -(2024/01/13(16:38))
    □U R L/ 
      　 A B C D E F
1　5　 2 3 4 ←A1: 文字数、C1:E1 繰返し数
2　A　 A A A ←C2: =IF(ROW(A1)>$A$1*C$1,"",OFFSET($A$2,(ROW($A1)-1)/C$1,))
3　B　 A A A　 セル C2 を右方＆下方にズズーッとオートフィル
4　C　 B A A
5　D　 B B A
6　E　 C B B
7　　　C B B
8　　　D C B
9　　　D C B
10　　 E C C
11　　 E D C
12　　　 D C
13　　　 D C
14　　　 E D
15　　　 E D
16　　　 E D
17　　　　 D
18　　　　 E
19　　　　 E
20　　　　 E
21　　　　 E
22



このトピック内容の全ページ数 / [0]

このトピックに書きこむ
Name/
E-Mail/

└>このツリーのレス記事をメールで受信しますか? YES/ NO/
Title/
URL/
Comment/ 通常モード->　 図表モード-> (←の場合適当に改行を入れて下さい)
タグが使用できます。例 ⇒ <font color="blue">文字</font>
解決！！ありがとうございました！ 解決       保留中です・・・ 保留        迷宮入りorほかあたって見ます・・ 迷宮入       すいませ〜ん。誰か〜！ Help! ←※回答者専用
解決したらチェック       保留(コードテスト中など・・)         解決不可orレスが全く付かなくてほかのサイトに行くときなど・・
削除キー/
(半角8文字以内)　

- Child Forum -
Edit:ゆう-Ｇ