Bạn hiện đang ngoại tuyến, hãy chờ internet để kết nối lại

Làm thế nào để sử dụng macro để thêm nhãn cho dữ liệu điểm trong một xy scatter biểu đồ hoặc trong bảng xếp hạng bong bóng trong Excel

Hỗ trợ dành cho Office 2003 đã kết thúc

Microsoft đã kết thúc hỗ trợ dành cho Office 2003 vào ngày 8 tháng 4 năm 2014. Thay đổi này đã ảnh hưởng đến các bản cập nhật phần mềm và các tùy chọn bảo mật của bạn. Tìm hiểu ý nghĩa của điều này với bạn và cách thực hiện để luôn được bảo vệ.

QUAN TRỌNG: Bài viết này được dịch bằng phần mềm dịch máy của Microsoft chứ không phải do con người dịch. Microsoft cung cấp các bài viết do con người dịch và cả các bài viết do máy dịch để bạn có thể truy cập vào tất cả các bài viết trong Cơ sở Kiến thức của chúng tôi bằng ngôn ngữ của bạn. Tuy nhiên, bài viết do máy dịch không phải lúc nào cũng hoàn hảo. Loại bài viết này có thể chứa các sai sót về từ vựng, cú pháp hoặc ngữ pháp, giống như một người nước ngoài có thể mắc sai sót khi nói ngôn ngữ của bạn. Microsoft không chịu trách nhiệm về bất kỳ sự thiếu chính xác, sai sót hoặc thiệt hại nào do việc dịch sai nội dung hoặc do hoạt động sử dụng của khách hàng gây ra. Microsoft cũng thường xuyên cập nhật phần mềm dịch máy này.

Nhấp chuột vào đây để xem bản tiếng Anh của bài viết này:213750
TÓM TẮT
Trong Microsoft Excel, không có không có lệnh được xây dựng trong đó tự động gắn nhãn văn bản vào dữ liệu điểm trong một xy (scatter) hoặc bong bóng bảng xếp hạng. Tuy nhiên, bạn có thể tạo một Microsoft Visual Basic cho các ứng dụng vĩ mô mà thực hiện điều này. Bài viết này chứa một vĩ mô mẫu thực hiện nhiệm vụ này về một biểu đồ XY Scatter. Tuy nhiên, cùng mã có thể được sử dụng cho một bong bóng Bảng xếp hạng.
THÔNG TIN THÊM
Microsoft cung cấp lập trình ví dụ để minh hoạ chỉ, không có bảo hành hoặc thể hiện hay ngụ ý. Điều này bao gồm, nhưng không giới hạn, bảo đảm ngụ ý khả năng bán hàng hoặc cho một mục đích cụ thể. Bài viết này giả định rằng bạn đã quen thuộc với ngôn ngữ lập trình mà đang được chứng minh và với những công cụ được sử dụng để tạo ra và gỡ lỗi thủ tục. Microsoft hỗ trợ các kỹ sư có thể giúp giải thích các chức năng của một thủ tục cụ thể. Tuy nhiên, họ sẽ sửa đổi các ví dụ để cung cấp thêm chức năng hoặc xây dựng quy trình để đáp ứng các yêu cầu cụ thể của bạn. Mẫu mã trong bài viết này giả định rằng các dữ liệu và gắn nhãn được sắp xếp trong một bảng tính theo các định dạng sau:
  • Cột đầu tiên chứa các nhãn dữ liệu.
  • Cột thứ hai chứa các giá trị x cho xy bảng xếp hạng (scatter).
  • Các cột thứ ba và sau đó chứa các giá trị y cho bảng xếp hạng xy (scatter).
LƯU Ý: Mặc dù các ví dụ được cung cấp có chỉ có một cột của dữ liệu cho các giá trị y, bạn có thể sử dụng nhiều hơn một dòng dữ liệu.

Sử dụng các macro trong bài viết này, tạo ra một biểu đồ bằng cách sử dụng dữ liệu sau:
   A1: Labels       B1: X Values   C1: Y Values   A2: DataPoint1   B2: 12          C2: 5   A3: DataPoint2   B3:  9          C3: 7   A4: DataPoint3   B4:  5          C4: 3   A5: DataPoint4   B5:  4          C5: 8   A6: DataPoint5   B6:  1          C6: 4
LƯU Ý: Bảng nên không chứa các cột rỗng và cột đó chứa dữ liệu nhãn không nên được tách ra từ cột có chứa các giá trị x. Các nhãn và các giá trị phải được đặt ra trong chính xác các định dạng được mô tả trong bài viết này. (Các tế bào bên trái nào» không phải tế bào A1.)

