/ / Excel VBA에서 패턴 만들기

Excel VBA에서 패턴 만들기

아래에서 우리는 Excel VBA패턴을 만든다..

상태:

Excel VBA에서 패턴 만들기

워크 시트에 명령 단추를 놓고 다음 코드 줄을 추가하십시오.

1. 먼저 Integer 유형의 두 변수를 선언합니다. 하나는 i, 하나는 j로 명명되었습니다.

Dim i As Integer, j As Integer

두 번째로 For Next 루프를 두 개 추가합니다.

For i = 1 To 5 Step 2
    For j = 1 To 5 Step 2

3. 다음으로 셀의 배경색을 밝은 회색으로 변경하는 선을 추가합니다.

Cells(i, j).Interior.ColorIndex = 15

참고 : ColorIndex 번호 15 (밝은 회색) 대신 모든 ColorIndex 번호를 사용할 수 있습니다.

4. 두 개의 다음 루프를 닫습니다.

    Next j
Next i

5. 프로그램을 테스트하십시오.

지금까지의 결과.

패턴 결과를 아주 멀리 상자에 넣으십시오

예를 들어, i = 1 및 j = 1 인 경우 Excel VBAi = 1 및 j = 3 (2 단계), Excel VBA 색상 셀 (1,3), i = 1 및 j = 5, Excel VBA 색상 셀 (1,5), i = 3 (2 단계) 및 j = 1, Excel VBA 색상 셀 (3,1) 등

6. 우리는 거의 다 왔습니다. 우리가해야 할 일은 이미 착색 된 세포의 오른쪽 아래 1 행과 1 칸에 의해 상쇄 된 세포에 색을 칠하는 것입니다. 루프에 다음 코드 줄을 추가하십시오.

Cells(i, j).Offset(1, 1).Interior.ColorIndex = 15

7. 프로그램을 테스트하십시오.

결과:

패턴 결과 만들기

또한 읽으십시오 :