FC2ブログ

百以上で赤太字にする

2018–01–09 (Tue) 22:52
Sub 百以上で赤太字にする()
'
' Macro1 Macro
'

'
Application.WindowState = xlMaximized
Application.WindowState = xlNormal
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
Formula1:="=100"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Font
.Bold = True
.Italic = False
.Color = -16776961
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False
End Sub
スポンサーサイト



« 時間によって色を変えるマクロ | HOME |  時間以上で色を変更する »

コメント

コメントの投稿

 
管理者にだけ表示

 | HOME | 

プロフィール

はる

Author:はる
FC2ブログへようこそ!

最新記事

最新コメント

フリーエリア

月別アーカイブ

カテゴリ

ブロとも申請フォーム

検索フォーム

RSSリンクの表示

リンク