AIと戦って、あなたの人生のリスク診断 >>

鉄骨関係です。

同行のセルを参照し
H形鋼、L形鋼、C形鋼が入力してある文字の一部分だけ
残すVBAを教えてください。(Excel2007を使用)


例えばE列がW(web)の時、同じ行の赤色部の部材はWeb厚の数字だけ残す。
F(Flange)の時は、鉄骨のFlange厚の数字だけ残す。

またPLも画像の様に、後の数字だけ残すようにしたいのですが
いい方法があれば御教示下さい。

「特定のセルを参照し、その一部分だけ残すマ」の質問画像

このQ&Aに関連する最新のQ&A

A 回答 (1件)

>VBAを教えてください



ご相談を見てる人は、WEBやFlangeの厚みとか言われてもどの数字が欲しいのか知りませんよ。

どういう部材を使ってて、結果してどういうパターンの文字列が入る「可能性がある」のかあなたの責任で全部羅列して、更にWやFなど何を指定するつもりなのか、その結果としてどの数字を最後に残したいのか etc,etc.
全体をキチンと体系立てて、整理してからご相談を投稿し直してみて下さい。



#参考
基本パターン:PLを拾う

sub macro1()
 dim Target as range
 dim h as range
 dim a as variant
 dim pos as long
 set target = range("L6:P10") ’データ範囲をてきとーに指定
 target.numberformatlocal = "0.0"
 on error resume next

 for each h in target.specialcells(xlcelltypeconstants, xltextvalues) 
  a = split(h.value, "*")
  pos = 0
  pos = application.match("PL*", a, 0)
  if pos > 0 then
   h = replace(a(pos - 1), "PL", "")
  end if
 next
end sub
    • good
    • 0

このQ&Aに関連する人気のQ&A

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


人気Q&Aランキング