vba - VBAを使用して文字列から整数値を取得

Question

QTP と SAP を使用してスクリプトを自動化しようとしています。

SAP では、ステータス バーのドキュメント番号が「番号 4500290636 で作成された標準 PO」として注文が生成されます。

私の課題は、文字列を整数値に変換する方法です。

Answer 1

分割機能を使用できます。

Dim strSplit As Variant
Dim yourNumericOut As Variant

    strSplit = Split("Standard PO created under the number 4500290636")

    If IsNumeric(UBound(strSplit)) Then yourNumericOut = --strSplit(UBound(strSplit))

次に、数値のテストを行い、多くの長さを許可し、返される値の数値の位置を変更する可能性があります。

Answer 2

SAP を使用しているので、伝票番号は常に 10 文字の長さであると想定しても問題ないと思います。したがって、関数を使用して抽出し、 を使用してRight変換するだけValです。このようなもの：

yourInteger = Val(Right(yourSAPString, 10))

注: .net では、Val の代わりに Convert.ToInt32 を使用できます。