Skip to content

조회 수 1276 추천 수 0 댓글 1
?

단축키

Prev이전 문서

Next다음 문서

크게 작게 위로 아래로 댓글로 가기 인쇄
?

단축키

Prev이전 문서

Next다음 문서

크게 작게 위로 아래로 댓글로 가기 인쇄
main 시트의 정열된 시트이름을 참조하여 각 시트의 특정위치의 값을 정열하여
가져 올려면 어떻게 해야 하나요? 세로로 정열된 시트이름 옆 가로로 원하는 각 시트의 원하는 cell
위치의 값을 가져 오고 싶은데요...
?
  • profile
    콩이아빠 2009.08.05 09:35
    Sub 시트명정열()
    Dim sCnt As Integer
    Dim i As Integer

    vRng = 2
    sCnt = ActiveWorkbook.Worksheets.Count
    For i = 2 To sCnt
    If Sheets(i).Visible Then
    Sheets("main").Range("a" & vRng) = Sheets(i).Name
    Sheets("main").Range("b" & vRng) = Sheets(i).Range("b1")
    vRng = vRng + 1
    End If
    Next
    End Sub

List of Articles
번호 카테고리 제목 글쓴이 날짜 조회 수
6 P/C 시작프로그램(msconfig)에 프로그램 등록하는 법 - 2 1 콩이아빠 2010.03.01 700
5 P/C 시작프로그램(msconfig)에 프로그램 등록하는 법!! 40 콩이아빠 2010.02.20 539
4 P/C 숨겨진 파일 및 폴더 보이게(설정) 하기 1 콩이아빠 2010.02.19 583
3 P/C 비스타 시작및 실행프로그램 콩이아빠 2010.02.19 358
2 P/C 비스타 시작프로렘 폴더 1 콩이아빠 2010.02.19 561
1 P/C 비스타 네트워크 프린트 설정 방법 file 콩이아빠 2010.02.18 246
Board Pagination Prev 1 Next
/ 1

Korea NO.1 VISION 2020 / Designed by HJS_Sketch

sketchbook5, 스케치북5

sketchbook5, 스케치북5

나눔글꼴 설치 안내


이 PC에는 나눔글꼴이 설치되어 있지 않습니다.

이 사이트를 나눔글꼴로 보기 위해서는
나눔글꼴을 설치해야 합니다.

설치 취소