Find centralized, trusted content and collaborate around the technologies you use most.
Teams
Q&A for work
Connect and share knowledge within a single location that is structured and easy to search.
誰もがこのコードの何が悪いのかわかります。「オブジェクトが必要です」というエラーが発生します:
Dim r As Range Set r = Sheet2.ChartObjects("myChart").BottomRightCell.Address
かなり簡単に思えますが、機能しません。私はできるようにする必要があります:
r.rowおよびr.column
ARangeは ではありませんAddress— それはStringです。BottomRightCellを返しますRange。
Range
Address
String
BottomRightCell
Dim r As Range Set r = Sheet2.ChartObjects("myChart").BottomRightCell add = r.Address row = r.Row col = r.Column