【VBA】正の数値に+記号を追加|Sgn
記事更新日:2022-12-15

数値が正の値なら、+記号を追加して文字列で返す

戻り値は、文字列になる
Public Function AddPlusSign(ByVal v As Variant) As String
AddPlusSign = v
If Sgn(v) = 1 Then AddPlusSign = "+" & v
End Function
関連記事
CLICK
2022-12-15
編集後記:
この記事の内容がベストではないかもしれません。
記事一覧
-
ユーザーフォームを半透明にする 【VBA】ユーザーフォームを半透明にしてシートの内容が見えるようにする|waiting-form -
一次元配列を縦に貼り付ける 【VBA】一次元配列を縦方向にシートに貼り付け【範囲をリサイズする】 -
ブックを開く 【VBA】ブックを開く|OpenBook -
指定の文字より前/後ろをカット 【VBA】文字列から、指定の文字をカットする|指定文字より前/後ろを残す -
dictionaryをセットする 【VBA】Dictionaryのセット|CreateObject(“Scripting.Dictionary”) -
テーブルの値を取得する 【VBA】Excelテーブルのデータを配列で取得する