初心者備忘録

Webページ開設しました → 初心者備忘録: http://www.ka-net.org/

全体表示

[ リスト ]

今日はタブの表示設定(Visible)を動的に変更して、特定の曜日にだけタブを表示させてみようかと思います。

【Office 2007】特定の曜日にのみタブを表示する
1. Office 2007ファイルを開き、標準モジュールに下記コードを貼り付けた後保存します。(今回はExcelファイル)
Sub myTab_getVisible(control As IRibbonControl, ByRef visible)
  '曜日により判断
  Select Case Weekday(Now)
    '火曜日の場合
    Case 3
      visible = True
    Case Else
      visible = False
  End Select
  
End Sub

Sub myButton_onAction(control As IRibbonControl)
  MsgBox "火曜日のみの処理です。"
End Sub
※ 上記コードではWeekday関数で曜日を取得しています。

2. Custom UI Editor Toolで1.のファイルを開きます。
3. 下記のコードを貼り付け、上書き保存します。
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
  <ribbon startFromScratch="false">
    <tabs>
      <tab id="myTab" label="My Tab" insertBeforeMso="TabHome" getVisible="myTab_getVisible">
        <group id="myGroup" label="My Group">
          <button id="myButton" label="My Button" imageMso="MailMergeRecipientsEditList" size="large" onAction="myButton_onAction" />
        </group>
      </tab>
    </tabs>
  </ribbon>
</customUI>
イメージ 1

4. 3.のファイルをマクロを有効にして開くと、火曜日に開いた場合は「My Tab」が表示されますが、
イメージ 2

それ以外の曜日に開いた場合は、タブが表示されません。
イメージ 3


以上で作業は終了です。
上記作業の通り「getVisible」属性を使うことによって、表示を動的に変更することができます。
これを使えば、例えば月曜日だけ「予定入力ボタン」を表示させたり、特定のIPアドレスのPCだけタブを表示させたりといったこともできるかと思います。


【関連記事】
「ブログコンテンツ・リボンのカスタマイズ関連」
http://blogs.yahoo.co.jp/kinuyo_asami/17750449.html


この記事に

閉じる コメント(0)

コメント投稿

顔アイコン

顔アイコン・表示画像の選択

名前パスワードブログ
絵文字
×
  • オリジナル
  • SoftBank1
  • SoftBank2
  • SoftBank3
  • SoftBank4
  • docomo1
  • docomo2
  • au1
  • au2
  • au3
  • au4
投稿

.


みんなの更新記事