資料結構
網路
關係資料庫管理系統
作業系統
Java
MS Excel
iOS
HTML
CSS
Android
Python
C 程式設計
C++
C#
MongoDB
MySQL
Javascript
PHP
物理學
化學
生物學
數學
英語
經濟學
心理學
社會學
服裝設計
法律研究如何將最後一個單詞移動到下一個相鄰單元格？
學習如何使用 Excel 的強大功能可以極大地提高您的工作效率和資料組織，無論您是新手還是經驗豐富的使用者。在本文中，我們將逐步引導您完成一種有效技術，將最後一個單詞從一個單元格移動到其旁邊的單元格。
在本教程中，我們將假設您熟悉 Microsoft Excel 及其基本概念。但是，如果您剛開始使用該軟體，請不要擔心！為了幫助您清楚地理解每個步驟，我們將提供清晰的說明和圖解示例。
將最後一個單詞移動到下一個相鄰單元格
在這裡，我們將首先建立一個 VBA 模組，然後執行它來完成任務。因此，讓我們看看一個簡單的過程，瞭解如何在 Excel 中將最後一個單詞移動到下一個相鄰單元格。
步驟 1
考慮一個 Excel 工作表，其中您有一系列字串。
首先，右鍵單擊工作表名稱並選擇“檢視程式碼”以開啟 VBA 應用程式。
右鍵單擊 > 檢視程式碼。
步驟 2
然後單擊“插入”並選擇“模組”，然後將以下程式碼複製到文字框中。
插入 > 模組 > 複製。
程式碼
Sub splitlastword()
Dim xCell As Range
Dim xStr As String
Dim xAddress As String
Dim xRg As Range
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please selec the text cells:", "Move Last Cell", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
If xRg.Columns.Count > 1 Then
MsgBox "Only one column in the seleted range", vbInformation, "Move Last Cell"
Exit Sub
End If
For Each xCell In xRg
xStr = Trim(xCell.Value)
xCell.Offset(0, 1) = Mid(xStr, InStrRev(xStr, " "))
xCell.Value = Left(xStr, InStrRev(xStr, " "))
Next
End Sub
步驟 3
然後單擊 F5 執行模組。然後選擇單元格範圍並單擊“確定”。
F5 > 選擇單元格 > 確定。
這就是如何在 Excel 中將最後一個單詞移動到下一個相鄰單元格的方法。
結論
在本教程中，我們使用了一個簡單的示例來演示如何在 Excel 中將最後一個單詞移動到下一個相鄰單元格，以突出顯示特定資料集。
更新於: 2023-08-24
284 次瀏覽
廣告