
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も見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
EXCEL(VBA) 末尾の改行のみ削除したい
Excel(エクセル)
-
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
4
エクセル、VBAで文字列から1文字消去
Excel(エクセル)
-
5
エクセル:セル内の文字列の最後の「,]を消したい。
その他(Microsoft Office)
-
6
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
7
文字列の後ろから必要分だけ削除したい。
Visual Basic(VBA)
-
8
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
9
配列で格納したものをmsgboxで表示する方法について
Access(アクセス)
-
10
別のシートから値を取得するとき
Visual Basic(VBA)
-
11
VBA 実行時エラー1004 rangeメソッドは失敗しました。globalオブジェクトのエラー
Excel(エクセル)
-
12
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
13
バックスペース機能の作り方
Visual Basic(VBA)
-
14
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
15
コンボボックス内の文字サイズ変更
Excel(エクセル)
-
16
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
17
Excel VBA:特定の文字列以降(あるいは以前)のテキストをすべて取得する方法
Visual Basic(VBA)
-
18
EXCEL VBAで、セルの文字列の前後に文字を入力する方法は?
その他(Microsoft Office)
-
19
'Range'メソッドは失敗しました
Excel(エクセル)
-
20
【VBA】特定の文字が入っている行の一部を抽出して別シートコピーするには
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
エクセル関数で 負の数を正の...
-
5
エクセルで数字から名前に変...
-
6
エクセルでのセルをまたぐ文字...
-
7
Excel関数 「日付を入力...
-
8
エクセルでのNULLという文字列...
-
9
エクセルで空白のセルを探して...
-
10
エクセルで漢字を数字に変換す...
-
11
(EXCEL)CELLの色をカウントす...
-
12
EXCELで連続していない数値を30...
-
13
エクセル関数で…
-
14
エクセルで縦書きルビの付け方
-
15
excelセル内の掛け算計算方法
-
16
エクセルで、縦の列に順番に1...
-
17
エクセル 親番号、子番号の書き...
-
18
Excel VBA 自動で連番をわりふる
-
19
Excel:複数セルの計算値を一気...
-
20
エクセルにて結合サイズが異な...
おすすめ情報
公式facebook
公式twitter