不具合の症状としては、Outlook2013でメールボックスのメールを検索しても、検索結果が「検索対象が見つかりませんでした。」と表示されてしまう。
検索ツールタブの「検索ツール」→「インデックスの状況」をクリックしても「インデックス処理を行っていないアイテムが0個あります。」と表示されている。
対策として
プログラムのアンインストールまたは変更から「Microsoft Office Standard 2013」を選び、「変更」→「修復」を行う。
ディスクが必要な場合は、Officeのディスクを入れる。
Windowsの再起動。
Outlook2013を起動し、検索ツールタブの「検索ツール」→「インデックスの状況」をクリックすると「インデックス処理を行っていないアイテムが***個あります。」と表示された。
「OK」をクリックしてしばらくしまつ(未処理アイテムの数が多いとかなりの時間かかるので気長に待つ)。
しばらくしてから「インデックスの状況」をクリックすると、処理が完了していれば「インデックス処理を行っていないアイテムが0個あります。」と表示されて検索できるようになる。
Offce
ワークシートの表示と非表示を行う
VBAで、シートの表示と非表示はVisibleプロパティを使用して行う。
Worksheet.Visible プロパティ
値
True ワークシートを表示する
False ワークシートを表示をしない
ワークシート「Sheet1」を非表示にする場合
1 |
Worksheets("Sheet1").Visible = False |
ワークシート「Sheet1」を表示する場合
1 |
Worksheets("Sheet1").Visible = True |
ユーザの操作で、ワークシートを再表示させたくない場合は「xlVeryHidden」の定数を設定する。
ワークシート「Sheet1」を非表示にする場合
1 |
Worksheets("Sheet1").Visible = xlVeryHidden |
ワークシート「Sheet1」を表示する場合
1 |
Worksheets("Sheet1").Visible = xlSheetVisible |
VBAの定数についてはリンク先のリファレンスを参照して下さい。
https://msdn.microsoft.com/ja-jp/library/jj692807.aspx
ステートメントを複数行の記述する
vbaで1行のステートメントを複数行に分けた方が見やすいことがある。
記述方法は改行したいところでスペース+アンダースコアを入力する。
1行に複数のステートメントを記述する
VBAで1行に複数のステートメントを記述するときはステートメント同士を:(コロン)で区切って記述する
変数宣言をしたときに同時に値を入力するとき
[変数名] : [変数名] = [値]