
No.2ベストアンサー
- 回答日時:
こんな感じでしょうか。
Sub DeleteEndLetter()
Dim r As Range
For Each r In Application.Selection
If Len(r.Value) > 0 Then
r.Value = Left(r.Value, Len(r.Value) - 1)
End If
Next
End Sub
ham_kamo様 ありがとうございました。
いろいろな記述の方法があるようですね。モジュールに
コピーしていじくり回してみましたが、ham_kamoさんの
方法だと空白で実行してもエラーがでませんでした。
そこが相違点なのですか?
早速明日から会社で実験してみます。
ebinamori様 ham_kamo様 ありがとうございます(ponta)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
新生活!引っ越してから困らないように注意すべきことは?
新しい職場や学校で元気いっぱいのスタートを切るためにも快適な生活環境を整えておきたい! >>
-
文字列の後ろから必要分だけ削除したい。
Visual Basic(VBA)
-
エクセル、VBAで文字列から1文字消去
Excel(エクセル)
-
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
4
EXCEL(VBA) 末尾の改行のみ削除したい
Excel(エクセル)
-
5
Excel VBA:特定の文字列以降(あるいは以前)のテキストをすべて取得する方法
Visual Basic(VBA)
-
6
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
7
'Range'メソッドは失敗しました
Excel(エクセル)
-
8
別のシートから値を取得するとき
Visual Basic(VBA)
-
9
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
10
エクセル:セル内の文字列の最後の「,]を消したい。
その他(Microsoft Office)
-
11
指定した文字があった場合、その行を削除するマクロが欲しいです
Excel(エクセル)
-
12
VBAで文字列を数値に変換したい
Excel(エクセル)
-
13
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
14
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
15
vba 2つの条件が一致したらコピーして別シートに値のみ貼り付け
Visual Basic(VBA)
-
16
複数の条件に合う行番号を取得するには
その他(Microsoft Office)
-
17
ユーザーフォームのコピー?
Excel(エクセル)
-
18
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
19
EXCEL VBAで、セルの文字列の前後に文字を入力する方法は?
その他(Microsoft Office)
-
20
VBA 実行時エラー1004 rangeメソッドは失敗しました。globalオブジェクトのエラー
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
macのnumbersなんですけど・・・
-
5
エクセルのチェックボックスを...
-
6
エクセル関数で…
-
7
VBAで「セルに何か入っている場...
-
8
エクセルで空白のセルを探して...
-
9
エクセルでのセルをまたぐ文字...
-
10
Excelでビット演算子?
-
11
CSVで保存するとセルの書式...
-
12
EXCELで連続していない数値を30...
-
13
Excel:セルに入力されている日...
-
14
エクセルファイルを開くとメッ...
-
15
(EXCEL)CELLの色をカウントす...
-
16
折り返して表示、縮小して表示...
-
17
Excel関数 「日付を入力...
-
18
エクセル 週ごとの数値抽出
-
19
エクセル 親番号、子番号の書き...
-
20
エクセルで漢字を数字に変換す...
おすすめ情報