[[20171015111053]] 『フォントサイズ縮小』(kysj) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『フォントサイズ縮小』(kysj)

Sub フォント小()

    With Range("G26")
        If 1 < .Font.Size Then
            .Font.Size = .Font.Size - 0.5
        End If
    End With
 End Sub

任意のセルにするにはどうすればいいですか?

< 使用 Excel:Excel2013、使用 OS:unknown >


With ActiveCell
でしょうか。
(マナ) 2017/10/15(日) 11:17

でも、「ホーム」ー「フォント」にある
Aに下向き三角?のボタンをクリックではだめなのでしょうか。

(マナ) 2017/10/15(日) 11:22


ありがとうございました。
(kysj) 2017/10/15(日) 13:18

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.