対象:Excel2003, Excel2007, Excel2010
「エクセル 最初の一文字を削除する」
という検索が、このサイト・インストラクターのネタ帳で行われていました。
Excelでデータの整理を行っている方からいただく定番のご質問の一つです。
既に、ワークシート関数の、MID関数・LEN関数を使った方法と、RIGHT関数・LEN関数を使った方法をご紹介しています。
[スポンサードリンク]
もちろんVBAでマクロを作成しても、一文字目だけを削除することは可能です。
Sub 最初の一文字目を削除する()
Dim rng As Range
For Each rng In Range("A1:A5")
rng.Value = Mid(rng.Text, 2)
Next rng
End Sub
Dim rng As Range
For Each rng In Range("A1:A5")
rng.Value = Mid(rng.Text, 2)
Next rng
End Sub
上記のマクロを実行すると、A1:A5セルの先頭の一文字目だけが削除されます。
VBAのMid関数は、文字列から指定した文字数分の文字列を返してくれる関数です。
第3引数を省略した場合、第2引数から後のすべての文字が返されますから「Mid(rng.Text, 2)」で、一文字目を削除した文字列となり、それをRangeオブジェクトのVauleプロパティとして設定しています。
rng.Value = Mid(rng.Text, 2)
関連語句
左からn文字削除したい, 左から1文字削除したい, 前から1文字を削除する方法, 最初の一文字を削除する, 先頭文字の削除
最終更新日時:2018-11-01 11:28
[スポンサードリンク]
- Newer:表のグリッド線の表示・非表示は?-表ツール-レイアウトタブ
- Older:見出し1の文字列を取得するWordマクロ
Home » エクセルマクロ・Excel VBAの使い方 » VBA関数 » 最初の一文字を削除するExcelマクロ-Mid関数