カークは「yd2」のようなものを検索し、それを「yd2」に置き換える必要があります

ここで、「2」は上付き文字です。彼は、Excelでそれを行う方法があるかどうか疑問に思います。

Excelの検索および置換機能は、そのような置換が比較的簡単なWordの機能よりも制限されています。情報をWordにエクスポートし、置換を行ってからExcelにインポートし直すことはできますが、Excelを離れることなく実行できることがいくつかあります。

ただし、最初に、うまくいくと合理的に思われるかもしれないが、実際にはうまくいかないことを調べてみましょう。 [検索と置換]ダイアログボックスの[置換]タブは、置換として使用するテキストの属性を指定する方法を提供しているように見えることに注意してください。これにより、次のことができると思われるかもしれません。

。 yd2のすべてのインスタンスをyd に置き換えます。 のすべてのインスタンスを上付き2に置き換えます。

これは理論的には良いように聞こえますが、機能しません。置換2が上付き文字に設定されていることを確認するなど、手順に従うことができます。ただし、問題は、Excelが2だけでなく、セル全体に上付き文字形式を適用することです。したがって、yd2は完全に上付き文字になります。

必要に応じて、上付き文字をすべてスキップして、上付き文字で表示される書体文字を使用することもできます。 [記号]ダイアログボックスを使用すると、上付き文字で表示される0〜3の数字を見つけることができます。置換テキストで上付き数字2(ASCII 178)を使用すると、目的の外観を得ることができます。次の手順に従ってください:

。 Ctrl + Hを押して、[検索と置換]ダイアログボックスの[置換]タブを表示します。 (図1を参照)

。 [検索する文字列]ボックスにyd2と入力します。

。 [置換]ボックスにydと入力し、Altキーを押しながらテンキーで0178と入力します。

。 [すべて置換]をクリックします。

最後に、本当に上付き文字を使用したい場合は、マクロを使用して書式設定を行うのが最善の策です。最も単純な方法は、提供されている特定の例に関連付けられています。つまり、2 inyd2の上付き文字を作成します。

Sub DoConvert()

Dim c As Range

For Each c In Selection.Cells         If c.Value = "yd2" Then             c.Characters(3, 1).Font.Superscript = True         End If     Next End Sub

マクロを使用するには、変更するセルを選択してから、マクロを実行します。選択範囲の各セルがステップスルーされ、テキストyd2が含まれているかどうかが確認されます。含まれている場合、3番目の文字(2)は上付き文字になります。セルの残りの部分は邪魔されません。

注:

このページ(または_ExcelTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント(5490)は、Microsoft Excel 97、2000、2002、および2003に適用されます。Excel(Excel 2007以降)のリボンインターフェイス用のこのヒントのバージョンは、次の場所にあります。