「numExtractサブルーチン」の詳しい説明は以下よりご確認ください。
Function numExtract(strValue As String) As String
Dim i As Integer
For i = 1 To Len(strValue)
oneTxt = Mid(strValue, i, 1)
If oneTxt Like "[0-9]" Then: numExtract = numExtract & oneTxt
Next i
End Function
※ドラッグ(スワイプ)すると全体を確認できます。
| 引数名 | データ型 | 内容 | 値の事例 | 初期値 | 省略 |
|---|---|---|---|---|---|
| strValue | String | チェックする文字列 | "A商品の価格は4,521円" | × |
numExtract("チェックする文字列")
「strValue」は必須項目です。
数字だけを抽出する対象の文字列を指定してください。
↑VBAのIE操作で分からない事があればこちらの掲示板よりご質問ください。
ExcelのVBA初心者入門↑こちらはVBAをマスターできるよう初心者向けのエクセルVBA入門コンテンツになります。
目次
IE制御の準備
HTMLエレメント基本操作
HTMLエレメント実践操作
IE操作に便利なツール
こちらでは、これまでに紹介したIE(InternetExplorer)操作で便利な機能をツール化しています。無償でダウンロードできますので、目的に合わせたご利用ください。
IEのメソッド・プロパティ
こちらでは、IE(InternetExplorer)オブジェクトのメソッド・プロパティをまとめています。
IE操作のVBA関数
こちらでは、エクセルVBAのIE(InternetExplorer)操作で利用されたVBA関数をまとめています。
IE操作のステートメント
こちらでは、エクセルVBAのIE(InternetExplorer)操作で利用されたステートメントをまとめています。ExcelのVBAで基本的な部分になりますので、しっかり理解しましょう。
IE制御のVBAコード
こちらでは、これまでに作成したIE(InternetExplorer)操作で役立つサブルーチンをまとめています。
全てをコピーする必要はありませんが、目的に合わせたサブルーチンをご利用ください。