예제파일=> Book21.xls

 

첨부문서의 파일에서

B사원 실행메크로 코드중에서
.........
Sheets(Array("B_1", "B_2", "B_3")).Select
.........
이부분만 수정하여 사용 할려면은....

※사용하고자하는 시트명은
고유코드를 사용하고자 함. 코드이름은,
sheet7(B_1),sheet7(B_2),sheet7(B_3) 임.

 

----------------------------------------------------------

 

Sub A사원불러와서COPY()
'
' A사원불러오기 Macro
' SAMSUNG이(가) 2006-09-11에 기록한 매크로
'

'
Sheet2.Visible = True
Sheet6.Visible = True
Sheet10.Visible = True
'Sheets(Array("A_1", "A_2", "A_3")).Select 대신에 아래아 같이 하시면 됩니다.
Sheets(Array(Sheet2.Name, Sheet6.Name, Sheet10.Name)).Select

Sheet2.Activate
Cells.Select
Selection.Copy
End Sub