Excel非表示シートを簡単操作で再表示（VBA）

非表示になったシートがたくさんあるワークブックは、シートの再表示を何度も操作するのは面倒臭い。

…ので、ネットで調べてみるとこんなマクロが！

--------------------------------------------------------------------------

Sub UnHideSheets()



Dim objSheet As Object

Dim intRet As Integer


For Each objSheet In ActiveWorkbook.Sheets

If objSheet.Visible = False Then

intRet = MsgBox("シート『" & objSheet.Name & "』を再表示しますか？", vbYesNo)

If intRet = vbYes Then objSheet.Visible = True

End If

Next


End Sub

--------------------------------------------------------------------------


このVBAを実行するとシートの再表示をダイアログで確認しながら再表示可。

上記のSubプロシージャを、VBE（Visual Basic Editor）を起動して標準モジュールに貼り付ければOK。

あとはマクロ実行するなり、よく使用するのであればボタン登録してもいい。





ちなみに非表示になっているシートの全表示をするのであれば、for～next間を

If objSheet.Visible = False Then objSheet.Visible = True

のみにすればいい。

QRコード作成（ホームページビルダー使用）

ホームページビルダーでQRコードを作成します。





１．挿入　→　その他　→　ケータイ用部品　→　QRコード　の順にクリック

２．文字の欄に「ホームページアドレス」を入力。

３．作成されるコードの大きさを選択。

４．OKをクリック。

５．QRコードが作成されます。

Bloggerページの追加・編集

Bloggerページの追加・編集


1.   ダッシュボードにアクセスします。

2.   「投稿」をクリックします。

3.   上メニューの「ページを編集」をクリックします。

4.   「新しいページ」をクリックします。

5.   「ページタイトル」を入力します。

※  ページの項目名となります。

例）プロフィール、趣味等。

6.   「ページの内容」を入力します。

※  ５．で決めた項目の内容です。

7.   下の「ページを公開」をクリックします。

ページを再編集する場合

上記の1～3まで進み、各項目の「編集」をクリックします。