Vba:다른 시트의 셀 값을 설정하는 방법


VBA에서 다음 방법을 사용하여 다른 시트의 셀 값을 설정할 수 있습니다.

방법 1: 다른 시트에 셀 값 설정

 Sub SetCellAnotherSheet()
    
    Sun wks1 As Worksheet, wks2 As Worksheet
    
    'specify sheets to use
    Set wks1 = Sheets(" Sheet1 ")
    Set wks2 = Sheets(" Sheet2 ")
    
    'set cell value in Sheet2 equal to cell value in Sheet1
    wks2.Range(" A2 ").Value = wks1.Range(" A2 ").Value
    
End Sub

이 특정 매크로는 Sheet2A2 셀 값을 Sheet1A2 셀 값과 동일하게 설정합니다.

방법 2: 다른 시트에 여러 셀 값 설정

 Sub SetCellAnotherSheet()
    
    Sun wks1 As Worksheet, wks2 As Worksheet
    
    'specify sheets to use
    Set wks1 = Sheets(" Sheet1 ")
    Set wks2 = Sheets(" Sheet2 ")
    
    'set cell range in Sheet2 equal to cell range in Sheet1
    wks2.Range(" A2:A11 ").Value = wks1.Range(" A2:A11 ").Value
    
End Sub

이 특정 매크로는 Sheet2A2:A11 범위에 있는 각 셀의 값을 Sheet1A2:A11 범위에 있는 각 셀의 값과 동일하게 설정합니다.

다음 예에서는 각 방법을 실제로 사용하는 방법을 보여줍니다.

예 1: 다른 시트에서 셀 값 설정

다양한 농구팀의 이름이 포함된 Sheet1 이라는 다음 시트가 있다고 가정합니다.

그리고 헤더 행이 하나만 포함된 Sheet2가 있다고 가정합니다.

다음 매크로를 만들어 Sheet2A2 셀 값을 Sheet1A2 셀 값과 동일하게 설정할 수 있습니다.

 Sub SetCellAnotherSheet()
    
    Sun wks1 As Worksheet, wks2 As Worksheet
    
    'specify sheets to use
    Set wks1 = Sheets(" Sheet1 ")
    Set wks2 = Sheets(" Sheet2 ")
    
    'set cell value in Sheet2 equal to cell value in Sheet1
    wks2.Range(" A2 ").Value = wks1.Range(" A2 ").Value
    
End Sub

이 매크로를 실행하면 Sheet2A2 셀 값이 이제 “Mavs”로 설정되어 Sheet1A2 셀 값과 일치하는 것을 볼 수 있습니다.

예 2: 다른 시트에 여러 셀 값 설정

Sheet2A2:A11 범위에 있는 각 셀의 값을 Sheet1A2:A11 범위에 있는 각 셀과 동일하게 설정한다고 가정합니다.

이를 위해 다음 매크로를 생성할 수 있습니다:

 Sub SetCellAnotherSheet()
    
    Sun wks1 As Worksheet, wks2 As Worksheet
    
    'specify sheets to use
    Set wks1 = Sheets(" Sheet1 ")
    Set wks2 = Sheets(" Sheet2 ")
    
    'set cell range in Sheet2 equal to cell range in Sheet1
    wks2.Range(" A2:A11 ").Value = wks1.Range(" A2:A11 ").Value
    
End Sub

이 매크로를 실행하면 Sheet2A2:A11 범위에 있는 값이 이제 Sheet1A2:A11 범위에 있는 값과 동일하게 설정되는 것을 확인할 수 있습니다.

추가 리소스

다음 자습서에서는 VBA에서 다른 일반적인 작업을 수행하는 방법을 설명합니다.

VBA:마지막으로 사용한 줄을 찾는 방법
VBA:범위 내 행 수를 계산하는 방법
VBA:사용된 열 수를 계산하는 방법

의견을 추가하다

이메일 주소는 공개되지 않습니다. 필수 필드는 *로 표시됩니다