- 締切済み
VBAで同じブック内の別シートの列を結合する方法
sakenomoの回答
- sakenomo
- ベストアンサー率52% (35/67)
sheet1 列A B sheet2 列A B ↓ sheet3 列ABCD の場合ですと、 Sub test2() Sheets("Sheet3").Columns("A:B").Value = Sheets("Sheet1").Columns("A:B").Value Sheets("Sheet3").Columns("C:D").Value = Sheets("Sheet2").Columns("A:B").Value End Sub でしょうか。Copy、.Pasteメソッドを使う方法も考えられます。21:10のご質問の様な場合もそうですが、一度記録マクロでいろいろ試してみられることをおすすめします。
関連するQ&A
- Excelで複数のシートの結合の仕方を教えて下さい
複数(30)のブックにa、b、c・・・というシートがあり、a、b、c・・・シートはA列から始まっていて、A列に列見出しがあり、同じ列には同じ種類のデータが入力されている時に、複数のブックの各aシートを、新しく作ったブック31のyシートに結合するVBAを教えて下さい!!! よろしくお願いします!!
- 締切済み
- オフィス系ソフト
- VBAで別ブックからVLOOKUPで抽出
ブックBシート1A列の値にマッチする値をそれぞれの列にVLOOKUPでブックAシート1にある値から貼り付けたいのですがVBAコードが解る方宜しくお願いします。尚、データーが50行ぐらいあるのですが。
- ベストアンサー
- Visual Basic
- excel セルの結合を条件付で自動にて行う方法
どなたかご存知の方いらっしゃいましたら教えてください。 例) 1つのbookに1シートがあり、A1,A2のシートが結合されていた場合のみB1,B2を結合する。といった感じでA列の結合状態によってB列同行を結合するといったマクロはどのようにすればよいのでしょうか?
- 締切済み
- その他(業務ソフトウェア)
- エクセル2つのブック列の比較 VBAや関数について
Aと言うブックとBと言うブックがあるとして、 Aのブックは共有ファイルではなく、Zサーバー上にあるエクセルファイルです。 Aのブックに色々な人が行の挿入、商品名の書き換え等をしていて、いつ挿入されたのかが分からないため、VBAや関数を使って調べたいのですが、 Aのブックは10シートあり、サイズ別で行も並べられているため、新しい情報を特定するのが困難です。 BのブックはAと同じシート名を作り、必要箇所だけコピーしているデータです。(オリジナルブック) やりたいことは、Aのブックから探してBのブックに追加されていない情報、一致していない情報があれば、色を付けてわかりやすくするか、Bのブックの新しいシートに結果を出すようなことがしたいのですが、可能でしょうか? AのブックはA列-IC列まであるのですが、必要な部分は全シートB列(商品コード)とE列(商品名)のみです。 Bのブックには同じシート名にして、A列に商品コード、B列に商品名としております。 AのブックのB列、E列を参照して、BのブックのA列、B列になければ、結果を表示したいです。 もし出来る方法があれば、教えてほしいです。 今はシートごとに左右比較して、見ていってるのですが、10シートの中に、行数は2000行くらいあるため、それで半日おわってしまいます。 もし分かるかた、マクロを組める方がいれば教えて頂きたいです。宜しくお願い致します。
- ベストアンサー
- Visual Basic
- (VBAにて)列のセルの結合について
VBAを使って列の結合を行うとしています。 内容は ・A3とA4を結合~A59とA60を結合(60まで) という具合に、セル2つで一つの組み合わせです。 ・これが列単位にA列~Y列まで同じように行おうとしています。 ・一つ一つマクロで記述するとえらい手間がかかるので 簡略するマクロ文は無いでしょうか? ・また、この作業はsheet3で行おうとしています。 内容はsheet1に書かれていまして、 (A4~Y4までが1レコードでA20~Y20まであります。) マクロで普通にsheet3にコピーをすると1レコード目の後に 2レコード目が飛んで3レコード目が次にきてしまいます。 ・これはどうすればよいでしょうか? 素人であまりよく分かりません ご教授宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- 別bookのシート名一覧を作成するVBA(都度)
初めまして。エクセルVBA初心者です。 別bookのシート名を取得するマクロをつくりたいのですがご教示頂けないでしょうか? その際、マクロを実行すると最初にどのbookを開くか?ファイル場所を聞いてくるマクロを設計したいのです。 その後、今開いているアクティブbookのA列の1行目に別bookのシート名一覧が入力されるというものです。 ファイル場所を聞いてくるマクロは調べてもでてこないため、質問しました。 完了したら別bookは閉じてある状態であることが理想です。 そして、その隣のB列はまたさらに他の別bookのシート名一覧を比較用に入力予定ですので、B列用の別マクロを続きで作成したいと思っています。 ご教示のほど宜しくお願いします。
- ベストアンサー
- Excel(エクセル)
- EXCEL VBA 別シートの文字をシート内で検索
excel2003 VBAで SHEET2に格納されているセルの文字をSHEET1のB列1~9000程度までの文字列の中で一致または部分一致するものがあればそのセル(B列のセル)をSHEET3に順次A列に出力したいのですが、うまくできません。SHEET2に格納されている場所はA列で(SHEET1、SHEET2の文字とも増える可能性あり) 宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルで別ブックを検索するマクロ、VBA
エクセルで以下の処理を行えるマクロを作成したいです。 当方、マクロについてほとんど知識がありません。 恐縮ですが、教えていただけると嬉しいです。 ・主にしたいこと [検索]ブックで一致するコードを探して、 [結果]ブックの対応するコードの行にそれぞれの項目を返したい。 ●ブック1 [検索] シートが12個あります(それぞれ、1、2、3…12というシート名=1~12月分) ↓各シートの内容 A B C D 1 氏名 数値 コード 内容 2 abc 111 SS1234 あいうえお 3 bcd 123 SS3456 かきくけこ ・ ・ ・ といった感じです。 12個のシートの中身はそれぞれ似たようなものですが、 「コード」や「内容」などは少しずつ違います。 ●ブック2 [結果] ↓シートの内容 A B C D 1 氏名 コード 内容 数値 2 SS3456 3 SS1234 ・ ・ ・ といった感じです。 (注)検索用ブックとは列の並びが異なっています。 ここでやりたいことの詳細ですが、 ・[結果]ブックの「コード」(B列)にコードを入力すると、 [検索]ブックで一致するコードを検索し、 A列「氏名」、C列「内容」、D列「数値」に、[検索]シートの内容を 自動的に表示させたい。 (ただし[結果]ブックに入力した「コード」は、[検索]ブックの1~12のうち、 どのシートにあるかわからない) ・入力したコードが見つからない場合は何も表示しない。 ということです。 最初VLOOKUP、MATCH等の関数で表示することを考えましたが、 シートが複数にまたがっているのと、 列の並び方が[検索][結果]ブックで違うのでわかりませんでした。 長くなってしまい申し訳ありませんが、どうかおしえてください。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 異なるブックを結合した時のセル参照
excel2003 異なるブックを結合した時に、セルの値を参照する方法を教えてください。 条件は、下記の通りです。 a.xlsのsheet1のA1セルのセル名称をnameとします。 b.xlsのsheet2のA1セルで=nameとします。 aとbのファイルを結合した時、a.xlsのsheet1のA1セルに何か文字列…(1)を入れた時、 sheet2のA1セルで(1)の文字が参照できる様にしたい。 同一ブック内で上記の内容実施時は、sheet2のA1セルでsheet1のA1セル参照可能ですが、 ブックを結合した時、excelの仕様なのか、 #REF!と表示されてしまいます。 最初から一緒になったファイルで作成すれば問題ないのですが、 aのファイルは共用なので、使用する時に結合する構成としているのです。 異なるブックを結合して上記の対応が可能になる方法はないものかどうか、 何か、他の代案はないかアイデアいただきたく。
- ベストアンサー
- Excel(エクセル)
- 複数のブックのデータを1枚のシートにまとめるマクロ
同じような質問は過去いくつかございますが、下記の条件を満たすことができず、 大変苦戦しております。 <条件> 1.フォルダ内すべてのエクセルで作成されたブックを、ブック名「全部」のsheet1に結合する。 2.結合するブックにはシートが複数あり、すべてのシートを結合するわけではなく、 シート名「社員」の、指定した範囲内「a10:t100」を結合する。 3.ブック名「全部」のsheet1のa列には結合元のブック名を表示する。 ご教授いただければ幸いでございます。 どうかよろしくお願いいたします。
- 締切済み
- その他MS Office製品