Excel VBA 質問スレッド No.11 (未解決)

Charactersのメソッドを実行すると1004エラーの件

投稿者 : John     投稿日時 : 2016/04/06(Wed) 13:37:36     OS : Windows 7     EXCEL : Excel 2013
取消線の文字を削減するため、Characters(i,1).deleteを実行しますと、1004エラーで"実行時エラー charactersクラスのDeleteプロパティを取得できません"
なぜなんでしょうか

[返信 1] Re : Charactersのメソッドを実行すると1004エラーの件
投稿者 : すずき     投稿日時 : 2016/04/07(Thu) 07:24:21
Excel2007の環境ですが、
書式が"G/標準""数値のみ"が入力されているセルに対して
Characters(i,1).Delete
を実行すると上記エラーになりました。

解決策としては、ちょっと姑息な手ですが、
セル内の文字列が数値でなければ問題ないようなので、
強引に文字列としてしまう方法が考えられます。

Sub test()
With Range("A1")
.Value = .Value & "*" ' 強引に文字列とする
.Characters(1, 1).Delete ' 部分削除
.Value = Left(.Value, Len(.Value) - 1) ' 最後の文字削除
End With
End Sub

[返信 2] Re : Charactersのメソッドを実行すると1004エラーの件
投稿者 : John     投稿日時 : 2016/04/07(Thu) 17:52:55
早速のご回答ありがとうございます。
確かに数字の場合はそうですが、自分のパターンは数字ではなかったです。
改行の文字が大量あるのセルです、先頭に” ’ ”をつけると、エラーにならないですが、削除結果はなにも変わらないようになります。

スポンサード リンク
 
 
当掲示板について
返信入力フォーム
お 名 前  :
内  容   :
ステータス  : この質問を解決済みにする

認証コード  :
        キャプチャ画像


( 処理日時 : 2019-08-26 10:29:26 )

Page
Top