‘壹’ excel一列太多 打印太空 怎么自动分列
分栏是Word干的事情,交给它好了。
500多也不多,你想一页显示多少,手动剪切、粘贴好了,虽然可以写公式,但没有必要浪费这个时间。
‘贰’ excel怎样自动分列打印
注意,先做好备份
在工作表名称上 右键,查看代码,将下面的代码复制入其中,按代码里面的说明,改变两个变量的值,按F5运行一次,返回sheet表就好了
------------
Sub 分行()
Dim r&: r = 20 '每列的行数
Dim c As Range: Set c = Range("A1:A4000") '原数据区域
'使用前改变上面2个变量
Dim i&, n%
If c.Columns.Count > 1 Then MsgBox "第二个参数有误!"
If c.Rows.Count Mod r Then n = Int(c.Rows.Count / r) + 1 Else n = Int(c.Rows.Count / r)
If n > 255 Then
If MsgBox("列数将超过工作表限制!仍要进行?", vbOKCancel) = vbCancel Then Exit Sub
End If
For i = 2 To n
c.Cells((i - 1) * r + 1, 1).Resize(r, 1).Copy Cells(1, i).Resize(r, 1)
Next
MsgBox "ok!"
End Sub
‘叁’ 请教高手excel表格怎么设置分列打印
打开Excel工作表,点击“文件”-“页面设置”。在“页面”选项卡,设置“缩放”为“调整为1页宽,1页高”即可。
‘肆’ 多列excel如何自动分行分列打印谁能详细说下原理
第一张纸就是打印
1 31
| |
30 60
第二张就是
61 91
| |
90 120
这只是一个引用位置的问题
变量是行 与 列
所以函数只是工具,首要的是思路
‘伍’ 多个手机号excel如何自动分行分列打印
这个需要公式 还要确定你一张纸能打几列(以10列为例)
假设该工作表在SHEET1
SHEET2A1输入公式
=INDIRECT("sheet1!"&CHAR(66-MOD(COLUMN(A1),2))&MOD(ROW(A1)-1,30)+1+150*INT((ROW(A1)-1)/30)+30*INT((COLUMN(A1)-1)/2))
向右填充10列
向下填充,
如果列数多,HI我,修改公式