Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

75411 / 76734

←次へ　｜　前へ→


	【5759】Re:付け足して質問なんですが>_<

つん

- 03/5/29(木) 15:35 -


	引用なし

	パスワード

どもども

>えへへ。ずっと前にもヘルプが参考になるって、つんさんに教えて
>いただいたんですよね。^^;

えー？そやったっけ？
すっかり忘れてるにゃ（＾＾;

>さっきの手順でコピー挿入の作業が終わったものをＢ列からＥ列までの範囲で
>3行目以降データがあるところまでを選択して印刷させるということは
>可能でしょうか？

Sub test()

　　Dim lngLastRow As Long
　　
　　With Worksheets("Sheet1")
　　　　lngLastRow = .Range("b65536").End(xlUp).Row
　　　　.Range(.Cells(3, 2), .Cells(lngLastRow, 5)).PrintOut
　　End With
　　　　
End Sub

こんな感じかなあ？（Sheet1でよかったっけ？）

2 hits

▼

【5734】挿入を繰り返したいのですが mumumu 03/5/29(木) 9:38