【VBA】 문자의 색과 배경색을 변경하는 방법
샘플 데이터는 아래 그림을 참조하십시오.
↓실연 동영상
htps: //같다. 베 / 호 xr ↑ 00 우후
이번 조건은
・값이 40 이상 → 배경을 파랑
· 값이 30 이상 → 문자가 파란색
· 값이 20 이상 → 문자를 노란색
· 값이 10 이상 → 배경 녹색
했다.
소스 코드는 아래와 같습니다.
Sub 文字の色と背景色の変更()
Dim i As Long
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
Select Case Cells(i, 1)
Case Is >= 40
Cells(i, 1).Interior.Color = vbBlue
Case Is >= 30
Cells(i, 1).Font.Color = vbBlue
Case Is >= 20
Cells(i, 1).Font.Color = vbYellow
Case Is >= 10
Cells(i, 1).Interior.Color = vbGreen
End Select
Next
End Sub
자세한 내용을 설명합니다.
Dim i As Long
행 수를 저장하는 변수를 준비합니다.
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
행 수분, 루프 처리합니다.
Select Case Cells(i, 1)
Case Is >= 40
Cells(i, 1).Interior.Color = vbBlue
Case Is >= 30
Cells(i, 1).Font.Color = vbBlue
Case Is >= 20
Cells(i, 1).Font.Color = vbYellow
Case Is >= 10
Cells(i, 1).Interior.Color = vbGreen
End Select
Case문으로 판정하고, 배경색, 문자색의 변경을 할 수 있습니다.
Case 문은, 이하의 사이트가 참고가 될까 생각합니다.
htps : // ゔぁl 누출. rk / x x l-v 바케 /
"Interior.Color"에서 배경색, "Font.Color"로 문자색을 변경할 수 있습니다.
색에 대해서는, 이하의 사이트가 참고가 된다고 생각합니다.
htps : // 향수. 사쿠라. 네. jp / pgm / v 바 / pgm01 / vb 코 r. HTML
이상이 문자의 색과 배경색을 변경하는 방법이었습니다.
Reference
이 문제에 관하여(【VBA】 문자의 색과 배경색을 변경하는 방법), 우리는 이곳에서 더 많은 자료를 발견하고 링크를 클릭하여 보았다 https://qiita.com/RuruVba/items/46e60bb772eca2c05406텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
우수한 개발자 콘텐츠 발견에 전념 (Collection and Share based on the CC Protocol.)