工事台帳をEXCEL2010で作成しています。
シートには縦に3ページ分の入力フォームがあり、データ入力後に
印刷したいページをオプションボタンで選択後し、
印刷ボタン(フォームコントロール)を押すと
対象ページを印刷範囲設定して印刷、という作業を
マクロで行っています。
このマクロはExcel2003で作成し(ファイル形式は.xls)、
Excel2010で変換(.xlsm)して使用しています。
このファイルで印刷ボタンを押すと、印刷後にボタンが消えてしまうのです。
何か規則性があるとかといろいろ調べてみたところ、「オブジェクトの選択と表示」
で「Button」となっているものだけが消えます。他にも、「Comment」、「テキストボックス」、
「Option Button」、「Group Box」、「AutoShape」、「Text Box」というものもあります。
書類作成期限の都合でここ数か月はショートカットでマクロを実行していますが
なかなか調べる時間がとれずに解決に至りません。
何が原因かわかる方がいらっしゃいましたらお教えください。
No.1ベストアンサー
- 回答日時:
私は経験がないので詳しくはわからないのですが、ボタンは見かけ上消えているだけではないでしょうか?
印刷処理をした後、表示位置がずれているとか、ボタンがあった位置をクリックすると印刷動作をすることはないでしょうか?
印刷処理をした後再描画する処理を加えるとボタンが復活するようなことがあるみたいです。
参考URL:http://oshiete.goo.ne.jp/qa/4280164.html
ikataco3さん、回答ありがとうございます!
お礼が遅くなり申し訳ありませんでした。
質問が分かりづらかったので覚え書の意味も込めて補足させてください。
問題のシートにあるボタンは
1.「工事台帳印刷」
2.「他シートへジャンプ」
3.「データ削除」
の3つで、2と3は問題なく機能します。
1は罫線「あり」と「なし」があり、「なし」の場合は別シートへジャンプ後に
印刷して「あり」のシートに戻ってくるという感じで、こちらも問題なく機能します。
問題は「罫線あり」で「工事台帳印刷」を実行した場合、1~3すべての
ボタンが画面上から消えてしまうという状態です。
ikataco3さんの回答を読んで、表示位置がずれているかも?と
画面の表示倍率を10%まで小さくしてスクロールしてみたら
“DCZ3164”というとんでもなく離れたセルあたりに消えたと思った3つの
ボタンがありました!
(回答の中にあったリンク先を参考にApplication.ScreenUpdating = Trueを
書き足してみましたが状況は変わらずでした)
移動距離に規則性があるのかと「工事台帳印刷」ボタンを“A1”セルに
移動して「工事台帳印刷」ボタンを押したら0.64cm×3.76cmのボタンが
2.35cm×14.1cmに巨大化しました。
この巨大化したボタンを手動で適当なサイズまで小さくしたところ、なぜか
問題の現象が起きなくなりました。他の2つのボタンについても同様に
操作することによって移動することがなくなりました。
ここで気がついたのですが、Excel2003で作成したファイル内のボタンを
Excel2010上で書式設定を確認するとサイズタブの情報がブランクになっています。
この辺になにか理由がありそうな気がしますが、とりあえずこの状態でしばらく
様子を見てみようと思います。
ikataco3さんの回答がヒントになりました、ありがとうございます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- その他(Microsoft Office) Excelのマクロについて教えてください。 1 2022/03/25 10:03
- Word(ワード) IMEパッドがショートカットキーで開かないのですが。。。 5 2023/06/11 09:23
- Excel(エクセル) エクセルのマクロで複数シートを両面印刷するには? 2 2022/12/08 23:23
- その他(パソコン・スマホ・電化製品) Webページ印刷時にヘッダー・フッターをつけたい 1 2022/04/25 21:35
- Excel(エクセル) 請求書と領収書の作成 4 2022/11/10 16:13
- Excel(エクセル) Excelであるシートだけ印刷できない 1 2022/04/01 09:04
- Visual Basic(VBA) Accessフォームで全レコードを指定のExcelのセルへ転送し印刷する方法について 2 2022/09/08 18:23
- Excel(エクセル) 【マクロ】webアドレスにて指定されたCSVファイル【excelソフト表示】を印刷する件 1 2023/02/15 01:52
- Visual Basic(VBA) DisplayAlertsブロパティで ”実行時エラー424オブジェクトが必要です” 5 2022/05/15 18:02
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
セルの文字を「印刷時だけ非表...
-
何もしていないのに印刷したら...
-
コンビニでpdfを四つで一つにし...
-
Wordによる宛名印刷
-
ワードの差込印刷部分の背景部...
-
Excel フィルタをかけた後の各...
-
違うページが印刷される
-
エクセルで「白字」を印刷した...
-
ファミマでPDFを両面印刷したの...
-
筆まめの文面文字黒色が薄墨色...
-
エクセルで印刷すると文字の上...
-
ワード・エクセル2007で印刷
-
画面通りに印刷されず(Word2013)
-
かんたんPDF EDITで文字を書き...
-
Firefoxの右クリックメニューに...
-
背景色を消して白地に黒でモノ...
-
章立てで作成したワード文章を...
-
Excel2007 罫線を細くするため...
-
[Acrobat]注釈を埋め込む 注釈...
-
Excel セル内に見たことのない...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
セルの文字を「印刷時だけ非表...
-
エクセルで「白字」を印刷した...
-
Excel フィルタをかけた後の各...
-
コンビニでpdfを四つで一つにし...
-
何もしていないのに印刷したら...
-
PDF-XChange Editorのテキスト...
-
ワードの差込印刷部分の背景部...
-
wordで印刷の頁順を変えたい
-
作成中のメールを印刷する方法...
-
Edge、[画面で選択されたとおり...
-
ワードで背景の画像を印刷しな...
-
エクセルのみで長3封筒に宛名...
-
ネットのページをPDFで保存して...
-
ファミマでPDFを両面印刷したの...
-
WORD 印刷すると文字が重なる
-
PDFファイルの選択した部分...
-
画面通りに印刷されず(Word2013)
-
indeedのweb求人内容を印刷した...
-
背景色を消して白地に黒でモノ...
-
違うページが印刷される
おすすめ情報