Evaluate って、てっきり定数の場合はそのまんま返すだろうと思っていたのですが、そうとは限らないと今頃知りました。 Sub Macro1() Debug.Print Application.Evaluate("1") Debug.Print Application.Evaluate("2") Debug.Print Application.Evaluate("3") …

セルの書式設定のユーザー定義で全角のスペースをVBAで入れてみます。 Sub Macro1() Dim S As String Range("A1").Value = 99 S = "0 0" Range("A1").NumberFormatLocal = S End Sub なんだか変です。 半角分しか空いていないように見えます。 気を取り直し…