Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


59263 / 76732 ←次へ | 前へ→

【22175】Re:セル内の指定した文字以降を削除
発言  sa  - 05/2/10(木) 15:25 -

引用なし
パスワード
   ▼Avene さん:
質問は、
>>name以降を削除する方法がわかりません。
ですよね
>>>   F.Value = Left(D.Value, InStrRev(D.Value, "date") + 1)
date 何のことですか?
InStrRev(D.Value, "date")は、
文字列 D.Valueを右から調べて、はじめに見つかった
文字列dataが文字列 D.Valueの(左から)何番目の文字かを調べています
一度InStrRev(D.Value, "date")がどんな数値化調べれば             
文字列 D.Valueのどの位置を示しているかわかるはずです


>▼sa さん:
>
>ありがとうございます。
>
>>Mid の代わりに Leftを使ってみてください
>
>Left を使い下記のマクロで実行してみたのですが
>なぜか「name〜」の 「na」部分だけのこってしまいます。
>
>実は、+1とかの意味がわかっていないのですが
>これはどういう意味なのでしょうか?
>ご教授お願いいたします。。
>
>
>>>++++++++++++++++++++++++++++++++++++++
>>>
>>>Sub test()
>>>
>>>Dim D As Range
>>>
>>>
>>>  For Each D In Range("A1", Range("A65536").End(xlUp))
>>>   D.Value = Mid(D.Value, InStrRev(D.Value, "\") + 1)  
>>>  Next
>
>>>  For Each F In Range("A1", Range("A65536").End(xlUp))
>>>   F.Value = Left(D.Value, InStrRev(D.Value, "date") + 1)  
>>>  Next
>
>>>
>>>End Sub
>>>++++++++++++++++++++++++++++++++++++++
2 hits

【22160】セル内の指定した文字以降を削除 Avene 05/2/10(木) 10:41 質問
【22161】Re:セル内の指定した文字以降を削除 IROC 05/2/10(木) 10:47 回答
【22162】Re:セル内の指定した文字以降を削除 Avene 05/2/10(木) 11:01 質問
【22166】Re:セル内の指定した文字以降を削除 IROC 05/2/10(木) 12:58 回答
【22167】Re:セル内の指定した文字以降を削除 Avene 05/2/10(木) 13:01 質問
【22168】Re:セル内の指定した文字以降を削除 IROC 05/2/10(木) 13:28 回答
【22169】Re:セル内の指定した文字以降を削除 Avene 05/2/10(木) 13:53 質問
【22171】Re:セル内の指定した文字以降を削除 IROC 05/2/10(木) 14:12 回答
【22172】Re:セル内の指定した文字以降を削除 sa 05/2/10(木) 14:36 発言
【22173】Re:セル内の指定した文字以降を削除 Avene 05/2/10(木) 15:02 お礼
【22175】Re:セル内の指定した文字以降を削除 sa 05/2/10(木) 15:25 発言
【22199】Re:セル内の指定した文字以降を削除 Avene 05/2/10(木) 20:04 お礼
【22209】Re:セル内の指定した文字以降を削除 sa 05/2/11(金) 16:21 発言

59263 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free