Public Function 총판매액(차종, 상반기판매액, 하반기판매액)
총 = 상반기판매액 + 하반기판매액
If 총판매액 >= 150000 Then
총판매액 = Left(차종, 2) & 총
Else
총판매액 = 총
End If
End Function
이렇게 VBA를 이용해서 해봤는데요..
제 질문은 총판매액이 150000이상일때
차종의 앞 2글자를 포함해서 값을 표시하라 이거입니다.
근데 저렇게 &를 해도 안나오는데 제가 혹시 잘못알고 있는건가요???
그리고 또 다른 상설시험문제인데
함수 실전 108p에서 새로운 조건을 하나 함수를 이용해서 만드는것을 가정하면요..
IF ANd substitute 함수를 이용하여
기본급이 1000000 이상이고 교통비가 50000원 이상일경우 직위의 첫번째 공백에 ★을 추가시키세요
이조건이아닐시 공백을 표시하세요
어제 문제가 이런식으로 나왔는데 저같은경우는
=IF(AND(F12>=1000000,H12>=50000),SUBSTITUTE(C12,"","★",1),"")
이런식으로 했는데 별은 안나오더군요...
혹시 혼란이있으실까봐 첨부파일 올릴게요.
매번 감사드려요 ㅎㅎ
Public Function 총판매액(차종, 상반기판매액, 하반기판매액)
총 = 상반기판매액 + 하반기판매액
If 총판매액 >= 150000 Then
총판매액 = Left(차종, 2) & "총"
Else
총판매액 = "총"
End If
End Function
총이 문자이므로 "총" 과 같이 사용하셔야 할 것 같은데요.
그외에는 지금 질문 만으로는 오류를 알기가 어렵습니다.
=IF(AND(F12>=1000000,H12>=50000),SUBSTITUTE(C12," ","★",1),"")
공백이라고 했으므로 " " 와 같이 "" 안에 띄어쓰기를 한번 해주셔야 합니다.
좋은 하루 되세요.
"-
*2012-08-14 11:39:34
Public Function 총판매액(차종, 상반기판매액, 하반기판매액)
총 = 상반기판매액 + 하반기판매액If 총판매액 >= 150000 Then
총판매액 = Left(차종, 2) & "총"
Else
총판매액 = "총"
End If
End Function총이 문자이므로 "총" 과 같이 사용하셔야 할 것 같은데요.
그외에는 지금 질문 만으로는 오류를 알기가 어렵습니다.
=IF(AND(F12>=1000000,H12>=50000),SUBSTITUTE(C12," ","★",1),"")
공백이라고 했으므로 " " 와 같이 "" 안에 띄어쓰기를 한번 해주셔야 합니다.
좋은 하루 되세요.
"