セル内の文章内で"[説明]"を先頭に空白までを抜粋して別のセルに表示できませんか?
LEFT・MID・RIGHT・FIND関数は試しました
=MID(B2,FIND("[説明]",B2),60)
=LEFT(B2,60)
表示させる文字数が各セルでまちまちなので指定ができません
指定してしまうと他の項目まで表示してしまうためできれば説明文のみが希望です
なので最後の空白または次の[]手前までで〆れば
説明文章のみ表示できるかなと思ったのですが(;^_^A
ちなみに関数では表示のみですがVBAでは転記できるのでしょうか?
B列に貼り付けたらC列に[説明]から空白までまたは次の[]手前までが転記出来たらありがたいです
A 回答 (5件)
- 最新から表示
- 回答順に表示
No.5
- 回答日時:
No4の追記です。
A5のケース:[説明]以降が表示対象なので、[説明]XYZが表示される
A6のケース:[説明]がないのでなにも表示されない
A7のケース:[ 説明 ]は、間に空白があるので、[説明]ではない。よってなにも表示されない。
No.4
- 回答日時:
以下のような結果で良いのでしょうか。
A列が元データ、B列が変換結果です。
A1のケース:改行の前までを表示
A2のケース:[○○]の前までを表示
A3のケース:[○○の後に]がないので、最後まで表示(半角空白の後も表示)
A4のケース:[○○の後に]がないので、最後まで表示(全角角空白の後も表示)
No.3
- 回答日時:
こんにちは
以下は、関数での例です。
>LEFT・MID・RIGHT・FIND関数は試しました
それを組み合わせれば宜しいでしょう。
・"[説明]"以降の半角スペースまたは"["までを切り出します。
・半角スペースや"["が見つからない場合は、文字列の最後までを取ります。
・"[説明]"が存在しない場合には、結果はエラーになります。
=MID(B2,FIND("[説明]",B2),MIN(FIND({" ","["},B2&" [",FIND("[説明]",B2)+4))-FIND("[説明]",B2))
※ 全角スペースなど終わりをチェックしたい文字が他にもある場合も同様で、その文字を追加すればそのままで切り出しが可能です。
※ Excel 2019 にて確認済。
回答ありがとうございますm(__)m
説明の内容文の中で半角スペースがある場合は
そこで切れてしまいますよね?
スペースの設定なしにして次の"["だけにすればOKですよね?
=MID(B2,FIND("[説明]",B2),MIN(FIND({"["},B2&" [",FIND("[説明]",B2)+4))-FIND("[説明]",B2))
No.2
- 回答日時:
空白とは、以下のどれを指してますか。
①半角の空白
②全角の空白
③半角の空白と全角の空白の両方
次の[]とは、
①[のみでもOK
②[の後に任意の文字が0文字以上あり、次に]があること
のどちらでしょうか。
No.1
- 回答日時:
VBAです。
標準モデュールに以下のソースを貼りつけ
Function setumei(rStr As String)
If InStr(1, rStr, "[説明]") = 0 Then
setumei = ""
Exit Function
End If
setumei = Right(rStr, Len(rStr) - InStr(1, rStr, "[説明]") + 1)
If InStr(1, setumei, " ") = 0 Then
Exit Function
End If
setumei = Left(setumei, InStr(1, setumei, " ") - 1)
End Function
シートで =setumei(B2)
空白は半角のスペースを想定しています。
全角なら2カ所ある InStr(1, setumei, " ") を InStr(1, setumei, " ")に変えて下さい。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
字面がカッコいい英単語
あなたが思う「字面がカッコいい英単語」を教えてください。
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
エクセルのマクロについて教えてください。
Visual Basic(VBA)
-
以下のコードを実行しても、オブジェクト変数または、withブロック変数が設定されていませんとエラーが
Visual Basic(VBA)
-
for 文の 繰り返し処理に使えるのかどうかについて
Visual Basic(VBA)
-
-
4
ExcelのVBAコードについて教えてください。
Visual Basic(VBA)
-
5
VBA UserFormからの転記で
Visual Basic(VBA)
-
6
エクセルVBAの配列について
Visual Basic(VBA)
-
7
VBA ファイル名取得
Visual Basic(VBA)
-
8
VBAコードについて教えてください、 下記のコードを一つにまとめる方法を教えてください セルF18に
Visual Basic(VBA)
-
9
VBのWPFとはなんでしょうか?
Visual Basic(VBA)
-
10
【ExcelVBA】VBA実行でダイアログメッセージを無視する方法はありますか?
Visual Basic(VBA)
-
11
ExcelのVBAコードについて教えてください。
Visual Basic(VBA)
-
12
Excel VBA 定義されたプロージャ名、関数名の取得
Visual Basic(VBA)
-
13
Excel VBA マクロ あるフォルダー内の複数のファイルを統合したいです
Visual Basic(VBA)
-
14
Excel 大なり小なりを表すとき、 例えば「10以上」なら、>=10 と表せますが、 この10の部
Excel(エクセル)
-
15
VBA 別ブックからコピペしたいのですが、軽くしたいです
Visual Basic(VBA)
-
16
エクセルvbaについて
Visual Basic(VBA)
-
17
エクセル。計算結果の桁揃えをするにはどうする?
Excel(エクセル)
-
18
Excel VBA 文字列のセルを反映させたいです
Visual Basic(VBA)
-
19
ExcelのVBAコードについて教えてください。
Visual Basic(VBA)
-
20
Excelのマクロで、セルを結合してその結合したセルに斜線「右上から左下」が出来るようになるコードっ
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA 文字に半角が含まれて...
-
英数字のみ全角から半角に変換
-
住宅にカナを入力する際に丁目...
-
IEからEdgeへの移行に伴うIMEの...
-
プログラミングでは、半角括弧...
-
「一角」って何でしょうか
-
C言語のコンパイルエラーなん...
-
Accessで日付や数値を全角で表...
-
SQLServerのNULLのデータと空文...
-
VB.net、テキストボックス入力...
-
word差し込み印刷 半角カタカ...
-
F9キーについて。
-
COBOL・全角判定
-
Pythonにおける全角括弧の正規表現
-
明細書の英数字の全角・半角に...
-
.NET3.5におけるキーボードの「...
-
エクセルの検索が正しくできな...
-
封筒の宛先で縦書きの書き方
-
[VBScript]バイト長の判定
-
エクセルにMicrosoft Barcode C...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
英数字のみ全角から半角に変換
-
住宅にカナを入力する際に丁目...
-
VBA 文字に半角が含まれて...
-
エクセルにMicrosoft Barcode C...
-
IEからEdgeへの移行に伴うIMEの...
-
プログラミングでは、半角括弧...
-
エクセルでの”々”の扱い
-
COBOL・全角判定
-
全角英数字の必要性が理解できない
-
全角入力
-
word差し込み印刷 半角カタカ...
-
封筒の宛先で縦書きの書き方
-
.NET3.5におけるキーボードの「...
-
VB.net、テキストボックス入力...
-
メモ帳の段落の揃え方
-
Accessで日付や数値を全角で表...
-
LaTeXで半角カンマと全角カンマ...
-
いまスマホからカードの申込み...
-
perl 初めてのプログラムにエラ...
-
Accessでのグループ化で全角・...
おすすめ情報
空白ですが改行されて1行空いている状態でした
なので全角半角の指定はわかりませんm(__)m
[〇〇]は次の項目になりますので②になります
https://itskill.hatenablog.com/entry/2021/05/02/ …
こちらも試してみましたがCSVが見つかりませんでした(;^_^A