로그인 유지
이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.
2015.01.15 09:09
아래 코드가 좀 참고가 될지 모르겠습니다.
worksheets와 sheets는 같은 sheet들의 컬렉션 객체입니다.
Sub abyulTest()
Dim i As Long
For i = 1 To Sheets.Count
ActiveCell.Offset(i).Value2 = Sheets(i).Name
Next i
End Sub
새 창으로
선택한 기호
![[레벨:30]](http://abyul.com/zbxe/modules/point/icons/default/30.gif "포인트:141749point, 레벨:30/30"){kind=icon}
아별
아래 코드가 좀 참고가 될지 모르겠습니다.
worksheets와 sheets는 같은 sheet들의 컬렉션 객체입니다.
Sub abyulTest()
Dim i As Long
For i = 1 To Sheets.Count
ActiveCell.Offset(i).Value2 = Sheets(i).Name
Next i
End Sub