ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] µLªk¨ú±o scatter plot ªºvalue

¥»©«³Ì«á¥Ñ quickfixer ©ó 2022-5-28 22:24 ½s¿è

§Ú¥H«e°Ý01ªºs¤j
¥L«Øij§Ú¦pªG¥u¬O¨ú³æÂI,¥i¥Î³o2ºØ¤è¦¡,§A°Ñ¦Ò¤@¤U
²Ä¤@ºØ,©ñ¦b§Aµ{¦¡½X¤º
WorksheetFunction.Index(cht.SeriesCollection(1).Values,¦ì¸m)
§Aªº´N¬O1~5
Debug.Print WorksheetFunction.Index(cht.SeriesCollection(1).Values,2)
¤£dim¡Bset,¥Î¤@¦æ
Debug.print WorksheetFunction.Index(ActiveSheet.ChartObjects(1).Chart.SeriesCollection(1).Values,1)

²Ä¤GºØ
Sub test()
    Dim cht As Series
    Set cht = ActiveSheet.ChartObjects(1).Chart.SeriesCollection(1)
    Debug.Print cht.Values(1)
End Sub

TOP

        ÀR«ä¦Û¦b : ¦n¨Æ­n´£±o°_¡A¬O«D­n©ñ±o¤U¡A¦¨´N§O¤H§Y¬O¦¨´N¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD