EXCEL2007zhong怎么手动更改坐标值？

Question

我想要增加刻度数，且刻度值也不是按着顺序来的
比如我想输入的值是5，6,7,8,9,1,2,3,4,5
是自己做出来的xy散点图啊

Answer 1

复制以下代码 使用组合键ALT+F11打开VB编辑器
添加新模块—模块1 后双击并粘贴

ALT+F11切换到excel界面
在菜单栏右键—自定义—“命令”选项卡—宏—自定义按钮
拖动到菜单栏合适位置后放开 对新增加的按钮右键—指定宏
在弹出的对话框 找到 "DataLableChange" 确定

将你希望的刻度值输入在单元格内后
选中你自己做的xy散点模拟坐标轴 在菜单栏点击刚才新增的按钮
按照提示 选择刻度值区域 确定即可

如有问题请详述

----------------------------------------------------开始复制----------------------------------------------------

Sub DataLableChange()
Dim I%, LblCnt%, iRows%, iCols%
Dim shnm$, sn$, Msg$
Dim rngLbl As Range

Select Case TypeName(Selection)
Case "DataLabel"
sn = Selection.Parent.Parent.Name
Case "DataLabels"
sn = Selection.Parent.Name
Case "Series"
sn = Selection.Name
Case Else
MsgBox "请先选中一个系列或系列数据标签再开始使用工具.", vbOKOnly, "提示:选中系列或系列数据标签"
Exit Sub
End Select

Err.Clear: On Error Resume Next
Set rngLbl = Application.InputBox("请输入标签所引用的区域,可以用鼠标选择区域.", "标签的引用区域", , , , , , 8)
Err.Clear: On Error GoTo 0
If rngLbl Is Nothing Then Exit Sub

iRows = rngLbl.Rows.Count
iCols = rngLbl.Columns.Count
LblCnt = ActiveChart.SeriesCollection(sn).Points.Count
shnm = rngLbl.Parent.Name
If Application.Max(iRows, iCols) < ActiveChart.SeriesCollection(sn).Points.Count Then
Msg = MsgBox("你所选择的引用单元格小于该系列需要的个数," & Chr(10) & " 选择""Yes""继续," & Chr(10) & " 选择""No""停止执行.", vbYesNo, "引用单元格数量不够")
Select Case Msg
Case vbYes
LblCnt = Application.Max(iRows, iCols)
Case vbNo
Exit Sub
End Select
End If

Application.ScreenUpdating = False
On Error Resume Next
With ActiveChart.SeriesCollection(sn)
For I = 1 To LblCnt
Err.Clear
.Points(I).ApplyDataLabels
If Err.Number = 0 Then
If iRows > iCols Then
.Points(I).DataLabel.Text = "='" & shnm & "'!" & rngLbl.Cells(I, 1).Resize(1, iCols).Address(ReferenceStyle:=xlR1C1)
Else
.Points(I).DataLabel.Text = "='" & shnm & "'!" & rngLbl.Cells(1, I).Resize(iRows, 1).Address(ReferenceStyle:=xlR1C1)
End If
End If
Next
End With
Err.Clear: On Error GoTo 0
Application.ScreenUpdating = True
End Sub
----------------------------------------------------复制结束----------------------------------------------------

Answer 2

坐标值不能改。不规律的数字，可以手工随意输入在任意列，如A列。追问

那怎么体现在x轴的刻度上呢？

追答

EXCEL表上边横着的A、B、C、D.....和左边竖着的1、2、3、4....是表格的坐标值，是不能改的。如果自己做一张表，坐标值可以自己任意设定。

追问

不是 我可能没有说清楚 是我根据数据出来的xy散点图的坐标刻度