表格怎么做刻度尺，Excel如何画刻度尺再如在单元格输入25则高度自动调整为25 搜

来源：整理时间：2023-03-06 10:41:41 编辑：航空兔素材手机版

本文目录一览

1，Excel如何画刻度尺再如在单元格输入25则高度自动调整为25 搜
2，电子表格制作标尺
3，在word里怎么画出刻度尺感谢
4，如图所示excel中如何制作这样的标尺

1，Excel如何画刻度尺再如在单元格输入25则高度自动调整为25 搜

高度是单元格的高度么，如果是，那就得用VBA写个宏来完成了。

{0}

2，电子表格制作标尺

不明白，问的是什么意思？电子表格的列宽和行高都可以精确设置，虽然不如专业绘图软件那么精确，但作为办公之用已经足够用了，所以不需要标尺。

不明白,问的是什么意思?电子表格的列宽和行高都可以精确设置,虽然不如专业绘图软件那么精确,但作为办公之用已经足够用了,所以不需要标尺。

{1}

3，在word里怎么画出刻度尺感谢

画直线1厘米，Divide定数等分10份，百画刻度度线，一厘米内刻度线Block做块，然后Array阵列出刻度总尺，然后Dtext文字，标注尺寸数据，然后Change对象特性版调整相应线宽，颜色，图层和文字大小权。ok！

使用表格。如：插入表格，20行，2列。行高0.5厘米，行宽0.5厘米（根据需要定）。右边及中间不显示竖框，短横处，右边不显示横框。显示的是有长短横的0.5厘米的刻度尺。

bu dong

网上找个刻度尺图片插入最好，如果用word中画图工具画也可以，不过考验你的耐力。

{2}

4，如图所示excel中如何制作这样的标尺

在视图下选择【页面布局】就会出现标尺，如下图：

我可以用宏帮你解决。在一空白excel里，同时按alt和f11进入宏界面，点菜单的插入，模块，粘贴如下代码： sub test() dim y as byte dim i, j, k as integer y = inputbox("请输入1到99之间的一个奇数") range(cells(1, 1), cells(y, y)).clearcontents cells((y + 1) / 2, (y + 1) / 2).select i = 0: j = 1 for k = 1 to y ^ 2 selection = k selection.offset(i, j).select if i = 0 and j = 1 then i = -1: j = 0 if selection.offset(i, j) <> "" then i = 0: j = 1 end if if i = -1 and j = 0 then i = 0: j = -1 if selection.offset(i, j) <> "" then i = -1: j = 0 end if if i = 0 and j = -1 then i = 1: j = 0 if selection.offset(i, j) <> "" then i = 0: j = -1 end if if i = 1 and j = 0 then i = 0: j = 1 if selection.offset(i, j) <> "" then i = 1: j = 0 end if next k end sub 在此界面按f5就可以按你所需得到了。如果你希望加2，把 selection = k 改为 selection = k*2-1