このトピックに書きこむ |
---|
Re[7]: 二つのテーブルをマッピングして特定のファイル(Excel)に特定のセルを転記する方法 | |
---|---|
[194727] Re[7]: 二つのテーブルをマッピングして特定のファイル(Excel)に特定のセルを転記する方法- ■記事引用/メール受信=OFF■ □投稿者/ 匿名 -(2022/02/08(19:46)) □U R L/ 解決したら、解決にチェックを入れましょう。 又、マルチポストをされているので、 他の掲示板にも解決したことを報告してください。 そうしないと、回答が付きにくくなりますよ。 |
[194718] Re[6]: 二つのテーブルをマッピングして特定のファイル(Excel)に特定のセルを転記する方法- ■記事引用/メール受信=OFF■ □投稿者/ トマト -(2022/02/06(10:36)) □U R L/ マナーさん 転記できました! 稚拙な質問にご丁寧にお答えいただきまして 誠にありがとうございました。 |
[194717] Re[5]: 二つのテーブルをマッピングして特定のファイル(Excel)に特定のセルを転記する方法- ■記事引用/メール受信=OFF■ □投稿者/ マナ -(2022/02/05(22:38)) □U R L/ 一例です Option Explicit Sub test() Dim 転記先WB As Workbook Dim 転記先WS As Worksheet Dim 転記元WS As Worksheet Dim 転記DATA As Range Dim j As Long, k As Long Set 転記先WB = Workbooks("Template.xlsx") Set 転記元WS = ThisWorkbook.Worksheets("Sheet1") Set 転記DATA = 転記元WS.Range("A1").CurrentRegion For j = 3 To 転記DATA.Rows.Count Set 転記先WS = 転記先WB.Worksheets(転記DATA(j, 1).Value) For k = 2 To 転記DATA.Columns.Count 転記先WS.Range(転記DATA(2, k).Value).Value = 転記DATA(j, k).Value Next Next End Sub この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他 |
[194716] Re[4]: 二つのテーブルをマッピングして特定のファイル(Excel)に特定のセルを転記する方法- ■記事引用/メール受信=OFF■ □投稿者/ トマト -(2022/02/05(21:44)) □U R L/ マナーさん ありがとうございます。 Worksheetはおっしゃるようにまとめられるのですね。 すみません、それすらも分からない初心者です。 このWorksheetが転記元となり、Templateのファイルに上書き転記するように したいのですが。 転記先のTemplateには7-1_01,7-1_02等のSheetが作成されております。 まとめて頂いたWorksheetの転記先に記載したCellに転記できるようにしたいのですが。 説明になっておりますでしょうか? |
[194713] Re[3]: 二つのテーブルをマッピングして特定のファイル(Excel)に特定のセルを転記する方法- ■記事引用/メール受信=OFF■ □投稿者/ マナ -(2022/02/05(16:26)) □U R L/ WorkSeet1とWorksheet2は、 まとめて、こんな表ではだめなのですか。 項目 YYYY MM DD Debit in JPY Credit in JPY Net Amount in JPY 転記先 D2 E2 F2 D15 D18 D21 7-1_01 2021 11 1 12000000 135 11999865 7-1_02 2021 11 2 1230000 -942 1230942 7-1_03 2021 11 3 0 0 0 7-1_04 2021 11 4 5000000 7941 4992059 7-1_05 2021 11 5 5100000 58000 5042000 |
[194712] Re[2]: 二つのテーブルをマッピングして特定のファイル(Excel)に特定のセルを転記する方法- ■記事引用/メール受信=OFF■ □投稿者/ マナ -(2022/02/05(15:54)) □U R L/ 説明が理解出ません。 登場するブックは3つですか? 1)指図ファイル(マクロブック) 2)Templateファイル(転記元) 3)Templateファイル(転記先) |
[194711] Re[1]: 二つのテーブルをマッピングして特定のファイル(Excel)に特定のセルを転記する方法- ■記事引用/メール受信=OFF■ □投稿者/ ヘンリー -(2022/02/05(14:25)) □U R L/ マルチポストです。 h ttps://www.239-programing.com/cgi-bin/excelvba_bbs.cgi?id=541 |
[194710] 二つのテーブルをマッピングして特定のファイル(Excel)に特定のセルを転記する方法- ■親トピック/記事引用/メール受信=ON■ □投稿者/ トマト -(2022/02/05(12:46)) □U R L/ VBA全くの初心者です。下記のWorksheet1は転記するTemplateファイル(Excel)のセルを指定しています。 7-1_xxは転記すべきTemplateファイル(Excel)のsheet名です。 Worksheet2はWorksheet1で指定しているセルに転記すべき数字になります。 二つのWorksheetをマッピングして別Templateファイル(Excel)の各々のSheet(7-1_01から7-1_05)に転記する方法(式)を初心者にも理解できるようにできるだけ詳細(最初から)を教えていただけますでしょうか? どうぞ宜しくお願い致します。 Worksheet1 /YYYY /MM /DD /Debit in JPY /Credit in JPY /Net Amount in JPY 7-1_01 /$D$2 /$E$2 /$F$2 /$D$15 /$D$18 /$D$21 7-1_02 /$D$2 /$E$2 /$F$2 /$D$15 /$D$18 /$D$21 7-1_03 /$D$2 /$E$2 /$F$2 /$D$15 /$D$18 /$D$21 7-1_04 /$D$2 /$E$2 /$F$2 /$D$15 /$D$18 /$D$21 7-1_05 /$D$2 /$E$2 /$F$2 /$D$15 /$D$18 /$D$21 Worksheet2 /YYYY /MM /DD /Debit in JPY /Credit in JPY /Net Amount in JPY 7-1_01 /2021 /11 /1 /12000000 /135 /11999865 7-1_02 /2021 /11 /2 /1230000 /-942 /1230942 7-1_03 /2021 /11 /3 /0 /0 /0 7-1_04 /2021 /11 /4 /5000000 /7941 /4992059 7-1_05 /2021 /11 /5 /5100000 /58000 /5042000 *内容にペーストするとテキスト形式になるため、Worksheetの項目と項目の間にスラッシュをいれています。実際のWorksheetにはスラッシュは存在しません ++++++++++++++++++++ OS ⇒OTHER Version⇒OTHER ++++++++++++++++++++ |