Zum Beispiel: Der Inhalt der Zelle A1 ist: Lehrer
Der Inhalt der Zelle B1 lautet: Hallo
Sie möchten den Inhalt der Zellen A1 und B1 zusammenführen zu: Hallo Lehrer, dann lautet die Formel von C1: =A1&B1
Das ist es!
Wenn Sie zwei Zellen eingegeben haben und den Inhalt zusammenführen möchten, können Sie meiner folgenden Methode folgen:
Jeder weiß, dass in Excel beim Zusammenführen mehrerer Zellen zu einer Zelle die Zusammenführungsfunktion von Excel nur den Inhalt einer Zelle in der oberen linken Ecke beibehalten kann und der Inhalt anderer Zellen verworfen wird. Manchmal müssen wir den gesamten zusammengeführten Inhalt in einer Zelle behalten. Unten ist ein VBA-Makro, das ich erstellt habe, um diese Funktion zu erreichen.
Drücken Sie zunächst die Tastenkombination ALT+F11, um das VBA-Fenster zu öffnen, drücken Sie im oberen Menü „Einfügen – Modul“, um ein Modul einzufügen, und kopieren Sie den folgenden Code hinein:
Sub merge 1()
Application.DisplayAlerts = False
Set tt = Auswahl 'Ausgewählten Bereich zuweisen
a = tt.Rows.Count 'Anzahl der Auswahlzeilen
x = tt.Row 'Die erste Zeilennummer
y = tt.Column 'Spaltennummer
s = tt.Columns.Count - 1 'Verringern Sie die Anzahl der Spalten um 1
Für j = x Zu x + a - 1
Für i = 1 bis s
Zellen(j, y) = Zellen(j, y) & Zellen(j, y + i)
Weiter
Range(Cells(j, y), Cells(j, y + s)).Merge 'Merge
Weiter
Application.DisplayAlerts = True
End Sub
Sub merge2()
t = ""
Set tt = Auswahl
x = tt.Row 'Die erste Zeilennummer
y = tt.Column 'Spaltennummer
Für jeden eine In-Auswahl
t = t & a.Value
a.Value = ""
Weiter
Zellen(x, y) = t
Auswahl.Zusammenführen
Selection.WrapText = True 'Zeilen automatisch umbrechen
End Sub
Schließen Sie nach dem Kopieren dieses Fenster, kehren Sie zu EXCEL zurück, drücken Sie AIT+F8 und klicken Sie auf Ausführen!
Ich hoffe, es kann Ihnen helfen!
Sub aa()
'Sortieren
arr = Bereich("D3:M9").Wert
Für i = 1 To UBound(arr, 1)
Für j = 1 To UBound(arr, 2) - 1
Für k = j + 1 zu UBound(arr, 2)
Wenn arr(i, k)
tmp = arr(i, j)
arr(i, j) = arr(i, k)
arr(i, k) = tmp
Ende wenn
Weiter
Weiter
Weiter
Für i = 1 To UBound(arr, 1)
x = Zellen(i + 2, 2)
f = Falsch
s = arr(i, 1)
Für j = 1 To UBound(arr, 2)
If arr(i, j) = x Then f = True 'Ob rot ausgefüllt werden soll
Wenn j > 1, dann ‚Duplikate entfernen
‘Wenn arr(i, j) arr(i, j - 1) Dann
s = s & "," & arr(i, j)
Ende wenn
Ende wenn
Weiter
Setze rg = Range("N" & (i + 2))
rg.Value = s
Wenn f, dann ist rg.Interior.ColorIndex = 3
Weiter
End Sub
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Unterzellen automatisch zusammenführen und ()
Application.ScreenUpdating = False
j = Range("F"& Rows.Count).End(3).Row
Range("G3:G"& j).UnMerge
Range("G3:G"& j).ClearContents
n = Bereich("F3")
m = 3
Fori = 4 Toj
IfRange("B"& i) = ""Then
n = n + Bereich("F"& i)
Sonst
Range("G"& i - 1) = IIf(n = 0, "", n)
Ifm
n = Bereich("F"& i)
m = ich
EndIf
Weiter
Range("G"& i - 1) = IIf(n = 0, "", n)
Ifm
Application.ScreenUpdating = True
EndSub
Öffnen Sie das Excel-Dokument, das zusammengeführt werden muss, und suchen Sie die Objektzelle.
Verwenden Sie Zeichenverbinder:
Verwenden Sie zum Verbinden den Zeichenverbinder „&“. Diese Methode wird verwendet, wenn Daten aus einigen Zellen zusammengeführt werden. Zum Beispiel: B1=A1&A2;B1=A1&A2&A3, ein Tastendruck. Spezifische Vorgänge finden Sie im Bild.
Textfunktionen verwenden:
Verwenden Sie die Textfunktion CONCATENATE() zum Beispiel: CONCATENATE(A1,A2,A3,......A255), jedoch: Die CONCATENATE-Funktion kann bis zu 255 Textzeichenfolgen zu einer Textzeichenfolge verketten. Join-Elemente können Text, Zahlen, Zellbezüge oder eine Kombination davon sein. Wenn Ihr Arbeitsblatt beispielsweise den Vornamen einer Person in Zelle A1 und ihren Nachnamen in Zelle B1 enthält, können Sie die beiden Werte mithilfe der folgenden Formel in einer anderen Zelle kombinieren.
Der spezifische Vorgang ist wie im Bild dargestellt.
Anleitung zur Funktionsnutzung:
CONCATENATE(text1, [text2], ...)
Die Syntax der CONCATENATE-Funktion weist die folgenden Parameter auf (Parameter: Werte, die Informationen für eine Operation, ein Ereignis, eine Methode, eine Eigenschaft, eine Funktion oder eine Prozedur bereitstellen.):Text1 erforderlich. Das erste zu verkettende Textelement.
Text2, ... optional. Zusätzliche Textelemente, bis zu 255 Elemente. Begriffe müssen durch Kommas getrennt werden.
Hinweis Sie können anstelle der CONCATENATE-Funktion auch den Berechnungsoperator „kaufmännisches Und“ (&) verwenden, um Textelemente zu verbinden. Beispielsweise gibt =A1 & B1 denselben Wert zurück wie =CONCATENATE(A1, B1).
Informationsfunktion nutzen:
PHONETIC() dient dazu, eine Zeichenfolge zu erhalten, die Pinyin-Informationen darstellt, die hauptsächlich für Japanisch verwendet werden, es können keine Zahlen verwendet werden. Der spezifische Vorgang ist in der Abbildung dargestellt.
Beschreibung der Informationsfunktion:
PHONETIC(Referenz)
PHONETIC-Funktionssyntax hat die folgenden Parameter (Parameter: Werte, die Informationen für eine Operation, ein Ereignis, eine Methode, eine Eigenschaft, eine Funktion oder eine Prozedur bereitstellen.): Referenz erforderlich. Eine Textzeichenfolge oder ein Verweis auf eine einzelne Zelle oder einen Zellbereich, die eine Furigana-Textzeichenfolge enthält.
Beschreibung: Wenn es sich bei der Referenz um einen Zellbereich handelt, wird die Furigana-Textzeichenfolge in der oberen linken Eckzelle des Bereichs zurückgegeben. Wenn es sich bei der Referenz um einen Bereich nicht benachbarter Zellen handelt, wird der Fehlerwert #N/A zurückgegeben.
Mehrere Datentypen zum Zusammenführen:
Diese Methode kombiniert hauptsächlich Zeichendateninhalte und numerische Daten.
1. Wenn numerische Daten und Zeichendaten zusammengeführt werden sollen, müssen Sie zunächst die zusammenzuführenden numerischen Daten formatieren und in einen Zeichentyp (Texttyp) konvertieren.
2. Die PHONETIC-Funktion (Referenz) kann bequemer über den Datenbereich bedient werden.
3. Die Funktion CONCATENATE(text1, [text2], ...) muss Zelle für Zelle hinzugefügt werden.
4. Der Zeichenverbinder „&“ muss in jeder zusammengeführten Zelle verwendet werden.
Mit der VBA-Methode erreichen Sie:
Das obige ist der detaillierte Inhalt vonSo verschmelzen Sie den Inhalt zweier Zellen mit dem Inhalt einer Zelle. Für weitere Informationen folgen Sie bitte anderen verwandten Artikeln auf der PHP chinesischen Website!