> これが書き方の違いなのか理由があるのかがわかりませんでした。

エクセルではシート名は同一ファイル内で Unique なのでオブジェクトの .name プロパティの比較でも唯一の対象を見いだせます。
Is 演算子は、「同一オブジェクトかどうか」を比較する演算子なので、プロパティまで調べることなく同一かどうかの判定を行えます。


以下の2つの動画を復習してください。

発展１講座第４章 - 論理演算子 イントロダクション
https://forum.pc5bai.com/lesson/page/207/

発展１講座第４章 - 論理演算子 解説
https://forum.pc5bai.com/lesson/page/208/

そのうえで、以下のコードを実行してみてください。

Sub compare()
    'Not 演算子のあとの(カッコ)は本当は不要なのですが可読性のためにあえて付与
    Dim wSummary As Worksheet
    Dim w As Worksheet
    Set wSummary = Worksheets("Summary")
    
    Debug.Print "= で比較"
    For Each w In Worksheets
        Debug.Print w.Index; w.Name = wSummary.Name
    Next
    
    Debug.Print "<> で比較"
    For Each w In Worksheets
        Debug.Print w.Index; w.Name <> wSummary.Name
    Next
    
    Debug.Print "not = で比較"
    For Each w In Worksheets
        Debug.Print w.Index; Not w.Name = wSummary.Name
    Next
    
    Debug.Print "not <> で比較"
    For Each w In Worksheets
        Debug.Print w.Index; Not w.Name <> wSummary.Name
    Next
    
    Debug.Print "is で比較"
    For Each w In Worksheets
        Debug.Print w.Index; w Is wSummary
    Next
    
    Debug.Print "not is で比較"
    For Each w In Worksheets
        Debug.Print w.Index; Not w Is wSummary
    Next
End Sub

> 日付を扱う時はDateAddを使わないと不具合が生じる事もあるのでしょうか。

日付は内部的には小数値として保持されています。

Sub dt_sample()
    Dim dt As Date
    dt = #9/10/2023 3:23:00 PM#
    
    Debug.Print dt '2023/09/10 15:23:00
    Debug.Print CDbl(dt) '45179.6409722222
    
    dt = 0
    Debug.Print dt '0:00:00
    Debug.Print CDbl(dt) '0
    
    dt = #12:00:00 AM#
    Debug.Print dt '0:00:00
    Debug.Print CDbl(dt) '0
End Sub

整数部分が日付なので dt = dt + 1 とすれば 24時間分が加算されます。
日付であればこの計算でよいでしょうが、24進数の時間や60進数の分、月によって日数の異なる月を加算するには DateAdd関数のほうが便利でしょう。

凜さんなら以上で十分と思いますが、まだしっくり来ないことがあるようでしたらまたご相談ください。

2023/09/10 15:27

動画2つ復習しました。どちらも１回目の視聴時に特に問題なく理解できたと思えた部分でしたが、今改めて見てみると以前よりも実際に使用する事を想定した視点で見れたような気がします。「理解できる」と「使える」の差は大きいなと実感しました。
私はつまづかないと「理解できたけど使えていない」事に気付けないので、いいきっかけになりました。
ありがとうございます。

記載して頂いたコードも実行してみました。
どれも必要な結果を得られますが、可読性を考えるとプロパティで比較するよりオブジェクトで比較した方が良いと理解しました。
特に今回必要なのは「シートの名前が同じか」ではなく「同じシートか」という事なので、何を比較しているか考えれば Is を用いるという判断ができそうです。
(小川先生の意図した事を理解できたのかドキドキしています・・)

時間についてはとてもすっきりしました。
日頃、業務で使っているファイルの関数で日をまたいだ時に日時の計算結果がおかしい事があります。それも表面に見えていない数値があるとわかっているのに、意識が及んでいない事が原因なんだろうと納得しました。
常に意識しておかないと思わぬところで計算を狂わせてしまいそうなので、DateAdd関数を使う癖をつけておこうと思います。

今回も丁寧なご説明をありがとうございました。
いつもやる気を引き出して頂いています。

2023/09/11 22:42