• ベストアンサー

ツールバーの全非表示とブックの別名保存の仕方

自分で作成したPG以外の動きを封じるため、 ツールバーの全非表示をしたいのですが、どのように したらよいのでしょうか? また、バックアップのため、ブックの別名保存の仕方 を知りたいのですが、ご存知の方、よろしくお願い いたします。

  • Neigh
  • お礼率12% (4/33)

質問者が選んだベストアンサー

  • ベストアンサー
  • nishi6
  • ベストアンサー率67% (869/1280)
回答No.1

>ツールバーの全非表示をしたいのですが、どのようにしたらよいのでしょうか? 切り替えるサンプルマクロです。終わる時に再度実行して元に戻します。 数式バーやステータスバーについても必要なら、これはマクロ記録ですぐわかるでしょう。 Sub CommandBars切り替え()   Dim myCBar As CommandBar   '使用可能・不可の切り替え   For Each myCBar In CommandBars     myCBar.Enabled = Not myCBar.Enabled   Next End Sub >バックアップのため、ブックの別名保存の仕方を知りたいのですが 開いているBookの別名保存のサンプルマクロです。 バックアップファイルのファイル名の決め方は、ご自分で決めてください。 今は先頭に『bak_』をつけています。2回目、3回目と実行しても同じバックアップファイル名になります。 バックアップに履歴を反映する場合は、バックアップファイル名の付け方を明確に決めて、過去のバックアップと重複しないようにする必要があります。当然、コードは長くなってしまいます。 Sub BackUpSave()   Dim myPath As String 'パス   Dim bakFileName As String 'バックアップファイル名   bakFileName = "bak_" & ActiveWorkbook.Name 'バックアップファイル名の決め方は例です   myPath = ActiveWorkbook.Path     If Right(myPath, 1) <> "\" Then '『\』があるか調べているだけ       myPath = myPath & "\"     End If   '現ブックを別名でバックアップファイルとして保存する   ActiveWorkbook.SaveCopyAs myPath & bakFileName End Sub

