
No.1ベストアンサー
- 回答日時:
A1セルの場合です。
Dim i As Long
i = InStr(Range("A1").Value, "_")
If i > 0 Then
Range("A1").Value = Right(Range("A1").Value, Len(Range("A1").Value) - i)
End If
No.2
- 回答日時:
これって "_" が2個以上あるとか0個の時でもなどのケースはあるのでしょうか?
取り敢えず1個と言うなら
with range("A1")
.value = split(.value, "_")(1)
end with
とか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel 入力規則のリストのカー...
-
Excel VBA 空白セルがあったら...
-
GridViewの行選択イベントを発...
-
マクロについて質問です 範囲内...
-
エクセルの取り消し線を検出す...
-
マウスを乗せたときにセルの色...
-
エクセル: セルの枠を超えて表示
-
エクセルのセル内に全角数字を...
-
エクセルで表示形式の時刻の「0...
-
エクセルで連続データから、数...
-
エクセルのアポストロフィを一...
-
エクセルのセル内の余白の設定...
-
エクセルでの計算式で求められ...
-
Excelに入力した個々の日付の数...
-
EXCELで特定のセルに表示...
-
エクセル:マクロ「Application...
-
エクセルで文字の入力がセルの...
-
IF関数で空欄("")の時、Null...
-
【エクセル】関数で「A1が0でな...
-
貼り付けで複数セルに貼り付けたい
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel VBA 空白セルがあったら...
-
Excel VBA コンボボックスで空...
-
VBA 別ブックから条件に合うも...
-
Excelマクロで空白セルの大小比...
-
クリップボードの内容を変数に...
-
Excel 入力規則のリストのカー...
-
【VBA】セルが空白の場合に処理...
-
複数セルに〇印をつけるマクロ
-
DataGridViewでセルを結合したい
-
マクロについて質問です 範囲内...
-
【VB.NET】DataGridViewセルの...
-
VBA サンダーバードのメール自...
-
VBA 文字列を1文字ずつ調べて"...
-
VBAを用いて特定の範囲のセルの...
-
JTableにおけるセルの結合について
-
マウスを乗せたときにセルの色...
-
FireFoxについて
-
Excel VBA 多重ループについて
-
VBAの参照方法について
-
Goolgeスプレッドシートの内容...
おすすめ情報