メインコンテンツへスキップ

ExcelのXNUMXつのセル内でテキストを交換または切り替える方法は?

多くの場合、目的によっては、XNUMXつのセルでテキストを入れ替える必要があります。 たとえば、セルにSmith Johnという名前が含まれている場合、名前をJohn Smithに変更するには、セル内のテキストを交換する必要があります。 この記事では、この問題を解決するためのいくつかの方法を示します。

数式を使用して、XNUMXつのセル内でテキストを入れ替えたり切り替えたりします
VBAコードを使用して、XNUMXつのセル内でテキストを入れ替えたり切り替えたりします
Kutools for Excelにより、XNUMXつのセル内でテキストを簡単に交換または切り替えることができます


数式を使用して、XNUMXつのセル内でテキストを入れ替えたり切り替えたりします

次の数式は、ExcelのXNUMXつのセル内でテキストを入れ替えるのに役立ちます。 次のようにしてください。

1.空白のセルを選択してスワップされたデータを見つけ、数式を数式バーに入力してから、 入力します キー。 スクリーンショットを参照してください:

=RIGHT(A2,LEN(A2)-FIND(" ",A2)) & " " & LEFT(A2,FIND(" ",A2)-1)

2.結果セルを選択し、塗りつぶしハンドルを下にドラッグして、以下のスクリーンショットに示すように残りの結果を取得します。

次に、指定したセルで姓と名が入れ替わっていることがわかります。

Note:このメソッドは、スペースで区切られたXNUMXつのセル内のXNUMXつのテキストのみを交換できます。


ExcelのXNUMXつのセル内でテキストを簡単に交換または切り替えることができます。

最大XNUMXWの出力を提供する リバーステキスト の有用性 Kutools for Excel 以下のデモに示すように、Excelの特定の区切り文字を使用して、XNUMXつのセル内でテキストを簡単に入れ替えることができます。
ダウンロードして今すぐ試してみてください! (30 日間の無料トレイル)


VBAコードを使用して、XNUMXつのセル内でテキストを入れ替えたり切り替えたりします

上記の例のように、次のVBAスクリプトを実行して、XNUMXつのセル内でテキストを交換または切り替えることもできます。

1。 プレス 他の + F11 キーを同時に開いて アプリケーション向け Microsoft Visual Basic 窓。

2。 の中に アプリケーション向け Microsoft Visual Basic ウィンドウ、クリック インセット > モジュール。 次に、以下のVBAコードをコピーしてモジュールウィンドウに貼り付けます。

VBAコード:XNUMXつのセル内でテキストを交換または切り替える

Sub res()
    Dim xRg As Range, yRg As Range
    Dim LastRow As Long, i As Long
    Dim strTxt As String, strFs As String
    Dim strLs As String, N As Integer
    On Error Resume Next
    Set xRg = Application.InputBox(Prompt:="Range Selection:", _
                                    Title:="Kutools for excel", Type:=8)
    For Each yRg In xRg
        On Error Resume Next
        strTxt = yRg.Value
        Trim (strTxt)
        N = InStr(strTxt, " ")
        strLs = Left(strTxt, N - 1)
        strFs = Right(strTxt, Len(strTxt) - N)
        yRg.Value = strFs & " " & strLs
    Next
End Sub

3。 プレス F5 コードを実行するためのキー。 ポップアップで Kutools for Excel ダイアログボックスで、スワップする必要のあるデータの範囲を選択し、[ OK ボタン。 スクリーンショットを参照してください:

次に、指定した名前のセルのテキストがすぐに交換されるのを確認できます。

Note:このコードは、スペースで正しく区切られているXNUMXつのセル内のXNUMXつの単語を交換することもできます。


Kutools for Excelにより、XNUMXつのセル内でテキストを簡単に交換または切り替えることができます

このセクションでは、この問題を簡単に解決できるように、Kutools forExcelのテキストの逆順ユーティリティをお勧めします。 次のようにしてください。

申請する前に Kutools for Excelについては 最初にダウンロードしてインストールします.

1.スワップする必要のあるテキストが含まれている範囲を選択し、[ クツール > テキスト > テキストの順序を逆にする。 スクリーンショットを参照してください:

2。 の中に リバーステキスト ダイアログボックスで、テキストを交換する区切り文字を指定します。 セパレータ セクション。 この場合、私は スペース オプション。 そして、 OK

次に、選択したセルのデータが、指定した区切り文字によって同じセルですぐに交換されることを確認できます。

  このユーティリティの無料トライアル(30日)が必要な場合は、 クリックしてダウンロードしてください、次に、上記の手順に従って操作を適用します。


デモ:Kutools for Excelにより、XNUMXつのセル内でテキストを簡単に交換または切り替えることができます

関連記事:

最高のオフィス生産性向上ツール

人気の機能: 重複を検索、強調表示、または識別する   |  空白行を削除する   |  データを失わずに列またはセルを結合する   |   数式なしのラウンド ...
スーパールックアップ: 複数の基準の VLookup    複数の値の VLookup  |   複数のシートにわたる VLookup   |   ファジールックアップ ....
詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する   |  依存関係のドロップダウン リスト   |  複数選択のドロップダウンリスト ....
列マネージャー: 特定の数の列を追加する  |  列の移動  |  Toggle 非表示列の表示ステータス  |  範囲と列の比較 ...
注目の機能: グリッドフォーカス   |  デザインビュー   |   ビッグフォーミュラバー    ワークブックとシートマネージャー   |  リソースライブラリ (自動テキスト)   |  日付ピッカー   |  ワークシートを組み合わせる   |  セルの暗号化/復号化    リストごとにメールを送信する   |  スーパーフィルター   |   特殊フィルター (太字/斜体/取り消し線をフィルター...) ...
上位 15 のツールセット12 テキスト 工具 (テキストを追加, 文字を削除する、...)   |   50+ チャート 種類 (ガントチャート、...)   |   40+ 実用的 (誕生日に基づいて年齢を計算する、...)   |   19 挿入 工具 (QRコードを挿入, パスから画像を挿入、...)   |   12 変換 工具 (数字から言葉へ, 通貨の換算、...)   |   7 マージ&スプリット 工具 (高度な結合行, 分割セル、...)   |   ... もっと

Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。  最も必要な機能を入手するにはここをクリックしてください...

kteタブ201905


Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作​​業をはるかに簡単にします

  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thank you for the VBA code.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations