كيفية تعيين المحور X برمجياً على الرسم البياني؟

Question

لدي مخطط في ورقة عمل في Excel ولدي إعداد ماكرو بحيث عندما أقوم بتغيير القيمة في خلية معينة، يتم تعيين نطاق البيانات في المخطط على A2 لأسفل بقدر رقم الصف المقابل في هذه الخلية المحددة.

ما يبدو أنني لا أستطيع فعله هو تعديل المحور لأن المحور المحدد لم يعد يغطي نطاق الرسم البياني، أي.تم تعيين المحور X الحالي على:

=Sheet1!$C$2:$C$600

لا أستطيع معرفة كيف يمكنني تحديث هذا في ماكرو.أي مساعدة سيكون محل تقدير كبير.

Answer 1

يجب أن تكون قادرًا على تعيين خاصية XValues ​​بنفس الطريقة التي استخدمتها في إجابة Lance الخاصة بك سؤال آخر.

Charts("chartname").SeriesCollection(1).XValues = "=MYXAXIS"

أو ما تسميه النطاق المسمى لقيم المحور السيني.إذا كان لديك سلاسل متعددة في المخطط الخاص بك، فستحتاج إلى تغيير القيمة في SeriesCollection للإشارة إلى السلسلة الصحيحة.

Answer 2

هل "خلية معينة" تحتوي على رقم الصف الأخير من البيانات؟ (ليس من الواضح تماما)

وF1 خلية افترض يحتوي الصف الأخير في البيانات. يمكنك بناء عنوان وتتراوح من هذا القبيل:

Dim rXVals As Range
Dim sAddress AS String

sAddress = "Sheet1!$C$2:$C$" & Worksheets("Sheet1").Range("F1").Value
Set rXVals = Range(sAddress)
Worksheets("Sheet1").ChartObjects(1).Chart.SeriesCollection(1).XValues = rXVals