このコードを使用すると、「オブジェクトはこのプロパティまたはメソッドをサポートしていません」というメッセージが表示されます
Windows(formatBook).Worksheets(2).Range("B4").Value = title
シート名が変更された本の2枚目のシートの範囲B4に値を入れたいだけです
コードを次のように分解してみました
Windows(formatBook).Activate
Worksheets(2).Activate
Range("B4").Activate
ActiveCell.Value = title
そしてそれは動作します。最初のコードでエラーが発生したのはなぜですか？コードを短縮するにはどうすればよいですか？
Windowsコレクションとワークブックコレクションは多くのプロパティとメソッドを共有していますが、完全に互換性があるわけではありません。この場合、ワークブックが必要です。
Workbooks(formatBook).Worksheets(2).Range("B4").Value = title
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加