合併兩個單元格的內容為一個單元格中的內容的方法

如何合併兩個儲存格內容為一個儲存格內容

例如：A1儲存格內容是：老師

B1儲存格內容是：您好

你想把A1和B1儲存格內容合併成：老師您好，那麼C1的公式是：=A1&B1

即可！

如果你兩個單元格已經輸好了，這時又想合併內容，那麼你按照我下面的方法做即可：

大家都知道在EXCEL中，將多個儲存格合併為一個儲存格時，EXCEL的合併功能只能保留左上角一個儲存格的內容，其他儲存格中的內容會被丟棄。而我們有時需要將合併的所有內容都保留到一個單元格中，下面是我製作一個VBA宏，來實現這個功能。

先按ALT F11組合鍵，開啟VBA窗口，按頂部選單「插入-模組」插入一個模組，把下面程式碼複製進去：

Sub 合併1()

Application.DisplayAlerts = False

Set tt = Selection '賦值選取區域

a = tt.Rows.Count '選取行數

x = tt.Row '第一個格行號

y = tt.Column '列號

s = tt.Columns.Count - 1 '列數減1

#For j = x To x a - 1

For i = 1 To s

Cells(j, y) = Cells(j, y) & Cells(j, y i)

Next

Range(Cells(j, y), Cells(j, y s)).Merge '合併

Next

Application.DisplayAlerts = True

End Sub

Sub 合併2()

t = ＂＂

#Set tt = Selection

x = tt.Row '第一個格行號

y = tt.Column '列號

For Each a In Selection

t = t & a.Value

a.Value = ＂＂

Next

Cells(x, y) = t

Selection.Merge

Selection.WrapText = True '自動換行

End Sub

複製好後，關閉這個窗口，回到EXCEL，再按AIT F8，點執行即可！

希望能對你有點幫助！

EXCEL如何用VBA將幾個單元格的資料合併到一個單元格里並去掉

Sub aa()

'排序

arr = Range(＂D3:M9＂).Value

For i = 1 To UBound(arr, 1)

For j = 1 To UBound(arr, 2) - 1

For k = j 1 To UBound(arr, 2)

If arr(i, k)

tmp = arr(i, j)

arr(i, j) = arr(i, k)

arr(i, k) = tmp

End If

Next

Next

Next

For i = 1 To UBound(arr, 1)

x = Cells(i 2, 2)

f = False

s = arr(i, 1)

For j = 1 To UBound(arr, 2)

If arr(i, j) = x Then f = True '是否填入紅色

If j > 1 Then '去重

If arr(i, j) arr(i, j - 1) Then

s = s & ＂,＂ & arr(i, j)

End If

End If

Next

Set rg = Range(＂N＂ & (i 2))

rg.Value = s

If f Then rg.Interior.ColorIndex = 3

Next

End Sub

EXCEL vba實現合併儲存格自動和

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

Sub合併儲存格自動和（）

Application.ScreenUpdating = False

j = Range(＂F＂& Rows.Count).End(3).Row

Range(＂G3:G＂& j).UnMerge

Range(＂G3:G＂& j).ClearContents

n = Range(＂F3＂)

m = 3

Fori = 4 Toj

IfRange(＂B＂& i) = ＂＂Then

n = n Range(＂F＂& i)

Else

Range(＂G＂& i - 1) = IIf(n = 0, ＂＂, n)

Ifm

n = Range(＂F＂& i)

m = i

EndIf

Next

Range(＂G＂& i - 1) = IIf(n = 0, ＂＂, n)

Ifm

Application.ScreenUpdating = True

EndSub

如何將Excel多個儲存格的內容合併到一個儲存格

開啟需要進行合併的excel文檔，並找到物件儲存格。

利用字元連接符號：

使用字元連接符號“&”進行連接。此方法用於合併不多的儲存格資料時使用。例如：B1=A1&A2;B1=A1&A2&A3，一次內推。具體操作見圖。

利用文字函數：

使用文字函數CONCATENATE（)進行操作，例如：CONCATENATE(A1,A2,A3,.......A255)，但是：CONCATENATE 函數可將最多255 個文字字串連結成一個文字字串。聯接項可以是文字、數字、儲存格引用或這些項目的組合。例如，如果您的工作表的儲存格 A1 中包含某個人的名字，則儲存格 B1 中包含這個人的姓氏，那麼，您可以透過使用下列公式將這兩個值合併到另一個儲存格中。

具體操作如圖所示。

函數使用說明：

CONCATENATE(text1, [text2], ...)

CONCATENATE 函數語法有下列參數 （參數：為操作、事件、方法、屬性、函數或程序提供資訊的值。）：

Text1 必要。要連接的第一個文字項。

Text2， ... 可選。其他文本項，最多 255 項。項與項之間必須用逗號隔開。

註解 也可以用與號 （&） 計算運算子來取代 CONCATENATE 函數來聯接文本項。例如，=A1 & B1 與 =CONCATENATE(A1, B1) 傳回的值相同。

利用資訊函數：

PHONETIC （)進行操作 ，取得代表拼音資訊的字串，主要用於日文，它不能使用數字。具體操作如圖。

資訊函數說明：

PHONETIC(reference)

PHONETIC 函數語法有下列參數 （參數：為操作、事件、方法、屬性、函數或流程提供資訊的值。）：Reference 必要。文字字串或對單一儲存格或包含 furigana 文字字串的儲存格區域的引用。

說明：如果 reference 為單元格區域，則傳回區域左上角單元格中的 furigana 文字字串。如果 reference 為不相鄰儲存格的區域，將傳回錯誤值 #N/A。

多種資料類型資料進行合併：

本辦法主要以字元型資料內容與數值型資料合併。

1、如果數值型資料與字元型資料合併，那就必須，先把要合併的數值型資料進行格式設置，轉換位元字元型（文字型）。

2、PHONETIC(reference)函數可以用資料區域來操作，比較方便。

3、CONCATENATE(text1, [text2]， ...)函數必須是一個一個單元格的加。

4、字元連接符號“&”，在每個合併儲存格中都必須使用該符號。

使用VBA的方法實作：

以上是合併兩個單元格的內容為一個單元格中的內容的方法的詳細內容。更多資訊請關注PHP中文網其他相關文章！