このカスタム関数は、秒の値が 0 の場合でも、Degree_Deg引数が形式<度>° <分>秒<>にない場合に失敗します。VB コピー Function Convert_Decimal(Degree_Deg As String) As Double ' Declare the variables to be double precision floating-point Dim degrees As Double Dim minutes As Double Dim...