普通に打ち込んで、最終的に
VBAで一括フォント置換すればいいんでは
Sub FontUnity()
Dim TargetSheets As Worksheet
For Each TargetSheets In Worksheets
With TargetSheets.Cells.Font
'和文フォント設定
.Name = \u0026quot;JS平成明朝体 W3\u0026quot;
End With
Next TargetSheets
End Sub
っていうか、
JustSystems系アプリが無いと
JSフォントが無いはずだし