Fatal编程技术网
  • excel/
  • Excel VBA，将变量写入单元格时更改字体大小

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

excel vba

Excel VBA，将变量写入单元格时更改字体大小,excel,vba,Excel,Vba,我当前将变量页面标题写入单元格。 但我似乎无法改变字体大小 这当前循环通过B列，每行添加一个，并写入我的变量 Sheets("stack").Range("B" & max_row_front + 1).value = page_title 但是，我想更改目标工作表（堆栈）上的字体，而不是它的来源 谢谢。您试过.Font.Size吗 Dim fontSize As Integer: fontSize = 14 Sheets("stack").Range("B" & max_ro

我当前将变量
页面标题
写入单元格。
但我似乎无法改变字体大小

这当前循环通过B列，每行添加一个，并写入我的变量


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


但是，我想更改目标工作表（
堆栈
）上的字体，而不是它的来源


谢谢。
您试过
.Font.Size
吗


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



您是否尝试过
.Font.Size


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



您可以使用此代码更改“页面标题”值的字体和大小


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



希望这能对您有所帮助。
您可以使用此代码更改“页面标题”值的字体和大小


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


希望这能帮助你