Question

我有以下VBA代码，A和B持有一些字符串。我想将这些值与其他字符串连接起来并将结果存储在不同的单元格中，但我希望仅 A和B中的字符串格式化为粗体其余的作为普通文本。

Set A = Worksheets("Mapping").Cells(rowNumber, columnNumber)
Set B = Worksheets("Mapping").Cells(rowNumber, 3)

' E.g.: A="currency", B="Small Int"

Worksheets("TestCases").Cells(i, 2) = "Verify the column " & A & " has same Data type " & B & " in code as well as Requirement document"

预期产出：

验证列货币在代码中具有相同的数据类型 Small Int 以及需求文档

注意：A和B的值不断变化，因此我们无法使用Characters()函数。

任何帮助都将受到高度赞赏。

Answer 1

您可以使用Characters()方法 - 您只需要跟踪子字符串的长度。就个人而言，我会将静态字符串存储在变量中，以便我可以在以后更改它们，而无需手动重新计算索引：

' Untested

Set A = Worksheets("Mapping").Cells(rowNumber, columnNumber)
Set B = Worksheets("Mapping").Cells(rowNumber, 3)
Dim S1 = "Verify the column "
Dim S2 = " has same Data type "
Dim S3 = " in code as well as Requirement document"

With Worksheets("TestCases").Cells(i, 2)
    .Value = S1 & A & S2 & B & S3
    .Characters(Len(S1), Len(A)).Font.Bold
    .Characters(Len(S1)+Len(A)+Len(S2), Len(B)).Font.Bold
End With

Answer 2

更改字体样式的功能是：

var response = _httpClient.PostAsync(_baseUrl + method, request, jsonFormat).Result;

因此可能会有所作为：

[Cells/Cell range].Font.FontStyle = "Bold"

你也可以让事情有下划线，删除线等...我发现这篇真的很有帮助的博客文章会介绍你应该知道的一切：

http://software-solutions-online.com/excel-vba-formating-cells-and-ranges/#Jump4

Answer 3

我认为你应该自己搜索这些信息......不过这是你应该用来将一些单元格数据转换为粗体的代码：

 Worksheets("Mapping").Cells(rowNumber, columnNumber).Font.Bold = True

如何将单元格值的一部分转换为粗体

3 个答案: