No.1
- 回答日時:
VBAではないのですが、「差し込み印刷」という手もあるかと思います。
1.EXCL、Wordで、表を作成。EXCLは保存。
2.Wordで、ツール→差し込み印刷ヘルパーを選択。
3.メイン文書→作成→定型書簡 を選択
4.作業中のウィンドウ を選択
5.データファイル指定→データファイルを開く で、EXCL形式にして、読みとるデータを指定
6.ワークシート全体→OK→メイン文書の編集 を指定
7.Word上の、出力したいところにカーソルをあわせ、「差し込みフィールドの挿入」により、データを呼び出す。
という手順になります。
参考にしてくださいませ。
この回答への補足
お礼に書き忘れてしまったので・・・
多分他の回答はもうこない気もするんですが、もう少しまってみようと思いますのでまだ締め切らずに待ってみます。
回答ありがとうございます。
差し込み印刷は質問をする前に試していたのですが、
私のやらんとしている事と機能が違うのでダメなんです。
例えば、1つの列の複数行に複数のデータを挿入したい場合、
1件目のデータが同列に並ぶだけだったり、同じ書式のページが何枚もできたり・・・
やっぱり差し込み印刷は「1つの指定した個所に1つのデータ」というのが約束なんですね。確かに差し込み印刷本来の目的で使用する際には極めて便利に感じますが、逆にこの融通のきかなさにも頭を悩ませます。
お礼が送れて申し訳ありませんでした。
今後ともまたよろしくお願いします。
No.2ベストアンサー
- 回答日時:
batu1さんこんにちは
(前回質問No.86378より引き続き)excel2000,word2000での例です。参考になさってください。試してみたのですがうまくいきました。Wordの罫線表をオブジェクトとして特定できるのかなぁなんて思っていましたが、ヘルプを見るとTableオブジェクトがあり、インデックス値を持っているようなので、早速作ってみました。なお、このインデックス値が、どういう順番に割り振られるのかまでは調べていません。
この例は、マイドキュメントにBook1.xlsというexcelファイルが保存されていて、そこのSheet1の"A1:E5"に基になる表があります。Word文書にもこれに対応する罫線表(縦2段横5列・インデックス値1)がある場合のマクロ例です。質問No.86378の回答に述べたように、Word VBEからEXCELアプリケーションを参照設定しなければ使えません。
Sub test()
Set wkbObj = CreateObject("C:\My Documents\Book1.xls")
Set MySheet = wkbObj.Worksheets("Sheet1")
For X = 1 To 2
For Y = 1 To 5
ActiveDocument.Tables(1).Cell(X, Y).Select
Selection.TypeText (MySheet.Cells(X, Y).Value)
Next Y
Next X
Set wkbObj = Nothing
Set MySheet = Nothing
End Sub
前回に引き続き回答ありがとうございます。
実は回答を読むちょっと前に、偶然全く同じことをしました。
何日も考えてやっとできたー!! と喜んだ後に回答を読んで
TTakさんが同じ事を書いている、ということはこれで正解だったんだ!
と試験後の回答を新聞で読んだような気分になりました。
TTakさんにはこんなこと、お茶の子サイサイなんでしょうか・・・?
本当にありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルで重複データを行ごとに抽出したい 4 2022/12/05 08:18
- Excel(エクセル) エクセルのマクロで複数シートを両面印刷するには? 2 2022/12/08 23:23
- Excel(エクセル) エクセルの散布図で新たに入力した値のデータラベルが空欄になる現象 1 2022/04/26 09:31
- Excel(エクセル) エクセルで条件付き書式を使わずにセルの文字の色を変える方法を教えて下さい 8 2023/07/28 01:15
- Visual Basic(VBA) エクセル VBA 条件によるセル点滅 お詳しい方 ご教授をお願いします。 Excelファイルにて 現 1 2022/11/03 15:53
- Excel(エクセル) エクセルについて教えてください。 2 2023/06/14 11:11
- Excel(エクセル) エクセルに詳しい方 よく読んでからのご回答お願いします 外部からデータが来ますが、日付が202201 7 2022/06/29 16:15
- Excel(エクセル) 重複データの抽出について 2 2023/07/21 14:52
- Excel(エクセル) フォルダ内のエクセルファイルを開かずにデータ採取する関数式 2 2022/12/22 22:15
- Visual Basic(VBA) 【VBA】データを入力後に,同一シート内に履歴として転記するVBAコードを教えていただきたいです。 3 2022/11/16 01:37
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
パワポの複数ページにまたがる...
-
表と票の違いは?
-
WORDの表がいきなり改ページさ...
-
ワードの表の行が広がってしまう
-
Word2016の表で困っています。
-
ワードの表の列幅を文字ぎりぎ...
-
ワードの表がくっついてしまいます
-
wordで表を挿入した後に表の前...
-
Wordで表を作ったら右下に四角...
-
ワードで表を作ってから、その...
-
[Word]表のタイトル(番号/総数...
-
エクセル・一部分のみ行高さ変更
-
ワード、上下中央揃えにしたい...
-
エクセルで3次元の表を作りたい
-
[Excel] 以下のような、行が...
-
ワードで空白、行を維持したま...
-
エクセルでセルの幅が違う2つ...
-
ワードで「文字」「表」と横に...
-
ワードの表が重なってしまう。
-
MS Word 表のタイトル行が表示...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
パワポの複数ページにまたがる...
-
ワードの表の行が広がってしまう
-
ワードの表の列幅を文字ぎりぎ...
-
表と票の違いは?
-
Word2016の表で困っています。
-
ワードの表がくっついてしまいます
-
Wordで表を作ったら右下に四角...
-
wordで表を挿入した後に表の前...
-
ワード、上下中央揃えにしたい...
-
WORDの表がいきなり改ページさ...
-
エクセルで3次元の表を作りたい
-
ワードの表体裁が壊れる
-
ワードの表が重なってしまう。
-
ワードで空白、行を維持したま...
-
Excelについて質問です。 表の...
-
ワード横書き2段、左に英語、...
-
エクセルで空行を印刷しない方法
-
wordで 次のページに同じ表(レ...
-
Wordの表の列の高さを固定する...
-
Wordの表をWebレイアウトにする...
おすすめ情報