펑
8 Comments
Excel을 열고, Alt + F11을 눌러 VBA 편집기를 엽니다.
삽입 메뉴에서 모듈을 선택합니다.
다음 코드를 입력합니다:
vba
Copy code
Function PolarToRectangular(magnitude1 As Double, angle1 As Double, magnitude2 As Double, angle2 As Double) As Variant
Dim complex1 As Variant
Dim complex2 As Variant
' 각도를 라디안으로 변환
angle1 = angle1 * (Application.WorksheetFunction.Pi / 180)
angle2 = angle2 * (Application.WorksheetFunction.Pi / 180)
' 복소수 계산
complex1 = WorksheetFunction.IMExp(magnitude1, angle1)
complex2 = WorksheetFunction.IMExp(magnitude2, angle2)
' 두 복소수를 나누어 결과 반환
PolarToRectangular = complex1 / (magnitude2 * complex2)
End Function
VBA 편집기를 닫고 Excel로 돌아가서 새로운 함수를 사용하려는 셀에 다음과 같이 입력합니다:
excel
Copy code
=PolarToRectangular(55, 315+180, 80, 191)
엔터 키를 누르면 계산 결과가 표시됩니다.
이 함수를 사용하면 두 극좌표 복소수를 간편하게 계산할 수 있습니다.
49
∠
14
49∠14에 대한 결과를 얻으려면 다음과 같이 사용하십시오:
excel
Copy code
=PolarToRectangular(49, 14, 0, 0)
이것으로 사용자 정의 함수를 만들어 복소수 계산을 쉽게 수행할 수 있게 되었습니다.
삽입 메뉴에서 모듈을 선택합니다.
다음 코드를 입력합니다:
vba
Copy code
Function PolarToRectangular(magnitude1 As Double, angle1 As Double, magnitude2 As Double, angle2 As Double) As Variant
Dim complex1 As Variant
Dim complex2 As Variant
' 각도를 라디안으로 변환
angle1 = angle1 * (Application.WorksheetFunction.Pi / 180)
angle2 = angle2 * (Application.WorksheetFunction.Pi / 180)
' 복소수 계산
complex1 = WorksheetFunction.IMExp(magnitude1, angle1)
complex2 = WorksheetFunction.IMExp(magnitude2, angle2)
' 두 복소수를 나누어 결과 반환
PolarToRectangular = complex1 / (magnitude2 * complex2)
End Function
VBA 편집기를 닫고 Excel로 돌아가서 새로운 함수를 사용하려는 셀에 다음과 같이 입력합니다:
excel
Copy code
=PolarToRectangular(55, 315+180, 80, 191)
엔터 키를 누르면 계산 결과가 표시됩니다.
이 함수를 사용하면 두 극좌표 복소수를 간편하게 계산할 수 있습니다.
49
∠
14
49∠14에 대한 결과를 얻으려면 다음과 같이 사용하십시오:
excel
Copy code
=PolarToRectangular(49, 14, 0, 0)
이것으로 사용자 정의 함수를 만들어 복소수 계산을 쉽게 수행할 수 있게 되었습니다.
Best Recommend
- +330 09.17 FC2PPV-4978035
- +149 09.18 ROYD-352 오오토리 미유/후지이 레이라
- +102 09.18 SNOS-337 미츠 코노하
- +99 09.18 SNOS-399 아사노 코코로
- +120 09.20 FC2PPV-4980119
- +95 09.18 SNOS-394 사카키바라 모에
- +81 09.18 SNOS-405 유메노 아이카
- +82 09.19 MKMP-754 사쿠라 유노/오노사카 유이카/미야기 리에
- +68 09.18 SNOS-367 하야사카 카논
- +72 09.22 SODS-088 카미키 레이/미야지마 메이/이치미야 루이/혼죠 스즈/아마가미 우이/타다이 마히로
- +74 09.18 SNOS-397 쿠라키 하나
- +66 09.17 FC2PPV-4977946
- +52 09.20 FC2PPV-4979802
- +48 09.18 SNOS-403 시라카미 에미카
- +76 09.19 [REMOVE]SNOS-399U 아사노 코코로
- +62 09.19 FC2PPV-4979299
- +70 09.17 NHDTC-252
- +49 09.19 FC2PPV-4977133
- +28 09.19 [REMOVE]SNOS-403U 시라카미 에미카
- +37 09.19 [REMOVE]SNOS-367U 하야사카 카논
- +26 09.19 [REMOVE]SNOS-405U 유메노 아이카
- +23 09.22 092226-001-CARIB 타나카 리노
- +44 09.20 [REMOVE]ROYD-352U 오오토리 미유/후지이 레이라
- +40 09.21 SVMGM-052
- +20 09.21 FC2PPV-4980367
- +44 09.22 START-638 아라카와 소라
- +19 09.19 [REMOVE]SNOS-394U 사카키바라 모에
- +35 09.22 FC2PPV-4980702
- +21 09.18 ROYD-362 아마카와 소라
- +18 09.18 SNOS-444 호시조라 네루
