Microsoft ExcelでVBAを使用してテキストとして扱われ、負の値を変換
この記事では、負の文字列を整数に変換するカスタム関数を作成します。
この記事の生データは、文字列とそれに続くマイナス記号(-)で構成されます。
これらの文字列を整数に変換したいと思います。
ロジックの説明
この記事では、文字列を整数に変換するカスタム関数ConvertNegNumbersを作成しました。この関数は、入力として文字列値を受け取り、出力として整数を返します。
コードの説明
Right(Var、1)= “-“
上記のコードは、文字列の最後の文字がマイナス記号(-)に等しいかどうかを確認するために使用されます。
ConvertNegNumbers = CInt( “-“&Left(Var、Len(Var)– 1))
上記のコードでは、左の関数を使用して、最後の文字を除く文字列内のすべての文字を抽出しています。 CInt関数は、文字列値を整数に変換するために使用されます。
コードについては以下に従ってください
Option Explicit Function ConvertNegNumbers(Var As String) 'Checking whether last character in the string is minus(-) If Right(Var, 1) = "-" Then 'Converting string value to negative integer ConvertNegNumbers = CInt("-" & Left(Var, Len(Var) - 1)) Else 'Converting string value to integer ConvertNegNumbers = CInt(Var) End If End Function
このブログが気に入ったら、FacebookやFacebookで友達と共有してください。
皆様からのご意見をお待ちしております。私たちの仕事を改善し、あなたのために改善する方法をお知らせください。 [email protected]までご連絡ください