Cherylは、列Aに「Smith、Jane」という形式のクライアント名が含まれているワークシートを使用しています。彼女は、「SMITH、Jane」のように姓のみを大文字にし、残りの名前は変更しないでください。

姓と名を区切るコンマが1つしかない場合は、変換を行う式を作成できます。名前がA1にあるとすると、式は次のようになります。

=UPPER(LEFT(A1,FIND(",",A1)-1))&MID(A1,FIND(",",A1),LEN(A1))

数式を使用したくない場合（ワークシートの外観を台無しにする可能性があります）、マクロを使用して名前を適切に変換することもできます。

次のことを考慮してください：

Sub CapitalizeSurnames()

Dim rCell As Range     Dim iComma As Integer     For Each rCell In Selection         iComma = InStr(rCell, ",")

If iComma > 0 Then             rCell = UCase(Left(rCell, iComma - 1)) & _               Mid(rCell, iComma)

End If     Next     Set rCell = Nothing End Sub

変換するセル（列Aのセルなど）を選択して、マクロを実行するだけです。セル内の名前に変換されます。

注：

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

link：/ excelribbon-ExcelTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]。

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

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

link：/ excelribbon-Capitalizing_Just_a_Surname [Capitalizing Just aSurname]。