表の先頭のスペースを削除する(Microsoft Word)
アイリーンがテキストをテーブルに変換するとき、または別のプログラムからテーブルをインポートするとき、最初の実際の文字の前に、セルの一部に先頭のスペースがある場合があります。彼女は、検索と置換を使用して、テーブルのセル内のこれらの先頭のスペースのみを削除する方法があるかどうか疑問に思います。
実際には、検索と置換を使用せずに先頭のスペースを削除する非常に簡単な方法が1つあります。セル内のテキストを左揃えにする必要があると仮定します。次の手順に従ってください:
。テーブルで影響を与えるセルを選択します。
。リボンの[ホーム]タブを表示します。
。 [段落]グループの[テキストの中央揃え]ツールをクリックします。選択したセルのすべてのテキストが中央に配置されます。
。 [段落]グループの[テキストを左揃え]ツールをクリックします。
それでおしまい;手順3を実行すると、先頭のスペースはWordによって自動的に削除されます。ステップ4は、テキストを元の位置に戻すだけです。追加のボーナスは、これらの手順により、スペースだけでなく、テキストの先頭にある空白が実際に削除されることです。
どうしても検索と置換を使用してスペースを削除したい場合は、単一の検索と置換操作を使用してそれを行うことはできません。複数のパスを使用してそれを行う方法のアイデアは次のとおりです。
。テーブルを選択します。
。 Ctrl + Hを押します。 Wordは、[検索と置換]ダイアログボックスの[置換]タブを表示します。
。利用可能な場合は、[その他]ボタンをクリックします。 (図1を参照)
。 [検索する文字列]ボックスの内容をすべて消去しますが、挿入ポイントがまだボックス内にあることを確認してください。
。 [フォーマット]ボタンをクリックしてから、[スタイル]をクリックします。 Wordは、[スタイルの検索]ダイアログボックスを表示します。 (図2を参照)
。表のテキストで使用されているスタイルを選択します。 (これが通常のスタイルになる可能性が高いです。)
。 [置換]ボックスに$#$ ^&と入力します。これは、見つかったもの(手順6で選択したスタイルでフォーマットされたテキスト)の前に一意の文字セット($#$)を付けることを指定します。
。 [すべて置換]をクリックします。
。 [検索する文字列]ボックスに$#$ ^ wと入力します。これは、一意の文字の後に空白が続くものを検索することを指定します。 (これには先頭のスペースが含まれます。)
。 [フォーマットなし]ボタンをクリックします。
。 [置換]ボックスの内容をすべて削除します。
。 [すべて置換]をクリックします。
。 [検索する文字列]ボックスに$#$と入力します。これは、残りの一意の文字を検索することを指定します。
。 [すべて置換]をクリックします。
必要に応じて、マクロを使用して先頭のスペースを削除することもできます。マクロが行う必要があるのは、テーブル内のすべてのセルをステップスルーし、先頭のスペースを削除することだけです。
Sub DeleteCellLeadingSpace() Dim aCell As Cell Dim aRow As Row Dim cText As String If Selection.Information(wdWithInTable) Then For Each aRow In Selection.Tables(1).Rows For Each aCell In aRow.Cells cText = aCell.Range.Text cText = LTrim(cText) aCell.Range.Text = Left(cText, Len(cText) - 2) Next aCell Next aRow Else MsgBox "Insertion point must be in a table." End If End Sub
このマクロが(cText変数から)セルに情報を詰め込むとき、最後の2文字以外のすべてを詰め込むだけであることに注意してください。これを行わないと、テーブルの各セルに追加のハードリターンが発生します。
注:
このページ(または_WordTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。
_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。
(Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。)このヒント(1263)は、Microsoft Word 2007、2010、2013、および2016に適用されます。