関連するQ&A

  • ツールバーを特定のブックのみで表示したい!

    エクセルのツールバーについての質問です。 ユーザー設定にて、マクロボタンを配置したツールバーを作成したのですが ある特定のブックを開いたら表示をし、他のブックでは表示しないように設定できますか?

  • フォルダ作成と別名保存【VBA】

    教えてください 現在、下の2つのマクロを使っています。 「O27」の値でフォルダを作るものとブックを別名保存するものです。 これを1つにまとめたいのですが単純に1つにまとめるとフォルダは作成されるのですがブックの別名保存がセルの値を参照してくれません。 また、MkDir でフォルダを作成すると同じ名前のフォルダが先にあるとエラーになってしまいます。 この2点を解消できる方法はないでしょうか? よろしくお願いいたします。 Sub 別名フォルダ() MkDir Worksheets("オーダーシート").Range("O27").Value End Sub Sub 別名保存() Application.Dialogs(xlDialogSaveAs).Show Arg1:=Range("O27").Value End Sub

  • エクセル:特定のブックのみ、ツールバーの設定をしたい

     タイトルの通りですが、エクセルで特定のブックだけにツールバーの表示・非表示の設定をすることはできるでしょうか?  現在は、表示メニューからツールバーの設定をしています。しかし、この場合、すべてのブックに対して同じツールバーの設定になってしまいます。  ツールバーと同様に、特定のブックのみ数式バーの表示・非表示の設定をしたいと思っています。 どちらかで結構ですのでご存知の方教えていただけませんか。 使用しているのはエクセル2002です。

  • ツールバーの表示変更の仕方を教えて下さい。

    自分で、どこを触って、ツールバー表示を変えてしまったのか、わかりません・・・ 今まで、プリンタの詳細がツールバーにはありませんでした。 メールの送受信の四角いマークがあったのに、表示されなくなり、メールの送受信をどうしたら、良いのか、わかりません・・・ 今までは、ツールバーにオプションやツールといった文字表示があったのですが、なくなってしまいました・・・ ツールバーの表示変更の仕方を教えて下さい。 わかり辛い文面になってしまい、申し訳ありません。 質問補足するので、考えられる解決方法を沢山教えて下さると嬉しいです。 どうか、宜しくお願い致します。

  • VB6.0の別名保存について

    VB6.0でプログラムファイルを開いて変更し、別名で保存すると元のファイルまで変更が保存されてしまって困っています。 例えば、 Aというvbpファイルがあるとして、このファイルを開いて変更した後にBという名前で保存したとします。 このとき、私の頭の中ではAは変更されずに新たにBというファイルが作成されたと思っていましたが、 実際にAを開いてみるとBと同じ状態(変更された状態)で保存されてしまっているんです。 Aを開いてすぐにBとして保存し、それから変更して上書き保存するようにすればAとBを個別に扱うことができるようなのですが、 もし、Aを開いてそのまま大きな変更を加えた後に、やっぱりAはとっておき、別名でBとして保存したいと思った場合はどのようにすればいいのでしょうか。 ご存知の方教えてください。 よろしくお願いします。

  • エクセルでブックごとに表示設定

    エクセルのツールバーや数式バー・ステータスバーをブックごとに表示・非表示を違う設定にして保存することはできるでしょうか?

  • VBA 別名で保存する際のarg引数

    WINは7、Excelは2013を使用しています。 VBAで別名で保存する際、 Application.Dialogs(xlDialogSaveAs).Show arg1:=(shn & "_集計"), arg2:=1 とすると、ファイルの種類のところで、Excel 97-2003ブック が選ばれるのですが、 ここを Excel ブック を選ぶ様に設定したいと思っています。 しかし、arg2:= のところの入れる数字が分かりません。 申し訳ありませんが、ご教示下さい。 もし一覧が載っているサイトをご存知でしたら、教えて下さると大変ありがたいです。 よろしくお願い致します。

  • Excelのブックへのツールバーの添付

    重ねての質問失礼します。 エクセルの表示-ツールバー-ユーザー設定-のツールバーのタグで、添付のボタンを押して、ブックに登録したツールバーのコレクションの取得って出来ますか?どなたか詳しい方いらっしゃいましたら教えて頂けないでしょうか?宜しくお願いします。

  • 写真を左クリックで別名保存をしたい

    サムネイル画像をクリックすると拡大写真が表示 されるページはよく見かけるのですが、 通常のクリック(左クリック)をして、ファイルの 保存画面を出し、ファイルを保存する方法はないの でしょうか? クリックすると拡大写真が表示されてしまうので 『右クリック→別名保存』という操作を省き、 JavaScriptなどを利用して通常のクリックで保存画面 を出したいと考えております。 みなさん大変お忙しいかとは思いますが、どなたか ご存じの方がみえれば、お力添えをよろしくお願い 致します。

  • Wordのユーザー設定ツールバーが表示されません

    初めまして。 Wordのユーザー設定ツールバーの件で、ご質問させて下さい。 私は、自分好みに書式を変更し、テンプレートで「Nomal」ファイルとして使用しております。 更に、ツールバーもユーザー設定を一つ追加し、「新規作成」を開くと共に、ユーザー設定ツールバーを毎回表示させたいのですが、ユーザー設定ツールバーが消えて無くなってしまいます。 保存方法は、「Nomal」ファイルの上書きが出来ないので、一度適当な名前でテンプレートとして保存し、名前を「Nomal」ファイルに変更して入れ替える方法です。 「Nomal」以外の名前でテンプレート登録し、ダブルクリックすると上手くいく時もあるのですが、「新規作成」と違いとても面倒なので、この方法は避けたいです。 どうしたら、ユーザー設定ツールバーを「Nomal」設定として保存できますでしょうか? Word2003を使用しております。 宜しくお願い致します。

専門家に質問してみよう