Excel でセルの内容をアスタリスクまたは他の文字列で素早く非表示・マスクする3 つの方法

以下のスクリーンショットのように、ワークブックを他のユーザーと共有する際、一部のセルの内容を非表示にしたい場合があります。本記事では、Excel でセルの内容をアスタリスクでマスクして非表示にする3 つの方法をご紹介します。

• セルの書式設定を使用して、セルの内容をアスタリスクで非表示・マスクする
• VBA コードを使用して、セルの内容をアスタリスクで非表示・マスクする
• セルの内容をアスタリスクまたは他の文字列で暗号化・マスクする
• ワークシートに関するその他の関連記事（操作）

Excel では、セルの書式設定機能を使えば、セルの内容をアスタリスクでマスクできます。

1。非表示にしたいセルをアスタリスクで選択し、右クリックしてコンテキストメニューからセルの書式設定を選択します。

2。「セルの書式設定」ダイアログボックスで、「数値」タブを開き、「分類」リストから「ユーザー設定」を選択し、「種類」下のテキストボックスに「;;;**」と入力します。

3。「OK」をクリックすると、選択したセルの内容がアスタリスクでマスクされます。

ただし、セルの内容は数式バーからも確認できます。

4。内容を非表示にしたくないセルにカーソルを置き、「レビュー > シートの保護」をクリックし、「選択範囲のロックを解除」および「セルの書式設定」オプションのチェックを外してください（他のオプションは必要に応じてオンにしてください）。その後、表示されるダイアログでシート保護用のパスワードを入力・確認します。

これで、セルの内容は非表示になり、アスタリスクでマスクされました。

注：セルの内容が数値文字列の場合、この方法ではセルが空白として表示されるだけです。

数値とテキストの両方をマスクしたい場合は、VBA コードを活用できます。

1。暗号化したいセルを選択し、「Alt + F11」キーを押して、「Microsoft Visual Basic for Applications」ウィンドウを開きます。

2。「挿入」＞「モジュール」をクリックし、新しいモジュールに以下のコードをコピー＆ペーストしてください。

VBA：#N/A エラー行を非表示にする

Sub E_Cells()
'UpdatebyExtendoffice
Dim xRg As Range
Dim xERg As Range
Dim xWs As Worksheet
Dim xStrRg As String
Dim xStrPw As String
xStrPw = ""
xStrPw = Application.InputBox("Enter Password", "", "", Type:=2)
If xStrPw = "" Then Exit Sub
On Error Resume Next
Set xERg = Selection
Set xWs = Application.ActiveSheet
Set xRg = xWs.Cells
xRg.Locked = False
xERg.Locked = True
xERg.NumberFormatLocal = "**;**;**;**"
xWs.Protect Password:=xStrPw, DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub 

3。「F5」キーを押してコードを実行します。表示されたダイアログにパスワードを入力し、「OK」ボタンをクリックしてください。スクリーンショットをご参照ください。

ヒント：

1。セルを復号するには、次のマクロコードをご利用いただけます。

Sub D_Cells()
'UpdatebyExtendoffice
Dim xRg As Range
Dim xERg As Range
Dim xWs As Worksheet
Dim xStrRg As String
Dim xStrPw As String
xStrPw = ""
xStrPw = Application.InputBox("Type Password", "", "", Type:=2)
If xStrPw = "" Then Exit Sub
On Error Resume Next
Set xWs = Application.ActiveSheet
Set xRg = xWs.UsedRange
xERg.NumberFormatLocal = "**;**;**;**"
xWs.Unprotect Password:=xStrPw
For Each xERg In xRg
    If xERg.Locked Then xERg.NumberFormatLocal = "@"
Next
End Sub

2。VBA コードを使用する場合でも、セルの内容は数式バーで確認できます。

セルの内容を任意の特殊文字列で暗号化・マスクしたい場合は、セルの暗号化機能がKutools for Excelでお役に立ちます。

Kutools for Excel を無料でインストール（30 日間の無料トライアル付き） 後、以下の手順に従ってください。

1。マスクしたいセルを選択し、「KUTOOLS PLUS > セルの暗号化」をクリックします。

2。表示されるダイアログでパスワードを入力・確認し、「マスク」セクションから必要なオプションを選択してください。

3。「OK」をクリックすると、選択したすべてのセルがマスクされます。

なしをチェックすると、セルにランダムな文字列が表示されます。

文字オプションをオンにすると、テキストボックスに任意の文字を入力でき、セルにはその文字だけが表示されます。

文字列オプションをオンにすると、セルに表示したい文字列を入力できます。

ヒント：セルを復号して内容を表示するには、「KUTOOLS PLUS > セルの復号化」をクリックし、パスワードを入力して正常に復号してください。

最高の Office 業務効率化ツール

🤖	KUTOOLS AI アシスタント：次に基づいてデータ分析を革新します：インテリジェント実行   ｜  コード生成｜  カスタム数式作成  ｜  データ分析とチャート生成｜  拡張機能呼び出し…
	人気の機能：検索・ハイライト、または重複をマーキング   ｜  空白行を削除する   ｜  データを失うことなく列の結合またはセルを   ｜  数式を使用しない四捨五入...
	スーパー LOOKUP：複数条件 VLookup  ｜  複数値 VLookup  ｜   複数シート間 VLookup   ｜   ファジーマッチ....
	高度なドロップダウンリスト：ドロップダウンリストをすばやく作成   ｜  連動型ドロップダウンリスト   ｜  複数選択可能なドロップダウンリスト....
	列マネージャー：指定した数の列を追加｜列の移動｜非表示列の表示状態を切り替え｜範囲および列の比較...
	注目の機能：グリッドフォーカス   ｜  デザインビュー   ｜強化された数式バー   ｜ ワークブックとシートマネージャー   ｜  リソースライブラリ（オートテキスト）｜  日付ピッカー   ｜  ワークシートの統合  ｜  暗号化／セルの復号化   ｜ リストからメール送信   ｜  スーパーフィルター   ｜   特殊フィルタ（太字のフォントを持つセルをフィルタリング／斜体／取り消し線。。。） 。。。
	トップ15 ツールセット：12 テキストツール（テキストの追加、特定の文字を削除、...）｜   50+チャートタイプ（ガントチャート、...）｜   40+実用的関数（誕生日に基づいて年齢を計算します、...）｜   19 挿入ツール（QR コードを挿入、パスから画像を挿入、...）｜   12 変換ツール（単語に変換する、為替レートの変換、...）｜   7 結合と分割ツール（高度な行のマージ、セルの分割、...）｜さらに多数

Kutools はお好みの言語でご利用いただけます。英語、スペイン語、ドイツ語、フランス語、中国語、および40+の他の言語をサポートしています！

Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。

Kutools for Excel の詳細はこちら。。。無料ダウンロード。。。

---

Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします

• Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
• 複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
• 日々の生産性を50％も向上させ、毎日数百回ものマウスクリックを削減します！

Office Tab の詳細はこちら。。。無料ダウンロード。。。

---

すべてのKutools アドインが、たった1 つのインストーラーで完結。

Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。

• オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン＋Office Tab Pro
• インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能（MSI 対応）
• 連携してさらにパワーアップ— Office アプリ全体で生産性が向上
• 30 日間のフル機能トライアル— 登録不要、クレジットカード不要
• 最高のお得感— 個別アドイン購入よりお得

Kutools for Office の詳細はこちら。。。無料ダウンロード。。。