- ベストアンサー
MS-excel 10列毎に改行したい
tom04の回答
No.4です。 補足に ＞与えられるファイルによって100列以上のものがあったりします。 とありましたので・・・ データは1行目のみあり、何列あっても対応できるようにしてみました。 Sub test2() Dim i As Long Application.ScreenUpdating = False For i = 11 To Cells(1, Columns.Count).End(xlToLeft).Column Step 10 Range(Cells(1, i), Cells(1, i + 9)).Cut Cells(Rows.Count, 1).End(xlUp).Offset(1).Select ActiveSheet.Paste Next i Application.ScreenUpdating = True Cells(Rows.Count, 1).End(xlUp).Offset(1).Select End Sub こんなんではどうでしょうか？m(_ _)m
関連するQ&A
- データ エクセルの改行
いつもお世話になります。 取引先からあるデータをエクセルで頂きましたが、それはA列に１行～８０００行まであるデータでした。それをそのまま印刷しようとすると、Ａ４用紙で60枚以上になり大変です。A列にしかないので指定した行で改行し１ページにそのデータをなるべくまとめて印刷したく思います。 １ (株)Ａ社 ２ (有)ｂ社 ３ (株)ｃ社 ４ ｄ商店 ５ ｅ商事 ｜ ・・・・ ７９９８ ｆ会社(株) ７９９９ ｇ社 ８０００ ｈ商店 マクロ組むしかないでしょうか？それしかないならマクロ初心者の私にも出来る方法あれば本あるいはＨＰ教えていただけないでしょうか？ よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 「1列に500行並んだデータを5列毎に改行」の逆
いつもお世話になります。 http://okwave.jp/qa/q7073912.html これの逆に近いことができる関数がわかる方いらっしゃいますか？ 図にすると、下記のような状態です。 A１ B１ C１ D１ E１ F１ A２ B２ C２ D２ E２ F２ ・・・・・・ A１００ B１００ C１００ D１００ E１００ F１００ のようにデータを入力していくと G1＝A１ G2＝B１ G3～ G4 G5 G6＝F１ G7＝A２ ： ： G１００００ というような感じで、自動的にデータがコピーされていくような感じです。 入力済みのデータではなく、 入力していくと、データがコピーされて反映されていくような感じです。 この状態にできるG列の数式がわかる方がいらっしゃいましたら、 お知恵をお貸し頂けましたら幸いです。 よろしくお願い致します。
- ベストアンサー
- Excel（エクセル）
- エクセルで1列に500行並んだデータを5列毎に改行
エクセル2000で、A１～A500までデータが縦並びに入力されています。 これを5列毎に改行して、横並びのデータに加工したいのですが、何か方法ありますか？ 図解すると、、 A1 A2 A3 A4 A5 A6 A7 ： ： A500 のデータを A1 A2 A3 A4 A5 A6 A7 A8 A9 A10 ・・・・・・ A496 A497 A498 A499 A500 と したいのです。 何かよい方法ありましたらお教え願います。
- ベストアンサー
- オフィス系ソフト
- Excelの移動しない列
Excelで表示されている列が左から A B C D E F ... のとき，右方向にスクロールさせると表示領域が B C D E F G ... (Aが左に消える) C D E F G H ... (Bが左に消える) と変化していきます． ここで，Aをスクロールアウトさせない方法を知りたいと思っています．大きな表を作成したときに，表のどこを見ていても各列が何を表しているかを知りたいからです． 具体的には，右方向にスクロールさせたときに最初に消えるのがAではなく， A C D E F G ... (Bが消える) A D E F G H ... (Cが消える) という変化をさせたいと思っています． どうすればいいのでしょうか．
- ベストアンサー
- オフィス系ソフト
- エクセルの条件文で抽出したセルに改行を入れたい
条件文で作成した文字列内に改行を入れる方法を教えてください。 下記のようなエクセル（以後、数百行あります）があり、○がついているところの１行目にある文字をＫ２セルに入力したいと思います。 Ａ Ｂ Ｃ Ｄ Ｅ Ｆ Ｇ Ｈ Ｉ Ｊ Ｋ １ あ い う え お か き く け こ ２ ○ ○ ○ ○ ○ ３ ○ ○ ○ ○ Ｋ２セルには、○印のついている あ え き け こ と改行して出力されるように関数を組むにはどうしたらいいのでしょうか？ =IF(A2=○,A1&"","")&IF(B2=○,B1,"")&IF(C2=○,C1,"")&IF(D2=○, D1,"")&IF(E2=○,E1,"")&IF(F2=○,F1,"")&IF(G2=○,G1,"")&IF(H2=○,H1,"")&IF(I2=○,I1,"")&IF(J2=○,J1,"") と入力してみましたがうまくいかず、これではうまくいったとしても 改行なしで あえきけこ と出てしまう気がします・・・。 一晩悩みましたがどうしてもうまくいかないのでどなたか教えてください。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- Excelマクロ 表の書き換え方法教えてください
2日くらいあれこれやってみたのですが、全くできないためお教えいただけますでしょうか。 1 2 3 4 5 6 7 A a b c d e f g B h i j k l m n C o p q r s t D u v w x y z （以下続く） 注）A1セルは空白、1、a、h、o、uは同じ列になります という表（Book1.xls）を下記（Book2.xls）へ変更するマクロを作りたいと思っています。 A 1 a A 2 b A 3 c A 4 d A 5 e A 6 f A 7 g B 1 a B 2 b （以下略） Book1の行数は任意、1～7は固定、abcde…は空白セルもあります。 いいマクロがありましたらぜひご教授ください。 よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- Excel2007のマクロで文字列を結合
Excel2007のマクロで文字列を結合したいのですがうまくいきません。 １、セルA1からU1までデータが1つずつ入ってます。 ２、１のデータを3列ずつ結合してA3からG3にコピー。 例えば、セルA1あ、B1い、C1う、D1え、E1お、F1か、ならセルA3あいう、セルB3えおか、のようにマクロで一機にできるソースをお願いします。
- ベストアンサー
- その他（プログラミング・開発）
- エクセル特定の列で改行。
エクセルでシート保護をすると、ロックしていないセルにはTABキーで進みます。 しかしTABキーは列方向（横方向）に進んでしまいます。ある特定の列で改行出来るでしょうか？ たとえばTABキーでA1、B1、D1に進み次はA5、B5、D5に次はF1、H1、K1といった感じです。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルにて複数セルの並び替え
こんにちは、エクセルについて教えてください。列はA～Hまで、行は1～200行ほどに値が入っています。 例えばValueが以下のようだとします。 A1 B1 C1 D1 E1 F1 G1 H1 A2 B2 C2 D2 E2 F2 G2 H2 ... これらのValueを、別のSheetに以下のように並び替えたいのですが、 A1 B1 C1 D1 E1 F1 G1 H1 A2 B2 C2 D2 E2 F2 G2 H2 A3 B3 ...と、これがA200～H200の行分まで。なのでPaste後は800行になります。どうにかマクロか何かで簡単に 出来ないかと思い、どなたかご教授いただければと思います、よろしくお願いします！
- ベストアンサー
- オフィス系ソフト
- エクセル ３列おきに列を挿入したい
いつもお世話になります。 1行目に営業所コードがあり、そのコードを３列おきに表示するにはどうしたらいいでしょうか。 Ａ Ｂ Ｃ Ｄ Ｅ Ｆ Ｇ Ｈ Ｉ Ｊ 2 3 4 5 7 8 11 12 14 15 ↓ Ａ Ｂ Ｃ Ｄ Ｅ Ｆ Ｇ Ｈ Ｉ Ｊ 2 3 4 5 営業所コードは2～150の数字で、100ほどの営業所コードが存在します。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
お礼
お見事っ！ 有難うございました。m(_ _)m