コンサルタントのたまご

はやくヒヨコになりたい

2012-05-16から1日間の記事一覧

特定のセルを赤くするマクロ

Sub 全シート繰り返し Application.ScreenUpdating = False Dim Sht As Worksheet For Each Sht In Worksheets Sht.Select Call FALSEセルを赤くする Next Sht Application.ScreenUpdating = True End Sub Sub FALSEセルを赤くする Cells.Select Selection.F…

全シート全セルの値貼り付けマクロ

Sub 全シート繰り返し Application.ScreenUpdating = False Dim Sht As Worksheet For Each Sht In Worksheets Sht.Select Call 値貼り付け Next Sht Application.ScreenUpdating = True End Sub Sub 値貼り付け Cells.Select Selection.Copy Selection.Past…