質問: RGB(255, 255, 255) End Sub
回答: Call ur_color(iro) ↑で何を行っているのか元の色が不明ですが Range("J11:K24").Font.Color = RGB(255, 255, 255) ActiveWindow.SelectedSheets.PrintOut preview:=True, copies:=1, collate:=True Range("J11:K24").Font.Color = RGB(0, 0, 0)