用文本填充选定的单元格

Question

如何使用预定和格式化的文本填充当前选定的单元格？

例如，如果单元格A1突出显示，如果我点击名为Greetings的按钮，它将以粗体填充文本A1的单元格"Hello"，如果我点击一个名为Food的按钮，它将A1填充为bread (linebreak) ham (linebreak) mayo红色。

Answer 1

创建一组小型潜艇，如：

Sub Greetings()
   With ActiveCell
      .Clear
      .Value = "Hello"
      .Font.Bold = True
   End With
End Sub

并将它们分配给相应的按钮。