Để đính kèm nhãn văn bản vào dữ liệu điểm trong một xy (scatter) biểu đồ, làm theo các bước sau:
  1. Trên bảng có chứa dữ liệu mẫu, chọn các di động phạm vi B1:C6.
  2. Trong Microsoft Office Excel 2003 và trong phiên bản trước của Excel, làm theo các bước sau:
    1. Nhấp vào Bảng xếp hạng trên các Chèn trình đơn.
    2. Trong các Bảng xếp hạng Wizard - bước 1 của 4 - bảng xếp hạng Loại hộp thoại hộp, bấm vào các Các loại tiêu chuẩn tab dưới Loại biểu đồ, bấm XY (Scatter), và sau đó nhấp vào Tiếp theo.
    3. Trong các Bảng xếp hạng Wizard - bước 2 của 4 - bảng xếp hạng Dữ liệu nguồn hộp thoại hộp, bấm vào các Dữ liệu tầm tab dưới Series tại, bấm Cột, và sau đó nhấp vào Tiếp theo.
    4. Trong các Bảng xếp hạng Wizard - bước 3 của 4 - bảng xếp hạng Tuỳ chọn hộp thoại hộp, bấm vào Tiếp theo.
    5. Trong các Bảng xếp hạng Wizard - bước 4 của 4 - biểu đồ Vị trí hộp thoại hộp, bấm vào các Như mới tờ tùy chọn, và sau đó nhấp vào Kết thúc.
    Trong Microsoft Office Excel 2007, hãy làm theo các bước sau:
    1. Bấm vào các Chèn tab, bấm vào Tan trong các Biểu đồ nhóm, và sau đó chọn một loại.
    2. Trên các Thiết kế tab, bấm vào Di chuyển Bảng xếp hạng trong các Vị trí nhóm, hãy nhấp vào Mới tờ , và sau đó nhấp vào Ok.
  3. Nhấn ALT + F11 để bắt đầu Visual Basic Editor.
  4. Trên các Chèn trình đơn, nhấp vào Mô-đun.
  5. Gõ mã mẫu sau trong mô-đun tờ:
    Sub AttachLabelsToPoints()   'Dimension variables.   Dim Counter As Integer, ChartName As String, xVals As String   ' Disable screen updating while the subroutine is run.   Application.ScreenUpdating = False   'Store the formula for the first series in "xVals".   xVals = ActiveChart.SeriesCollection(1).Formula   'Extract the range for the data from xVals.   xVals = Mid(xVals, InStr(InStr(xVals, ","), xVals, _      Mid(Left(xVals, InStr(xVals, "!") - 1), 9)))   xVals = Left(xVals, InStr(InStr(xVals, "!"), xVals, ",") - 1)   Do While Left(xVals, 1) = ","      xVals = Mid(xVals, 2)   Loop   'Attach a label to each data point in the chart.   For Counter = 1 To Range(xVals).Cells.Count     ActiveChart.SeriesCollection(1).Points(Counter).HasDataLabel = _         True      ActiveChart.SeriesCollection(1).Points(Counter).DataLabel.Text = _         Range(xVals).Cells(Counter, 1).Offset(0, -1).Value   Next CounterEnd Sub
  6. Nhấn ALT + Q để trở về Excel.
  7. Chuyển đến tấm bảng xếp hạng.
  8. Trong Excel 2003 và trong phiên bản trước của Excel, điểm đến Vĩ mô ngày các Công cụ trình đơn, và sau đó bấm Macro. Nhấp vào AttachLabelsToPoints, và sau đó nhấp vào Chạy để chạy vĩ mô.

    Trong Excel 2007, bấm các Nhà phát triển tab, bấm vàoVĩ mô trong các Mã nhóm, chọnAttachLabelsToPoints, và sau đó nhấp vào Chạy.
Vĩ mô gắn nhãn trong các tế bào A2:A6 với các điểm dữ liệu trên các bảng xếp hạng.
xy-tan XL2000 XL98 XL97 XL2001 XL2002 XLX XL2003 XL2007 XL2010

Cảnh báo: Bài viết này được dịch tự động

Thuộc tính

ID Bài viết: 213750 - Xem lại Lần cuối: 09/20/2011 11:11:00 - Bản sửa đổi: 3.0

Microsoft Office Excel 2007, Microsoft Excel 2002 Standard Edition, Microsoft Excel 2000 Standard Edition, Microsoft Excel 97 Standard Edition, Microsoft Excel X for Mac, Microsoft Excel 2001 for Mac, Microsoft Excel 98 for Macintosh, Microsoft Office Excel 2003, Microsoft Excel 2010

  • kbchart kbdtacode kbhowto kbinfo kbprogramming kbmt KB213750 KbMtvi
Phản hồi