1. 아별툴
  2. 아별툴 패밀리
  3. 엑셀 질문하기
  4. 엑셀 강좌
  5. 엑셀 팁
  6. 엑셀 자료실
  7. 엑셀 연구과제
  8. 엑셀 북마크
  9. 관련 프로그램 소개
글 수 65

마우스 좌표를 반환 받기

조회 수 5889 추천 수 0 2009.05.07 13:18:27
[레벨:30]아별 *.107.204.56
출처 : 엑사모_팁

관련파일 : VBA878_GetMousePosition.zip

듀얼 모니터 사용 시, 서브 모니터가 주 모니터의 좌측에 있을 경우 x값이 음수값으로 표시된다.

 Option Explicit

'마우스 좌표를 반환받기 위한 API함수 선언
Public Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long

' Type 문으로 사용자 정이 데이터 형식을 선언
Public Type POINTAPI
    x As Long
    y As Long
End Type

Sub dhGetCurorPos()

Dim dhCursor As POINTAPI

    '마우스의 절대좌표를 반환
    GetCursorPos dhCursor
   
    MsgBox "현재 마우스의 X 좌표는 " & dhCursor.x & vbCr _
            & "현재 마우스의 Y 좌표는 " & dhCursor.y & "입니다", vbInformation, _
            "MagicSheet & 엑사모"
   
End Sub








이 게시물을...
profile
첨부
엮인글 :
http://www.abyul.com/zbxe/65191/4d6/trackback
목록
문서 첨부 제한 : 0Byte/ 2.00MB
파일 제한 크기 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수sort
공지 기타 엑셀 VBA 간단한 팁 모아놓기.. +_+ [레벨:30]아별 2007-01-24 34250
45 기타 [ VBA Tip ] 엑셀 VBA로 사진(JPG)의 EXIF 정보(GPS 포함) 불러 들이기.. imagefile [6] [레벨:30]아별 2012-02-27 8163
44 기타 엑셀 기본 제공 대화 상자 인수 목록 file [레벨:30]아별 2009-11-04 8106
43 [VBA팁] 화일이 존재하는지 확인하기 [레벨:30]아별 2009-07-31 8062
42 기타 [VBA] 엑셀 파일을 PDF로 저장(EXPORT) 시키기 [1] [레벨:30]아별 2015-01-21 7639
41 기타 엑셀 2013에서 웹 브라우저 컨트롤(ActiveX, web browser)을 시트에 삽입할 수 없는 문제.. imagefile [레벨:30]아별 2014-01-19 7614
40 기타 엑셀에서 소리 내기(재생) _ sound play file [1] [레벨:30]아별 2010-12-13 7597
39 엑셀VBA 텍스트 박스에서 여러줄 입력하기 [레벨:30]a☆ 2004-11-15 7496
38 Excel에서 메뉴 및 메뉴 모음을 사용자 지정하는 방법 image [레벨:30]아별 2009-11-04 7487
37 [엑셀VBA] ERROR CODE file [레벨:30]아별 2008-08-28 7432
36 엑셀 추가 기능 만들기 [레벨:30]a☆ 2006-01-19 7415
35 현재 엑셀 파일의 색상표(Color Chart) 확인용 코드 [레벨:30]아별 2009-12-24 7311
34 엑셀의 사용자 정의 날짜/시간 형식(Format 함수) [레벨:30]a☆ 2004-11-12 7219
33 [엑셀VBA] 메시지 박스 활용하기 [레벨:30]아별 2004-12-22 7144
32 기타 헷갈리기 쉬운 워크시트 함수와 VBA함수 비교표 imagefile [레벨:30]아별 2010-10-05 6889
31 기타 VBE에서 휠마우스 사용가능하게 하기SpeedVB4 file [레벨:30]아별 2005-07-22 6836
30 [펌] Excel Macro(VBA) 입문자를 위한 소개자료 image [레벨:30]아별 2008-12-19 6689
29 엑셀에서 서식 지정하기.. 숫자를 한글로 표시하기 등.. [1] [레벨:30]a☆ 2004-09-24 6663
28 기타 기본 제공 대화 상자 실행하면 초기 값 설정 imagefile [레벨:30]아별 2010-08-25 6555
27 엑셀에서 매개변수의 전달과 외부함수 호출 [레벨:30]a☆ 2004-10-27 6513
26 엑셀에서 날짜 함수 컨트롤 하기 [레벨:30]a☆ 2004-10-29 6329
목록
쓰기