티스토리 뷰
반응형
Function tr_InStr_2글자(ostr As String, findstr As String)
If InStr(ostr, Mid(findstr, 1, 1)) > 0 And Mid(ostr, Mid(findstr, 1, 1) + 1, 1) = Mid(findstr, 2, 1) Then
tr_instr = findstr
Else
tr_instr = ""
End If
End Function
.
반응형
'엑셀' 카테고리의 다른 글
| 엑셀 vba continue_cu_or_ncu 함수 (0) | 2018.11.22 |
|---|---|
| 엑셀 vba 폴더 생성 불가능한 문자 대체 (0) | 2018.11.22 |
| 리본메뉴가 사라졌을때... 큰 버튼들... (0) | 2018.11.21 |
| 엑셀 매크로 VBA 나의 함수 문자전송 (0) | 2018.11.21 |
| 엑셀 매크로 VBA 나의 함수 Last_Lines_300 마지막 데이타의 row 찾기 (0) | 2018.11.20 |
댓글