VBA，将变量写入单元格时字体大小更改

Question

我目前将变量page_title写入单元格。 不过，我似乎无法更改字体大小。

这当前循环遍历 B 列，每行加一并写入我的变量。

Sheets("stack").Range("B" & max_row_front + 1).value = page_title

但是我想更改目标工作表(stack(上的字体，而不是它的来源。

谢谢。

Answer 1

你试过.Font.Size吗？

Dim fontSize As Integer: fontSize = 14
Sheets("stack").Range("B" & max_row_front + 1).Font.Size = fontSize

Answer 2

您可以使用此代码更改"page_title"值的字体和大小。

With Sheets("stack").Range("B" & max_row_front + 1)
.Value = page_title
.Font.Name = "Courier New" 'You can change it for your favorite font ;)
.Font.Size = 11
End With

希望这能帮助你。