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
이 특정 매크로는 Sheet2 의 A2 셀 값을 Sheet1 의 A2 셀 값과 동일하게 설정합니다.
방법 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
이 특정 매크로는 Sheet2 의 A2:A11 범위에 있는 각 셀의 값을 Sheet1 의 A2:A11 범위에 있는 각 셀의 값과 동일하게 설정합니다.
다음 예에서는 각 방법을 실제로 사용하는 방법을 보여줍니다.
예 1: 다른 시트에서 셀 값 설정
다양한 농구팀의 이름이 포함된 Sheet1 이라는 다음 시트가 있다고 가정합니다.
그리고 헤더 행이 하나만 포함된 Sheet2가 있다고 가정합니다.
다음 매크로를 만들어 Sheet2 의 A2 셀 값을 Sheet1 의 A2 셀 값과 동일하게 설정할 수 있습니다.
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
이 매크로를 실행하면 Sheet2 의 A2 셀 값이 이제 “Mavs”로 설정되어 Sheet1 의 A2 셀 값과 일치하는 것을 볼 수 있습니다.
예 2: 다른 시트에 여러 셀 값 설정
Sheet2 의 A2:A11 범위에 있는 각 셀의 값을 Sheet1 의 A2: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
이 매크로를 실행하면 Sheet2 의 A2:A11 범위에 있는 값이 이제 Sheet1 의 A2:A11 범위에 있는 값과 동일하게 설정되는 것을 확인할 수 있습니다.
추가 리소스
다음 자습서에서는 VBA에서 다른 일반적인 작업을 수행하는 방법을 설명합니다.
VBA:마지막으로 사용한 줄을 찾는 방법
VBA:범위 내 행 수를 계산하는 방법
VBA:사용된 열 수를 계산하는 방법