Excel VBA设置粗体string的特定文本到单元格?

我想在string中设置一些粗体的文字。我该怎么办?

在这里输入图像说明

通过使用字符。

Range("A1").Characters(8, 5).Font.Bold = True 

我会说使用这个dynamic公式 –

 Range("A1").Characters(worksheetfunction.find("Excel",Range("A1").value,1),len("Excel")).font.bold = True 

另一个需要快速修复并且不适合使用VBA的人的方法是:

  1. 将单元格区域复制并粘贴到一个word文档中(起初看起来很乱)。
  2. 去“replace”(右上)。
  3. 在“查找内容:”字段中input要加粗的单词,并将其replace为“replace为:”字段,然后当您在“replace为:”框中按CTRL B.您应该看到“格式:字体:粗体“出现在它下面。
  4. 点击全部replace,你应该看到所有的目标单词变粗体。
  5. 将鼠标hover在Excel文本上(当前位于Word中),您应该看到文本左上angular出现一个4个箭头的小符号。 单击以突出显示单元格,然后复制它们并粘贴回Excel。

不是最快的方式,但如果你不熟悉VBA,并需要快速修复,这将适用于你!

不只是粗体:CTRL I为斜体,CTRL U为下划线。