c0411034的博客

EXCEl有自动调整行高的功能，但是自动调整的行高十份紧凑，打印时会出现部分行的字下半截看不见的问题。行不多时，可以手动调整行高，但行数超过百行后，手动工作量太大， 现使用VBA的方式进行批量调整行高，对微软和WPS的excel都适用，这里我使用WPS。1.调出开发工具标签依次选择 文件->选项->自定义功能区->勾选开发工具2.插入代码在开发工具栏中选择VB编辑器...

声明一个动态数组Dim arrays() As String 'z字符串型数组显示所有数组元素，以 ，间隔Function display_array(arrays)Dim result As Stringresult = ""Dim array_len As Integerarray_len = UBound(arrays) + 1For i = 0 To array_len ...