Html VBA是否具有与<；i>&引用；“文本”</我>；？

嗨，我正在尝试使用vba将文本斜体化。是否存在与HTMLs“文本”等效的VBA

---

谢谢

您可以使用以下示例VBA代码段（斜体字体）实现它：

或按如下方式设置斜体/粗体：

Worksheets("Sheet1").Range("A1").Font.FontStyle = "Bold Italic"

（回复：）

在更一般的情况下，您可以将此技术应用于Excel

单元格中的整个文本，或仅应用于其中的一部分，如下所示：

'demonstrate font Italic/Bold applied to part of Excel cell
Sub DemoFontItalicBold()
    Range("A1").Value = "This is Just a Sample Text"

   'display "A1" 4 initial chars in bold/italic typeface
    Range("A1").Characters(1, 4).Font.FontStyle = "Bold Italic"

    'set the word "Sample" in Italic typeface
    Range("A1").Characters(WorksheetFunction.Find("Sample", Range("A1").Value, 1), Len("Sample")).Font.Italic = True

    'set the word "Text" in bold typeface
    Range("A1").Characters(WorksheetFunction.Find("Text", Range("A1").Value, 1), Len("Text")).Font.Bold = True
End Sub

可以使用以下示例VBA代码段（斜体字体）实现此功能：

或按如下方式设置斜体/粗体：

Worksheets("Sheet1").Range("A1").Font.FontStyle = "Bold Italic"

（回复：）

在更一般的情况下，您可以将此技术应用于Excel
单元格中的整个文本，或仅应用于其中的一部分，如下所示：

'demonstrate font Italic/Bold applied to part of Excel cell
Sub DemoFontItalicBold()
    Range("A1").Value = "This is Just a Sample Text"

   'display "A1" 4 initial chars in bold/italic typeface
    Range("A1").Characters(1, 4).Font.FontStyle = "Bold Italic"

    'set the word "Sample" in Italic typeface
    Range("A1").Characters(WorksheetFunction.Find("Sample", Range("A1").Value, 1), Len("Sample")).Font.Italic = True

    'set the word "Text" in bold typeface
    Range("A1").Characters(WorksheetFunction.Find("Text", Range("A1").Value, 1), Len("Text")).Font.Bold = True
End Sub

我会说“不”，它们是两种不同的编码语言。VBA你需要写在你想要的范围斜体。我会说“不”，他们是两种不同的编码语言。VBA你需要写在你想要的范围斜体。