在excel中组合两个单元格，但保留字体

我正试图将两个单元格合并成一个多行单元格。 第一个单元格由一个地址组成，第二个单元格包含一个通过使用特殊字体转换为条形码的数字。

第二个单元格的内容应与第一个单元格合并后保留分配给它的字体（条形码字体）。

任何人都可以指向正确的方向吗？

更新：

这是我的工作解决scheme

Sub barcode() Dim i As Integer With Worksheets("sheet4") For i = 2 To 19539 With .Cells(i, "J") .Value = .Offset(0, -2).Value2 & Chr(10) & .Offset(0, -1).Value2 .Characters(Start:=Len(.Offset(0, -2).Value2) + 2, _ Length:=Len(.Offset(0, -1).Value2)).Font.Name = .Offset(0, -1).Font.Name End With Next i End With End Sub 

Answer 1

操纵.Characters属性。

 With Worksheets("sheet4") With .Cells(6, "F") .Value = .Offset(0, -2).Value2 & Chr(10) & .Offset(0, -1).Value2 .Characters(Start:=Len(.Offset(0, -2).Value2) + 1, _ Length:=Len(.Offset(0, -1).Value2)).Font.Name = .Offset(0, -1).Font.Name End With End With