オフィスの「オ」

Microsoft Officeを上手に使いこなすためのネタ帳ブログ

【注意】モバイルWiFiルーターは熱で動作が不安定になる

f:id:office-macro:20170709013939j:plain
過酷な使用で膨らんでしまったポケットWiFi(504HW)の電池パック

症状

6月中旬ごろから窓際に置いてあるポケットWiFiが、ダウンロードなどで通信量が増えてくると速度が徐々に落ちて、最後には故障したかのように通信不能に陥ってしまうようになった。

回線が混みあっている可能性も考えてとりあえず電源を切り、30分後に再び電源を入れると何事もなかったように使用できるようになるが、使い続けていると再度通信が遅くなって最後には通信不能となってしまう。

本体の状態

電源を入れっぱなしで長期間充電しながら使っているせいか、電池パックが劣化してパンパンに膨らんで本体部分に密着してしまっている。裏カバーはかろうじて閉めることができるが電池パックで大きく膨らんでいる。

そして、通信を開始すると間もなくして電池パックが猛烈に熱くなり、その熱でポケットWiFi内部まで熱くなってしまっていた。

通信機能の回復

あまりにも頻繁に通信不能な状態になるためポケットWiFi本体の故障を疑ったが、いちおう電池パックの熱による暴走の可能性も確認しようと、電池パックを本体の電池室に軽くテープで固定し裏カバーを開けた状態で使用したところ、それ以降は、長時間通信を続けても速度が落ちることも通信不能になることもなくなった。

原因は?

今回のトラブルの原因は、膨らんだ電池パックの熱による本体の通信機能の暴走によるものだと考えられる。

ちなみに、電池パックが膨らむ前は夏でも今回のようなトラブルは起きていなかったので、多少熱を持ったとしても電池パックさえ膨らんでいなければ本体が暴走する心配はないだろう。

 

END

 

Excelで簡単にグラフを作る方法

今回はExcelで簡単にグラフを作る方法を説明します。

 

1.まずはグラフの元になる表を作ります。このサンプルでは一年間の光熱費(電気代、ガス代、水道代)の表を作ってみました。

f:id:office-macro:20170325062438p:plain

 

2.次に1で作った表の全体を見出しも含めてドラッグします。ドラッグするとドラッグされたセルだけがグレーに変化します。

f:id:office-macro:20170325062539p:plain

 

3.グラフ化したい表全体がグレーになっているのを確認できたら「挿入」リボンメニューから「おすすめグラフ」をクリックします。

f:id:office-macro:20170325063136p:plain

 

4.「グラフの挿入」ウィンドウが表示されるので、左側のグラフ一覧から好きなグラフの種類を選択して「OK」ボタンをクリックします。

f:id:office-macro:20170325062922p:plain

 

5.グラフが自動的に作成されました。

f:id:office-macro:20170325064508p:plain

 

6.グラフの設定を変更したい場合は、グラフ上にマウスポインターをもってきたときにグラフの右側に表示される「+」「ペン」「フィルター」マークをクリックして変更します。

 

終わり

 

Excelで文字列を検索する

 

今回はExcelで文字列を検索してみましょう。

 

1.「ホーム」タブのメニューから一番右にある「検索と選択」をクリックします。

f:id:office-macro:20170322203757p:plain

 

2.「検索と選択」のサブメニューが表示されるので、一番上にある「検索」をクリックします。

f:id:office-macro:20170322203927p:plain

 

3.「検索と置換」ウィンドウが表示されます。

f:id:office-macro:20170322204113p:plain

 

4.①「検索する文字列」に検索したい文字列を入力。②「次を検索」ボタンをクリックすると検索した文字列が入力されているセル③が選択されます。

f:id:office-macro:20170322204303p:plain

 

おわり・・・

 

VBAでWordを起動する

VBAでWordを起動するサンプルコードです。  

Private Sub CommandButton1_Click()

    'Wordとドキュメントの空箱を準備
    Dim wApp As Word.Application
    Dim wDoc As Word.Document
   
    '空箱にオブジェクトをセットする
    Set wApp = New Word.Application
    Set wDoc = wApp.Documents.Add
   
    '作ったWord文書を表示
    wApp.Visible = True

End Sub

 

f:id:office-macro:20170321222515p:plain

 

おわり 

 

Windows10でOneDriveのフォルダを変更する方法

Windows10でOneDriveのローカルフォルダを変更する方法がなかったので備忘録として残しておきます。

 

<手順> 

1.まずは、隠れているOneDrive(雲のマーク)のインジケーターアイコンを表示しましょう。

f:id:office-macro:20170320230515p:plain

 

2.次に、OneDriveのアイコンの上で「右クリック」してメニューを出し、「設定」をクリックします。

f:id:office-macro:20170320230526p:plain

 

3.「設定」をクリックして表示された「Microsoft OneDrive」の設定ウィンドウから、上段にある「このPCのリンク解除」をクリックし、いったんOneDriveとの接続を解除します。

f:id:office-macro:20170320230536p:plain

 

4.その後、OneDrive利用開始の設定画面が表示されるので、Microsoftのアカウントとパスワードを入力しましょう。※画像は準備中

 

5.次にフォルダの場所を設定する項目が表示されるので、ここでそのままデフォルト(Cドライブにあるドキュメントフォルダ)にしないで、別のフォルダを指定してください。※画像は準備中

 

終わり