• 締切済み

エクセルマクロでフォーム印刷

エクセルマクロでフォーム上にボタンを置いてボタンをクリックしたらそのフォームをA4に印刷したいんですがどうしたらいいんでしょう。教えてください。

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.1

良く判っていない者が書きます。VBE画面で、「ユーザーフォーム」を「挿入」し、その上にTextBox、CommandButtonを貼りつけます。 Private Sub CommandButton1_Click() UserForm1.TextBox1.Text = "今日は" UserForm1.Printform End Sub とし SUB/USERFORMの実行で、FORMが現れ、ボタンをクリックすると、FORMの枠、テキストボックスの枠(その中に「今日は」と言う文字)とボタンのCAPTIONの「印刷」と言う文字が印刷されましたが、こう言うのとは、どこが違うのでしょう。

関連するQ&A

  • エクセル 印刷プレビュー マクロフォームも印刷

    教えてください。 エクセルで VBAを使っています。 そのマクロをフォームのボタンを使って 1クリックで動くように、作成しました。 1シートに手順書のようなイメージでボタンを配置しています。 この状態で印刷をしたいのですが、 印刷プレビューで見たとき、並びに印刷したときに、 フォームのボタンが印刷されません。 「オプション」を見たのですが、そのような設定は ないようです。 どうしたら、印刷されるのでしょうか?

  • エクセル マクロ フォームに転記したい

    (1)エクセルSheet1にボタンをクリックするとフォームを出てくる。(2)そのフォームは、転記する専用のフォーム。(3)転記フォームの中にボタンを作り、新しいフォームが出てくる。(4)コンボボックスに表示した文字を転記フォームのテキストボックスに転記したい。 この様なことは出来ますか? マクロの記述を教えてください。

  • エクセルのフォームをマクロで登録する方法

    教えてください。 エクセルでデータ入力に「データ」から「フォーム」を作成して入力しております。 共有でしようしますので、マクロボタンを作成して、ボタンをクリックすることで、フォームを表示するようにしたいのですが、Worksheeet クラスのshowDateFormメソッドが失敗しました。「デバック」が表示され、フォームが出来ません。マクロでエクセルからフォーム表示出来る方法をお願いします。

  • エクセルでフォームを開きたい

    マクロを登録して、表の上部に「時間入力」というボタンを作って、そのボタンを押した際に A3からE45を範囲され、データ>フォームを開くということがしたいです。 マクロの記録でやろうと思ったら、フォームを開いたままの状態で「終了」はクリックできないんですね>< バージョン:エクセル2003 です。 手順など教えていただけると幸いです。 よろしくお願いします。

  • エクセル2010で印刷マクロを組むには

    印刷シートに,Vlookup関数でいろいろあるタグから引用したデーターを,名簿にある個人個人のファイルとして印刷をしたいと思っています。マクロを組まないとなると,個人のデータを反映させた後,ファイル→印刷,新たに整理番号入力→ファイル→印刷と・・・いちいち,整理番号を入力後,マウスを動かし,人数分の数だけ同じ作業をしないといけないのですが,それをマクロを組んで,印刷フォームのあるタグの上部等の印刷指定していない場所に,印刷ボタンを作ってそのボタンをクリックするだけで,印刷できる方法を教えてほしいと思っています。 できれば,その個人には,通し番号があるので。番号を進ませるボタンや逆に番号を戻すボタンもあれば,なおいいし,たとえば○○番から△△番まで指定して印刷ボタンをクリック,プリンターからはその指定した分の個人情報が入力した紙ベースの資料が出てくる・・・・・となったら最高です。 よろしくお願いします。

  • マクロで印刷ができません

    簡単な表を作成し、デザインモードでフォームコントロールでボタンを作成し、マクロの作成をしました。 印刷するためにボタンをクリックしても 印刷プレビューで画面が止まってしまいます。 ところがプレビュー画面を閉じると印刷が始まります。 何度やりかえてもマクロで最後まで印刷ができません。 記述は次のようになっています。 プリントも記述されているようなのですが・・・・ エクセル2007を使っています。 どなたか助けてください Sub ボタン3_Click() ' ' ボタン3_Click Macro ' ' ActiveSheet.Shapes("Button 3").Select Selection.Characters.Text = "ボタン 3" Range("B3:E12").Select ActiveSheet.PageSetup.PrintArea = "$B$3:$E$12" ActiveWindow.SelectedSheets.PrintPreview ActiveWindow.SelectedSheets.PrintOut Copies:=1 End Sub

  • エクセル マクロの実行方法について

    エクセル2003を使っています。 あるセル(例えばA1)をクリックする(アクティブにする)とあるマクロ(例えばmacro1)が実行されるようにしたいのですが、どのようにすればよいのでしょうか? フォームボタンを作ってボタンにマクロを割り当てるという方法は都合が悪いので、上記方法が実現できるととても助かります。 初歩的な質問で申し訳ありませんがよろしくお願いします。

  • ACCESSフォームの印刷について

    Accessのフォームにボタンを作成し、マクロで印刷できるように設定しています。 ただ、フォームのサイズがB4のため、ボタンを押し印刷すると当然B4になってしまいます。 これをA4に縮小して印刷するようにするにはどうしたらいいでしょうか? いい方法を知っている方がいましたら、ご回答お願いします。

  • エクセル2007のマクロのフォームで作成したボタンの色は変えられるんで

    エクセル2007のマクロのフォームで作成したボタンの色は変えられるんですか? マクロ初心者です。

  • マクロボタンが勝手に飛び回る

    エクセルシートの「フォームツールバー」でフォームボタンを配置して印刷マクロを作ったのですが、なぜかボタンをクリックすると勝手に移動してしまいます 原因がサッパリわかりません、 プロシージャは Private Sub CommandButton1_Click() Worksheets("納付書").Range("a1:v35").PrintOut Range("Z4").Select End Sub このようなマクロになっています。 助けてください。

専門家に質問してみよう