로그인 유지
이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.
2013.04.15 11:44:13 *.104.126.21
LH님..
Application.Onkey 메서드는 대소문자를 가립니다.
Ctrl+F로 단축키를 지정하시려면 아래처럼하셔야합니다.
Private Sub Workbook_Open()
Application.OnKey "^f", "Find_x"
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnKey "^f", ""
"^F"로 하시면.. "^+f"한것과 동일한 효과예요.. Ctrl+Shift+f가 되어 버리지요..
도움이 되셨기를..
2013.04.15 14:02:16 *.42.99.233
2013.04.15 14:59:37 *.104.126.21
제 설명이 부족한 면이 있었나봅니다.
의미가 잘 전달이 안된 것 같네요..
기존의 Ctrl+F를 대체하는 코드가 아래와 같다는 답변이었습니다.
위 코드를 실행하면 기존의 Ctrl+F 기능인 찾기 창이 팝업되는 대신에 Find_X 프로시저가 실행됩니다.
테스트해보세요..
도움이 되셨기를.. ^^
2013.04.17 14:22:58 *.42.99.233
새 창으로
선택한 기호
VBA 사용자 정의 폼 관련 [2]
VBA vba 메세지 창 제어 [4]
VBA sub과function차이 [4]
VBA vba 에러처리 [2]
VBA 빠른실행도구모음 외 [2]
VBA 개체와 컬렉션 [2]
VBA 셀병합 효과 [2]
VBA vba속도 관련 외 [2]
VBA 액셀 아르바이트 좀 해주세요 [2]
VBA 셀 병합 관련 [2]
VBA 시트와 차트에 따라 다른 함수 실행? [4]
VBA 데이터 유효성 질문.. 리스트에서 항목 선택하면 기존 항목에 더해져서 표시되게 하기 [1]
VBA 도움을 요청드립니다~
LH님..
Application.Onkey 메서드는 대소문자를 가립니다.
Ctrl+F로 단축키를 지정하시려면 아래처럼하셔야합니다.
Private Sub Workbook_Open()
Application.OnKey "^f", "Find_x"
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnKey "^f", ""
End Sub
"^F"로 하시면.. "^+f"한것과 동일한 효과예요.. Ctrl+Shift+f가 되어 버리지요..
도움이 되셨기를..