复杂的Excel公式

Question

我有什么可能是一个奇怪的公式，我需要在Excel中创建，并不知道如何完成这一点。

我在一张工作表中有一个值，我想将其拉入另一个工作表中的另一个单元格中。这部分很简单。我想要做的是在内容被拉入之前（在同一个单元格中）有一个领导者文本。到目前为止，我认为这也很容易。现在复杂的部分。我希望领导者的文字是一种颜色和重量，从工作表1中拉入的文字是不同的颜色和重量。

有什么想法？因此，它可能是这样的：

来源： Brian的业务

其中“来源：”都是红色粗体和“Brian的业务”是黑色和正常体重。

关于如何完成此任务的任何想法？

在此先感谢。

布赖恩

Answer 1

这是我做过什么用VBA宏，你可以做同样的事情，它采用您的需求

Sub Macro1() 
    Range("F28").Select 
    ActiveCell.FormulaR1C1 = "hjkljhklhjkl : ddfff" 
    With ActiveCell.Characters(Start:=1, Length:=0).Font 
     .Name = "Arial" 
     .FontStyle = "Regular" 
     .Size = 10 
     .Strikethrough = False 
     .Superscript = False 
     .Subscript = False 
     .OutlineFont = False 
     .Shadow = False 
     .Underline = xlUnderlineStyleNone 
     .Color = -16777216 
     .TintAndShade = 0 
     .ThemeFont = xlThemeFontNone 
    End With 
    With ActiveCell.Characters(Start:=1, Length:=7).Font 
     .Name = "Arial" 
     .FontStyle = "Bold" 
     .Size = 10 
     .Strikethrough = False 
     .Superscript = False 
     .Subscript = False 
     .OutlineFont = False 
     .Shadow = False 
     .Underline = xlUnderlineStyleNone 
     .Color = -16776961 
     .TintAndShade = 0 
     .ThemeFont = xlThemeFontNone 
    End With 
    With ActiveCell.Characters(Start:=8, Length:=2).Font 
     .Name = "Arial" 
     .FontStyle = "Regular" 
     .Size = 10 
     .Strikethrough = False 
     .Superscript = False 
     .Subscript = False 
     .OutlineFont = False 
     .Shadow = False 
     .Underline = xlUnderlineStyleNone 
     .Color = -16777216 
     .TintAndShade = 0 
     .ThemeFont = xlThemeFontNone 
    End With 
    With ActiveCell.Characters(Start:=10, Length:=11).Font 
     .Name = "Arial" 
     .FontStyle = "Regular" 
     .Size = 10 
     .Strikethrough = False 
     .Superscript = False 
     .Subscript = False 
     .OutlineFont = False 
     .Shadow = False 
     .Underline = xlUnderlineStyleNone 
     .ThemeColor = xlThemeColorLight1 
     .TintAndShade = 0 
     .ThemeFont = xlThemeFontNone 
    End With 
End Sub