4年に一度のスポーツの祭典 全競技速報中

Excel VBAが動きません涙

エクセルで作業をしていて、数式入りで空白が帰ってきているセルを一括削除したくて色々調べていると、vbaをつかわないとできないということで、今回、初めて使ってみました!
ネットの見よう見まねで書いてみたんですが動かないし、何で動かないのか色々見てもわからないです涙
どこが間違っているのか教えていただきたいです!

やりたい作業としてはシート2のc2セルからc56セルまでの数式入りで空白が帰ってきているセルを削除することです!

Sub 空白セル削除()
Dim a As Long
Dim i As Long

For i = 56 To 2 Step -1

Worksheet_Activate (Sheet2)

If Len( Cells (i,3) .Value)=0 then
Cells( i,3) . delete

End If

Next i


End Sub

gooドクター

A 回答 (9件)

ダブルクリックイベントからの実行ですが、試しに作ってみたら動きました。



Dim i As Long
For i = 56 To 2 Step -1
Worksheets("Sheet1").Activate
If Len( Cells (i,1) .Text)=0 then
Cells( i,1).delete
End If
Next i

多分セル値が悪さをしていると思いますので、デバッグ、ウォッチなどについて調べて、処理中の値を見てみた方が良いと思います。
    • good
    • 0
この回答へのお礼

ありがとうございます!今色々やってみたらピリオドを打つと全部エラーになってしまっているみたいです汗
どうすればいいんでしょうか涙

お礼日時:2021/06/15 13:45

あーえっと、正確には半角スペースは空白扱い、全角スペースはスペースとして出ます。



数式で空白というのは本当に空白が返っているのでしょうか?実は0が返っているけど見えなくしているとかではないんですね?
オートフィルタの範囲が空白のあるセルを含んでいないということもないですか?
    • good
    • 0
この回答へのお礼

Iferror で””を出力しています!

お礼日時:2021/06/15 13:40

>というか、スペースでも空白セル扱いになりますが





なりません!
    • good
    • 0
この回答へのお礼

すいません! ピリオドの前後のスペースを消したら全部動きました!初歩的なミスで申し訳ないです!

お礼日時:2021/06/15 16:11

というか、スペースでも空白セル扱いになりますが。

    • good
    • 0

>数式が入っていてその値として空欄が返ってきてるセルは選択できないんですよね汗



試してから書いてます?
そうだとすると、それはスペースが入っているのでは?
    • good
    • 0
この回答へのお礼

もちろん試してます!
色々調べた挙句、数式が入っていると空白セル扱いにならないみたいです!
僕もまさかと思ってびっくりしました!

お礼日時:2021/06/15 12:14

シート名は


ダブルクォーテーションで囲む
    • good
    • 0
この回答へのお礼

ありがとうございます!
しかし中段のところがやはり動きません涙

お礼日時:2021/06/15 12:13

Worksheet_Activate (Sheet2)



これはおかしい

Worksheets(シート名).Activate
    • good
    • 0

1列単位であればオートフィルタで空白セルだけフィルタリングしてから上から下まで選択肢して削除したらいいのでは?

    • good
    • 0
この回答へのお礼

オートフィルタだと数式も何も入っていない空欄セルは選択できても、数式が入っていてその値として空欄が返ってきてるセルは選択できないんですよね汗

お礼日時:2021/06/15 11:01

If Len( Cells (i,3) .Value)=0 then



ValueをTextに変えてみてください。
セルには色々な情報が入っているのですが、視覚的に表示されている値を取りたい時はTextだったと思います。

ところで、
下から上にくるようにループを作っているので、想定されているかもしれませんが、セルの削除はdeleteで良いのですか?
セルが上にずれますので、他の列と位置がずれます。
    • good
    • 1
この回答へのお礼

Value でもtextでも
コンパイルエラーです。
とでて. Value や.text の.の修正候補に)が表示されます。汗

何かが間違っているんだと思うんですけど見当つきません!

セルに関しては上にずれて欲しいので問題ありません!















にしたいって感じです!

お礼日時:2021/06/15 11:01

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

gooドクター

このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング