- | 作者まとめ |
作者まとめ
|
+ | 更新状況 |
更新状況- はてな
はてなアンテナ - - 人気サイト
|
+ | 配信サイト一覧 |
配信サイト一覧- はてな
はてなアンテナ - - 配信サイト
リンク切れチェック用 |
+ | Wiki更新履歴 |
Wiki更新履歴
取得中です。
|
- | - | - |
通常は文字選択→右クリック押して→セルの書式ダイアログ開いて→チェック打って→OK 文字選んで→上付下付にできたら嬉しい 個人的にはこんな形にしたい
これWORDにはあるんだけどなー。EXCELにもつけて欲しい 結局、入力中だとマクロは動かないので機能しない
で
なんやかんや考えて、フォーム作ってこれに落ち着いた。 まあいいか
Sub CommandButton1_Click() If FormulaBox.SelLength = 0 Then Exit Sub With ActiveCell.Characters(Start:=FormulaBox.SelStart + 1, Length:=FormulaBox.SelLength).Font If .Superscript = Null Or .Superscript = True Then .Superscript = False Else .Superscript = True End With End Sub
Sub CommandButton2_Click() If FormulaBox.SelLength = 0 Then Exit Sub With ActiveCell.Characters(Start:=FormulaBox.SelStart + 1, Length:=FormulaBox.SelLength).Font If .Subscript = Null Or .Subscript = True Then .Subscript = False Else .Subscript = True End With End Sub