おはようございます。エクセルで印刷する時、印刷したいセルをランダムに数箇所指定したいのですが、(または印刷しないセルをランダムに指定でも良いのですが)。印刷されては困るところが何箇所かあります。使用時には普通にセル入力をして、なおかつ印刷したい箇所と、したくない箇所が点在しています。
ファイル→ページ設定→印刷範囲で複数指定しても印刷出来ません。どこかで間違っているのでしょうか。教えて下さい。わかりにくい説明でしょうが、補足しますので、よろしくお願いします。過去ログではわかりませんでした。
No.6ベストアンサー
- 回答日時:
条件付き書式はExcel97以降の機能でした。
これより前のバージョンなら読み飛ばして下さい。セルA1を判定用、A3に条件を設定する場合です。A3を選んで、書式→条件付き書式で出るダイアログボックスで、条件を、「数式が」、「=$A$1=1」に変えます。
書式(F)ボタンを押して、セルの書式設定ダイアログのフォントタブの「色」を白にします。
以下、OK→OKで閉じて、A1に1を入れてみます。指定したセルは見えなくなるはずです。
以下はExcel95でも動くはずです。(未確認ですが。Excel97では確認しました)
印刷範囲を設定し、myArray=myArray(・・・)に印刷したくないセル番地をセットします。
対応するシートのコードウインドウに貼り付けます。登録したセルは印刷しません。
Dim cellColor() As Long
Sub Print_ColorWhite()
Dim myArray, element As Variant '印刷しないセルを配列に設定
Dim RGcot As Integer '印刷しないセル数
Dim cot As Integer 'カウンタ
myArray = Array("A2", "A4", "A6") '*** これは例(印刷しないセルをセットする) ***
For Each element In myArray '登録個数を数える。他に方法は?
RGcot = RGcot + 1
Next
ReDim cellColor(RGcot) AS LONG
For cot = 1 To RGcot '最初の色の設定を保持する(セル毎に色が違うと想定)
cellColor(cot) = Range(myArray(cot - 1)).Font.ColorIndex
Range(myArray(cot - 1)).Font.ColorIndex = 2 '白にする
Next
ActiveSheet.PrintPreview '今はプレビュー。PrintOutに変えれば印刷
For cot = 1 To RGcot '最初の設定に戻す
Range(myArray(cot - 1)).Font.ColorIndex = cellColor(cot)
Next
End Sub
No.5
- 回答日時:
色々、方法はありそうですが、簡単そうな方法をひとつ・・・
セルを1つ判定用に使います。印刷したくないセルを選択して条件付書式で判定用のセルに何か入力(1でも)されていたらフォントの色を白にします。書式をコピーすればかなり自由に非表示個所を変更できます。
判定用セルの設定ミス等が心配ですので、ThisWorkbookのBeforePrintイベントでチェックなり設定をすれば良いと思います。参考までに。
回答ありがとうございます。いろいろやっているんですが、なかなかうまくいかなくて、もともとエクセルにはこのような機能は無いのでは?
No.4
- 回答日時:
またまた、きりんです。
なんとかなりそうですよー(^^
んと、印刷したくないセルを、複数選択して、
右クリックします。
で、
セルの書式設定から保護のタブをクリックして、
表示しない、をチェックします。
そうすると、印刷プレビューでは表示されませんよー。
でも実際に印刷してないから・・・どうなんでしょ(^^;
いまちょっと、他の作業中で、印刷できない状態なんですよー。
ごめんなさい。
・・とその前に質問なのですが、
列ごとに印刷したくないなら、列ごとに表示しないこともできますよー。
この回答への補足
回答ありがとうございます。セルの書式設定→保護→表示しないにチェックを入れてもプレビューで出てしまうのです。私のエクセルが悪いのかしら?
補足日時:2001/06/13 11:41No.2
- 回答日時:
こんにちは。
ちょっと面倒ですが、シートをコピーして印刷したくないセルを
消してから印刷するのは大変ですか?
消す量にもよると思いますが、規則性があるとかでしたら
マクロでセル内容を消すようにすればできます。
根本的な解決法ではありませんが、とりあえず
応急処置と言う感じですみません。
この回答への補足
アドバイスありがとうございます。セルを消したり、移動したりすると、参照している箇所があり、印刷するセル内容が変っちゃうと思いまして・・・
補足日時:2001/06/13 10:34No.1
- 回答日時:
おはよーございますっ!
印刷はちょっと試してないので分かりませんが、
セルを複数指定したいときは、
ctrlを押しながら、セルをクリックしていくと、
とびとびでも、複数のセルを選択できますよー。
(並んだセルを選択したいときは、shiftを押しながらクリックします。)
++セルをアクティブにしたまま、
印刷範囲を指定してあげると、
そこだけ印刷されますが・・・
・・・こんな答えでよかったでしょうか?
見当違いだったらごめんなさい。(^^;
この回答への補足
回答ありがとうございます。複数セルを指定して印刷するとセル1個ことに、1ページごとに印刷されてしまうのです。1枚に印刷されないのですが。
補足日時:2001/06/13 10:26お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセル2013「次のページ数に合わせて印刷」が小さすぎる 9 2023/03/28 10:18
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- Visual Basic(VBA) Accessフォームで全レコードを指定のExcelのセルへ転送し印刷する方法について 2 2022/09/08 18:23
- Excel(エクセル) エクセルのフッタやヘッダーについて 3 2023/02/04 09:45
- Excel(エクセル) エクセルシートのPDFでの保存 2 2022/09/06 13:05
- Excel(エクセル) エクセルのマクロで複数シートを両面印刷するには? 2 2022/12/08 23:23
- Excel(エクセル) 【マクロ】webアドレスにて指定されたCSVファイル【excelソフト表示】を印刷する件 1 2023/02/15 01:52
- Excel(エクセル) 【Excel】複数シートがあるエクセルデータで片面印刷と両面印刷設定がシートごとに入 1 2023/03/10 15:25
- Excel(エクセル) セルによって印刷するシートを変える方法 EXCEL-VBA 2 2022/08/01 20:48
- Excel(エクセル) Excel VBAプルダウンの値を変えながら2枚ずつ印刷する方法? 4 2022/05/27 13:04
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
数学 Tan(θ)-1/Cos(θ)について...
-
4つのパターンを表示するEXACT...
-
エクセルの数式で教えてください。
-
エクセルで指定した日付、店舗...
-
Excel:一部のフォントでセルの...
-
Excel初心者です。 詳しい方、...
-
Excel初心者です。 詳しい方、...
-
Excel 2019 のピボットテーブル...
-
スマートな関数を教えて下さい。
-
Excelのグラフ軸について
-
EXACT関数とIF関数の組み合わせ...
-
Excel ウインドウ枠の固定をす...
-
エクセルで日付の入ったセルの...
-
excelの不要な行の削除ができな...
-
INDIRECTを使わず excelで複数...
-
各ページの1番上の表示について
-
スプレッドシートの関数VLOOKUP...
-
エクセルでセルに「氏名を入力...
-
関数を教えて下さい。
-
Excelのif関数で文字が見えなく...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ファイル内にある数字の出現回...
-
Excel関数の先頭に「@」が入っ...
-
エクセルの気味悪い不思議
-
Excel VBAで、実行時にsheet上...
-
表示されている人数だけを数え...
-
他人が作ったマクロの理解
-
Excelの関数について質問です。
-
Excel 集計表
-
エクセル 日時の計算式について
-
Excelの関数に関して質問です。...
-
エクセル:セル内の文字列の下...
-
絞り込み検索
-
エクセルの関数で
-
エクセルの書式設定について教...
-
余分なEXCELファイルに印刷され...
-
VBA 同一シート内での転記の仕方
-
長期休みの関数はありますか
-
Excelの空のセル
-
エクセルで入力してある文を別...
-
Excelのマクロで、セルを結合し...
おすすめ情報