이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.
글 수 822
![[레벨:3]](http://abyul.com/zbxe/modules/point/icons/default/3.gif "포인트:1335point (83%), 레벨:3/30"){kind=icon}
고독한나그네
현재 선택되어 있는 시트가 worksheet 종류이면 함수 A가 실행되고현재 선택되어 있는 시트가 chart 종류이면 함수 B가 실행되는 조건문 가능할까요?조건에 따라 다른 방식으로 작동하게 만들려고요..^^부탁드려요..ㅎ
댓글 '4'
![[레벨:30]](http://abyul.com/zbxe/modules/point/icons/default/30.gif "포인트:141861point, 레벨:30/30"){kind=icon}
아별
빠른 답변 및 친절한 설명 감사드립니다.
그런데 제가 너무 두서없이 질문을 드린것 같네요..^^;;
자세히 말씀드리면 macro 함수를 이용하여 단축키로 함수가 실행되게 하고 있는 중입니다.
그런데 하나의 단축키로 상황에 따라 다르게 사용하고 싶어서요..^^
예를 들면 워크시트의 표가 선택된 상태에서 단축키를 실행하면 macro 함수 A가 실행되고
차트가 선택된 상태에서 단축키를 실행하면 macro 함수 B가 실행되는 macro 조건문에 대한 질문이었습니다..
대략 개념적으로 말씀드리자만 아래와 같은 식의 함수가 되지 않을까 싶은데요..
명령어나 함수 사용 개념을 확실히 몰라서..^^
그럼 부탁드리겠습니다.
IF selection IS chart then call A
elseif selection IS sheet then call B
else call C
end if
고독한나그네님..
진작 이렇게 말씀해주셨더라면.. 크크..
아래코드처럼 TypeName(ActiveSheet)을 검사하면 됩니다.
IF문을 사용해도 되지만.. 이런 경우는 Select문이 더 좋을 것 같네요..
자세한건 첨부파일을 참고하세요..
다운받기 : abyul.com_20120717_callBySheetType-1.xlsm
Option Explicit
Sub callBySheetType()
Select Case TypeName(ActiveSheet)
Case "Chart": Call callChart
Case "Worksheet": Call callWorksheet
Case Else: Call callElse
End Select
End Sub
Sub callChart()
MsgBox "This is Chartsheet"
End Sub
Sub callWorksheet()
MsgBox "This is Worksheet"
End Sub
Sub callElse()
MsgBox "What?"
End Sub
고독한나그네님..
안녕하세요?
함수 A가 실행된다고 하실때의 함수는 VBA의 Sub프로시저를 말씀하시는건가요?
워크시트 함수인가요? @_@;;
근데.. 조건문이라고 하시니.. 헷갈리네요..
chart시트에는 함수를 입력할 수 있는 공간이 없습니다.
차트만 떨렁 하나 놓여있는게 차트 시트입니다.
첨부파일을 참고해보세요..
차트만 떨렁 있습니다.
다운받기 : Book6.xlsx
그리고.. 설령 수식을 입력할 수 있는 곳이 있다고 하더라도..
현재 선택 시트의 종류에 대한 정보를 얻을 수 있는 워크시트 함수는 없습니다.
INFO함수나, CELL함수가 대표적인 정보 함수인데요..
위 2개의 함수에는 시트의 종류에 대한 정보는 없네요..
이미 과거의 유물의 되어 버린 매크로 함수를 사용하면 가능한지는 확인해보지 않았습니다만..
일단.. 왜 이런 기능이 필요한지가 의문이네요..
차트 시트는 요즘에는 거의 사용하지 않는데요.. 음.. ^_^;;;