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

希望这可以为您提供帮助。