Excel総合相談所 148

290 ：名無しさん＠そうだ選挙にいこう：2022/02/14(月) 10:32:04.39 .net

【1 OSの種類 　 　 　 　 .】 Windows10
【2 Excelのバージョン 　 】 Excel2019
【3 VBAが使えるか　 　 .】 はい
【4 VBAでの回答の可否】 否

5ｃｈのスレッドキーからレス数を取り出す関数
開始日　　　　　　　　　　スレタイ　　　　　　　　レス数　　　終了日　　　　　　　　　　　　　　　こうしたい
1617118210.dat<>〇〇〇〇〇〇〇〇〇〇〇〇 <> 9 <> 1606201102<>　　　　　　　　　　　　→　9
1617118210.dat<>〇〇〇〇〇〇〇〇〇〇〇〇 <> 89 <> 1606201102<>　　　　　　　　　　　→　89
1617118210.dat<>〇〇〇〇〇〇〇〇〇〇〇〇 <> 789 <> 1606201102<>　　　　　　　　　　→　789
1617118210.dat<>〇〇〇〇〇〇〇〇〇〇〇〇 <> 1002 <> 1606201102<>　　　　　　　　　→　1002
※レスアンカーがおかしいといわれて書き込めないのでスペース入れてますが<>と数字は連続しています

=LOOKUP(2000,RIGHT(LEFT(RIGHT(A2,18),4),COLUMN(A2:D2))*1)
この関数だと一桁の場合エラーになります　　
〇 <> 9 <> 1606201102<>　　　　　（右18文字）
↓
〇 <> 9　　　　　　　　　　　　　　　　　（左4文字）　　
↓
〇 <> 9　　　→　数値にならない　　　（右4文字）



=LOOKUP(2000,RIGHT(LEFT(RIGHT(A2,18),4),COLUMN(A2:C2))*1)
この関数だと1002の場合「2」になってしまします
1002 <> 1606201102 <>　　　　　　（右18文字）
↓
1002　　　　　　　　　　　　　　　　　（左4文字）
↓
002　→　2　　　　　　　　　　　　　（右3文字）