プロが教える店舗＆オフィスのセキュリティ対策術

EXCEl VBA

締切済

  • 質問者：ケンケン123
  • 質問日時：
  • 回答数：1件

VBA　D列にC列の文字前に値を読み取りたいです（数値やハイフンなど）C列は空欄の場合D列も空欄　例えば、 C1 23-79女泳衣（4件套）　D1 23-79

「EXCEl VBA」の質問画像
通報する

この質問への回答は締め切られました。

質問の本文を隠す

A 回答 (1件)

No.1

  • 回答者： fujillin
  • 回答日時：

不明点は勝手に想定。



Sub hoge()
Dim re, c
Set re = CreateObject("VBScript.RegExp")
re.Pattern = "[^0-9\-].*$"
For Each c In Cells(1, 3).Resize(Cells(Rows.Count, 3).End(xlUp).Row)
c.Offset(, 1).Value = re.Replace(c.Text, "")
Next c
End Sub
    • good
    • 2
    • 件
通報する

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

このQ&Aを見た人はこんなQ&Aも見ています

関連するカテゴリからQ&Aを探す

ページトップページトップ

Q質問する（無料）

このQ&Aを見た人がよく見るQ&A

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報