질문과 답변
소프트웨어 엑셀 VBA 관련 문의
2022.09.26 14:30
Private Sub CommandButton1_Click()
Dim lngR As Long
lngR = Range("D65536").End(xlUp).Row + 1
Range("C" & lngR) = "=row()-2"
Range("D" & lngR) = Me.TextBox1
Range("E" & lngR) = Me.ComboBox1
Range("F" & lngR) = Val(Me.TextBox3)
With Range("C" & lngR).Resize(1, 4)
.Borders.LineStyle = 1
.HorizontalAlignment = xlCenter
End With
Range("D" & lngR + 1).Select
Application.CutCopyMode = False
Unload UserForm1
End Sub
해당 예제에 나와있는 부분을 sheet2번으로 적용하려고 하는데 방법이 있을까요?
댓글 [1]
-
지후빠 2022.09.26 14:37
번호 | 제목 | 글쓴이 | 조회 | 등록일 |
---|---|---|---|---|
[공지] | 질문과 답변 게시판 이용간 유의사항 | gooddew | - | - |
15888 | 소프트웨어| DrvIndex 32비트 좀 구할 수 있을까요~ [1] | 지룡자 | 277 | 10-02 |
15887 | 소프트웨어| 파이어폭스 PDF 뷰어? [3] | reg | 315 | 10-01 |
15886 | 소프트웨어| DVDFab 인증 실행안되요 | 디지털먹보 | 176 | 10-01 |
15885 | 소프트웨어| 크롬에서 IDM 사용할때 가끔 오류가 납니다 | tbvpfm | 287 | 09-30 |
15884 | 소프트웨어| 현재 Kigo Neflix Video Downloader 작동되나요? [1] | 솔하 | 212 | 09-30 |
15883 | 소프트웨어| 깔끔하고 명료한 PE 좀 구할수 없을까요?? [6] | 루나헌터 | 616 | 09-30 |
15882 | 소프트웨어| MAGIX.Video.Easy 포터블 구할수 있을까요? | 또스 | 111 | 09-29 |
15881 | 소프트웨어| aomei onekey recovery iso 파일 있으면 구해봅니다~ [5] | 속박 | 550 | 09-29 |
15880 | 소프트웨어| 3D앨범 한글패치프로그램을 올려 주세요~ [2] | 우장산 | 305 | 09-29 |
15879 | 소프트웨어| 윈도우10 스마트 스크린 질문 [5] | 우주여행가 | 227 | 09-29 |
15878 | 소프트웨어| 구글 검색 -m.gsearch [1] | 도리도리 | 1161 | 09-29 |
15877 | 소프트웨어| 유튜브 다운시..... [4] | 해오름 | 462 | 09-28 |
15876 | 소프트웨어| Mountain Duck 환경 백업하는 법과 동기화 중지에 관한 질... | heykevin | 230 | 09-27 |
15875 | 소프트웨어| 벤토이 포멧시 어떤건 vtoyefi가 없는데 어찌된건가요? [1] | 프리티맨 | 384 | 09-27 |
15874 | 소프트웨어| zoom 포터블 요청합니다 [2] | 아킬레스님 | 393 | 09-27 |
15873 | 소프트웨어| ahk 중복실행 안되게 하는 방법을 좀 알려주세요 [2] | UU自適 | 205 | 09-27 |
15872 | 소프트웨어| 워드문서 작성방법에 대한 도움요청 글입니다, [2] | 좋은데이 | 232 | 09-26 |
15871 | 소프트웨어| 엑셀 잘하시는분... 작업의뢰 [2] | ojaykim | 797 | 09-26 |
» | 소프트웨어| 엑셀 VBA 관련 문의 [1] | koyotp | 346 | 09-26 |
15869 | 소프트웨어| 날짜가 물음표 와 영어로 나옵니다 [2] | 둥근호박 | 278 | 09-25 |
Dim lngR As Long 다음 행에 아래 코드를 넣어 보십시오.
Sheets("Sheet2").Select