셀 값을 그 아래의 모든 셀에 복사하십시오.

Question

"마스터 셀"(편집 가능) 복사본으로 셀 내의 열을 지정하는 매크로를 작성하는 방법을 모르겠습니다. , 그것은 빈/명확한 서식이 지정된 셀 A 열에 도달 할 때까지. 그래서 열의 셀 값을 복사하는 중지 할 때 A 열을 봐야합니다.

즉, 셀 "C5"는 마스터 셀이 될 것이고 매크로는 "C6 : C"의 값을 복사하지만 열 A의 셀 값을보고 아무 것도 가지고 있지 않은지 확인합니다. 색상 채우기 등이 있으며 C에서 무한대 (Excel의 최대 증가분)까지 계속되는 매크로 대신 A 열의 첫 번째 빈 셀 행에서 중단됩니다.

Answer 1

Sub Example() 
    Dim MasterValue As String 
    Dim StopRow As Long 
    Dim i As Long 

    'Get the master value 
    MasterValue = Range("C5").Value 

    'Get the first blank cell in column A 
    StopRow = Range("A1").End(xlDown).Row 

    'Start at row 6 and continue to the "Stop Row" 
    For i = 6 To StopRow 
     'Set every cell from row 6 in column 3 to the "Master Value" 
     Cells(i, 3).Value = MasterValue 
    Next 
End Sub