Excel VBA更改页脚字体和字体大小
以下Excel VBA代码在单元格值更改时自动更改页脚,但Excel也会更改字体和大小。我试图保持字体Arial和字体大小10。我该怎么做?谢谢Excel VBA更改页脚字体和字体大小,excel,vba,footer,Excel,Vba,Footer,以下Excel VBA代码在单元格值更改时自动更改页脚,但Excel也会更改字体和大小。我试图保持字体Arial和字体大小10。我该怎么做?谢谢 Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Target.Address = "$E$4" Then ActiveSheet.PageSetup.LeftFooter = Range("
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Target.Address = "$E$4" Then
ActiveSheet.PageSetup.LeftFooter = Range("$G$4").Value
End If
End Sub
试试这个:
ActiveSheet.PageSetup.LeftFooter = "&""Arial""&10" & Range("$G$4").Value
这成功了!谢谢