질문과 답변
소프트웨어 엑셀 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 | - | - |
| 94805 | 소프트웨어| 워드문서 작성방법에 대한 도움요청 글입니다, [2] | 좋은데이 | 278 | 09-26 |
| 94804 | 소프트웨어| 엑셀 잘하시는분... 작업의뢰 [2] | ojaykim | 843 | 09-26 |
| 94803 | 기 타| 엑셀 숫자변경 [4] | 홍낄똥 | 596 | 09-26 |
| » | 소프트웨어| 엑셀 VBA 관련 문의 [1] | koyotp | 400 | 09-26 |
| 94801 | 하드웨어| SSD [5] | simsuri | 879 | 09-26 |
| 94800 | 윈 도 우| 22H2 업데이트 [2] | yty6635 | 1414 | 09-26 |
| 94799 | 윈 도 우| 디펜더에 이런 메시지가 뜹니다. [2] | 햇님 | 664 | 09-26 |
| 94798 | 윈 도 우| [질문] wim 파일을 iso 파일로 변환하는 방법 [10] | 시종일관 | 894 | 09-26 |
| 94797 | 윈 도 우| Win11PE 만들 때의 오류 발생 문제 [1] | 새옹지마 | 301 | 09-26 |
| 94796 | 소프트웨어| 날짜가 물음표 와 영어로 나옵니다 [2] | 둥근호박 | 322 | 09-25 |
| 94795 | 윈 도 우| Win11 22H2로 업데이트한 후 응용프로그램들이 관리자권한... [2] | billy | 597 | 09-25 |
| 94794 | 소프트웨어| '다잡아'를 아시면 설명 부탁드립니다. [6] | 모세 | 848 | 09-25 |
| 94793 | 서버 / IT| 스마트폰 크롬의 새 탭 바로가기들 수정 어떻게? | ton3d | 287 | 09-25 |
| 94792 | 윈 도 우| 이 메시지는 왜 뜨는거죠? | 하아언조비 | 503 | 09-25 |
| 94791 | 윈 도 우| nvme 윈도우 설치 [8] | 장마로 | 1029 | 09-25 |
| 94790 | 윈 도 우| 윈도우 커널 질문 [1] | Mac111 | 240 | 09-25 |
| 94789 | 윈 도 우| 10세대 질문 [1] | Mac111 | 342 | 09-25 |
| 94788 | 윈 도 우| 컴퓨터 시작 위치의 이표정은 어떤 뜻인가요? [5] | 이상무 | 683 | 09-25 |
| 94787 | 모 바 일| 겔럭시폰 22 에서 -v8a.apk -v7a.apk 증 어떤 앱을 설치 해... [2] | 이상무 | 414 | 09-25 |
| 94786 | 윈 도 우| 윈도우 10 `하드디스크를 사용하지 않을 때 다음 시간 이후... [4] | 사가르마타 | 679 | 09-25 |
Dim lngR As Long 다음 행에 아래 코드를 넣어 보십시오.
Sheets("Sheet2").Select