首页 > Office专区 > Excel教程 >

Excel一键实现用厘米(cm)设置行高和列宽技巧

来源:互联网 2023-02-20 17:40:23 版权归原作者所有,如有侵权,请联系我们

Excel默认的行高和列宽单位不是我们所常用的cm,下面小编将通过VBA实现用厘米为单位来设置单元格的行高和列宽,如果您感兴趣的话,不妨一试。jY0办公区 - 实用经验教程分享!

Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

工具/原料

  • Excel(教程以Excel2007为例)

方法/步骤

  • 1

    新建一个Excel文档,另存为xlsm格式。jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

  • 1该信息非法爬取自百度经验
  • 2

    插入形状,绘制设置”行高“的按钮,编辑文字为:行高 cm。jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

  • 3

    适当美化按钮,并复制一个,命名为:”列宽 cm“。jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

  • 4

    切换到VBA界面,插入一个模块,不清楚的朋友可以参考以下链接:jY0办公区 - 实用经验教程分享!

    15Excel2007打开VBA的三种方法!jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

  • 5

    在模块中复制粘贴以下代码:jY0办公区 - 实用经验教程分享!

    Option ExplicitjY0办公区 - 实用经验教程分享!

    Dim i%, j%, m%, n%jY0办公区 - 实用经验教程分享!

    Sub RHigh()jY0办公区 - 实用经验教程分享!

    i = ActiveCell.RowjY0办公区 - 实用经验教程分享!

    j = ActiveCell.ColumnjY0办公区 - 实用经验教程分享!

    Cells(i, j).EntireRow.SelectjY0办公区 - 实用经验教程分享!

    m = InputBox("请输入行高数值(单位为cm)")jY0办公区 - 实用经验教程分享!

    Selection.RowHeight = 28.25 * mjY0办公区 - 实用经验教程分享!

    End SubjY0办公区 - 实用经验教程分享!

    Sub CWidth()jY0办公区 - 实用经验教程分享!

    i = ActiveCell.RowjY0办公区 - 实用经验教程分享!

    j = ActiveCell.ColumnjY0办公区 - 实用经验教程分享!

    Cells(i, j).EntireColumn.SelectjY0办公区 - 实用经验教程分享!

    n = InputBox("请输入列宽数值(单位为cm)")jY0办公区 - 实用经验教程分享!

    Selection.ColumnWidth = 4.38 * njY0办公区 - 实用经验教程分享!

    End SubjY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

  • 6

    为形状指定对应的宏。行高对应RHigh(),列宽对应CWidth()。jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

  • 7

    实现行高列宽设置,选择需要调整行的任一单元格,点击“行高 cm”按钮即可,本教材以设置第三行行高成1cm为例。jY0办公区 - 实用经验教程分享!

    PS:调整列宽方法类似,篇幅有限,这里就不列举了。jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

    Excel一键实现用厘米(cm)设置行高和列宽技巧jY0办公区 - 实用经验教程分享!

  • 注意事项

    • 如果对您有点帮助,请支持一下,谢谢!

    以上方法由办公区教程网编辑摘抄自百度经验可供大家参考!jY0办公区 - 实用经验教程分享!


    标签: excelVBA实现厘米设置

    办公区 Copyright © 2016-2023 www.bgqu.net. Some Rights Reserved. 备案号:湘ICP备2020019561号