Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


7055 / 76732 ←次へ | 前へ→

【75269】Re:特定の文字内の値抽出
発言  γ  - 14/1/26(日) 9:39 -

引用なし
パスワード
   こんにちは。
「 番号       数量  」
以下のデータは、何列の何行目にあるのですか?
行のことも誤解の無いように書いたほうがいいですね。

繰り返し処理のなかで、
文字列を分解する必要がある場所かどうかは、
文字列中に"年" がふくまれているかどうかで判定します。
If InStr(s,"年") > 0 Then といった書き方です。

文字列を分解する部分は下のコードを参考にしてください。
繰り返しの処理はご自分で組み立ててみてください。

Sub test()
  Dim s As String
  Dim ary
  Dim s1 As String
  Dim s2 As String
  Dim s3 As String
  Dim s4 As String

  s = "○○ 2011年9月"
  ary = Split(s, " ", 2) 'スペースが二つ以上あることも考慮。

  s1 = ary(0)           '' "○○"
  s2 = Trim(ary(1))        '' "2011年9月"

  ary = Split(s2, "年")
  s3 = ary(0)           '' "2011"
  s4 = Replace(ary(1), "月", "") '' "9"

End Sub

0 hits

【75266】特定の文字内の値抽出 VBA初心者 14/1/25(土) 20:59 質問
【75269】Re:特定の文字内の値抽出 γ 14/1/26(日) 9:39 発言
【75271】Re:特定の文字内の値抽出 VBA初心者 14/1/26(日) 10:39 質問
【75275】Re:特定の文字内の値抽出 γ 14/1/28(火) 22:08 発言
【75282】Re:特定の文字内の値抽出 VBA初心者 14/2/1(土) 8:59 お礼

7055 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free