• Daum
  • |
  • 카페
  • |
  • 테이블
  • |
  • 메일
  • |
  • 카페앱 설치
 
카페정보
엑셀 사용 전문가 (엑사전)
 
 
 
 

친구 카페

 
 
카페 게시글
질의 & 답변 (VBA) 엑셀에서 추가기능으로 추가된 메뉴를 sheets별도 돌릴 수 있을까요?
눈없이하얀 날들 추천 0 조회 180 13.03.14 22:05 댓글 1
게시글 본문내용
 
다음검색
첨부된 파일
댓글
  • 작성자 13.03.15 16:24

    첫댓글 Sub 자동입력()
    '
    ' 입력 매크로 ctrl+m
    '
    Dim i As Integer
    Dim st As String

    For i = 5 To 1440 Step 5

    st = Format(i)

    Sheets(st).Select

    Range("A1:C237").Select
    With Application
    .SendKeys ("%{x}")
    .SendKeys ("%{s}")
    .SendKeys ("%{r}")
    .SendKeys "{Enter}"
    .SendKeys "{Enter}"
    End With

    PauseTime = 1

    Next

    End Sub

    이런생각으로 시작했는데 간단하게 안되는건가요?

최신목록