Q : 안녕하세요 vba 코드질문입니다. 코드를 추가하고 싶은데 잘안되서 문의드립니다. 검색 기능코드에서 없는이름이있을때 msgbox "이름이 없습니다. 추가 하시겠습니까" 그리고 나이는 현재 년도를 생년월일에서 뺀값이 자동으로 나오게 하고싶습니다. A : 추가하시겠습니까? 를 예, 아니오로 선택할 수 있게 하고 만약 대답이 yes면 조건 안으로 들어가고 ​ 나이의 경우 now() 함수를 사용하여 format을 연도만 구해서 현재연도 - 생년월일 하면 될 것 같습니다. If MsgBox("이름이 없습니다. 추가 하시겠습니까?", vbYesNo) = vbYes Then '만약, "예" 버튼을 눌렀다면 ' 현재 year과 생년월일을 뺀다. txt나이 = Format(Now(), "yyyy") - Format..

보통 엑셀로 업무를 하다보면 메모에 내용을 적어두고 업무를 할 때가 있는데요. 이럴 때 이 메모 내용이 중구난방으로 뿌려지는 경우가 있어 취합을 한다거나? 아니면 메모 내용을 한 번에 보고 싶은 경우가 생깁니다. ​ 이럴 때 VBA로 추출을 할 수 있습니다. 추출을 하게 되면 아래와 같은 모습이 됩니다. ​ ​ 메모 뽑아내기 사용법! ① ALT + F11 을 눌러 편집기가 뜨게 한다. ② 아래 "현재_통합_문서" 를 더블클릭 한다. ③ 아래 코드를 우측에 붙여 넣는다. ④ 편집기를 끄고, [보기] 탭의 매크로를 누르고 [매크로 보기(V)] 를 눌러 아래 매크로를 실행 한다. ⑤ 매크로가 실행이 되면 절차대로 하면 된다. - 범위를 드래그하여 선택 - 사진처럼 뿌려질 위치를 클릭 ​ ​ 소스 코드 Publ..

vba 유저 폼 사용시 KeyDown Event 사용 Private Sub txtTerm_KeyDown(ByVal KeyCode As msforms.ReturnInteger, ByVal Shift As Integer) '//Keydown If KeyCode = 13 Then 'enter키를 눌렀을 때 동작 ' //코드 작성 End If End Sub