Database 从VB.NET编辑excel

我需要一些关于从VB.NET在excel的单个单元格中应用多个编辑选项的提示

我有一个excel文档，需要在一个单元格中输入三行文本。
这三行将保存为数据库中带分隔符的单个文本。
我已经从数据库中获取了文本并将其应用到Excel中，但是单个单元格中的三行文本有三种不同的格式

例如：
-第一行必须是粗体和粉红色，并且采用
-第二行一些字母需要用粗体和蓝色，并且
-第三行为黑色，没有格式

如何通过编程将这三种格式应用于从数据库获取的三行单文本

是否有办法在VB.NET本身中执行此操作，或者我是否可以进行一些其他绕过编码，以便在Excel中插入后对文本进行格式化，或者我可以修改数据库中的文本，以便在插入时识别格式

以下是我目前掌握的代码：

wk = ex.Workbooks.Open("TEST.xls") st = wk.Worksheets(1) 
st.Cells(row, 3) = reader.GetValue(5).ToString()

---

很简单，在Excel中记录一个宏，然后将代码移植到VB.net

下面是录音：

Sub Macro1()
'
' Macro1 Macro
'

'
    ActiveCell.FormulaR1C1 = "line1, line2, line3"
    With ActiveCell.Characters(Start:=1, Length:=5).Font
        .Name = "Calibri"
        .FontStyle = "Bold"
        .Size = 11
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ThemeColor = xlThemeColorAccent2
        .TintAndShade = 0.599993896298105
        .ThemeFont = xlThemeFontMinor
    End With
    With ActiveCell.Characters(Start:=8, Length:=5).Font
        .Name = "Calibri"
        .FontStyle = "Bold"
        .Size = 11
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ThemeColor = xlThemeColorLight2
        .TintAndShade = 0.399975585192419
        .ThemeFont = xlThemeFontMinor
    End With
    With ActiveCell.Characters(Start:=13, Length:=7).Font
        .Name = "Calibri"
        .FontStyle = "Regular"
        .Size = 11
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ThemeColor = xlThemeColorLight1
        .TintAndShade = 0
        .ThemeFont = xlThemeFontMinor
    End With
End Sub

现在，只需将该代码移植到VB.net，就完成了

唯一需要确定格式是否从何处开始的事情。

---

为此，您需要搜索行尾字符

请将您目前编写的代码（VB.NET与Excel通信的代码）发布到Excel中，在Excel中记录一个宏以格式化这三行，然后简单地将其移植到VB.NET:）空白是您的朋友。。。把问题放在一个大团块中会使阅读变得非常困难和不愉快……你需要把代码放在问题中：-），而不是注释中。这是我的代码`query\u strg=“Select TEXT from DB1”rs=New SqlCommand（query\u strg，srv\u conn）reader=rs.ExecuteReader（）reader.read（）wk=ex.Workbooks.Open（“TEST.xls”）st=wk.Worksheets（1）st.Cells（行、列）=reader.GetValue（0）.ToString（）`现在，我在excel单元格中粘贴的文本有三行，每行需要使用不同的类别进行格式化。如何操作。我录制了宏，但当我在VB.NET中运行代码时，它抛出异常。在VB.NET中执行宏代码需要做哪些更改？我在excel中记录了一个宏，并在VB.NET中为所需场景执行它，但现在我需要在从VB.NET保存excel时删除该宏。。。如何从VB.NET中删除宏？不，您需要将代码移植到VB.NET，而不是远程执行excel宏。宏代码不会在VB.NET中执行。。。如何使宏代码在VB.net中执行您需要使用VBA作为模板在VB.net中编写宏代码。