편집을 취소할 수 있습니다. 이 편집을 되돌리려면 아래의 바뀐 내용을 확인한 후 게시해주세요.
최신판 | 당신의 편집 | ||
7번째 줄: | 7번째 줄: | ||
==함수== | ==함수== | ||
<source lang='vb'> | <source lang='vb'> | ||
Function | Function exist_worksheet(name) | ||
exist_worksheet = False | |||
For Each ws In ActiveWorkbook.Worksheets | For Each ws In ActiveWorkbook.Worksheets | ||
If ws.name = name Then | If ws.name = name Then exist_worksheet = True | ||
Next ws | Next ws | ||
End Function | End Function | ||
18번째 줄: | 18번째 줄: | ||
<source lang='vb'> | <source lang='vb'> | ||
Sub button1_Click() | Sub button1_Click() | ||
If | If exist_worksheet("시트이름") Then | ||
MsgBox "있음" | MsgBox "있음" | ||
Else | Else |