プロフィール

Author:はるかわ しおん
なにか、新しいものを。
そして、楽しいものを。

FC2カウンター


上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。
  • Excel VBA でセル・文字列の書式を維持しつつ、不要な文字列を削除

Excel VBA にて、文字列の書式を維持しつつ、一部の文字列を削除したいという状況になりました。
しかし、ぐぐっても情報がない!

苦労しましたが、こんな感じでいけました。
# あくまで自分の覚書なので、ソースがあんまり掃除されていないのはご勘弁。


'今回の例では、先頭~| までを削除する想定のため、| の位置を検索
intCount = InStr(<対象セル>.Value, "|")

'いらない部分を削除
'<対象セル>.Value = Right(<対象セル>.Text, Len(<対象セル>.Text) - intCount) 'これだと、書式が維持されない・・・
ActiveCell.Characters(0, intCount).Delete 'これだと、書式が維持される



コメント

コメントの投稿

   管理者にだけ表示を許可する
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。