永发信息网

如何使用电子表格进行奇偶分类

答案:2  悬赏:0  手机版
解决时间 2021-02-10 14:58
  • 提问者网友:练爱
  • 2021-02-10 07:33
如何使用电子表格进行奇偶分类
最佳答案
  • 五星知识达人网友:旧脸谱
  • 2021-02-10 07:43
奇数:F2 内输入公式,并按Ctrl+shift+enter 确定为数组公式,然后下拉复制:
=SUM(MOD(A2:E2,2))

偶数:G2 内输入公式,并下拉复制(够简单吧~~前边有数据做参考,为什么不用):
=5-F2

质数:H2 内输入公式,并下拉复制(抄袭楼上的,数据范围不大的话,用这个公式,简单):
=SUMPRODUCT(--(A2:E2={1,2;3;5;7;11}))

合数:I2 内输入公式,并下拉复制:
=5-H2

间隔:
数据从 A1 到 A10 ,查找结果放在 B2 到 B10 ,从 B2 开始输入公式,按Ctrl+shift+enter 确定为数组公式,然后下拉复制(注意公式中的区间选择):
=IF(COUNTIF($A$1:A1,A2),ROW(A1)-MAX(IF($A$1:A1=A2,ROW($A$1:A1))),"无")
全部回答
  • 1楼网友:忘川信使
  • 2021-02-10 08:06
1.单击菜单工具→宏→录制新宏 。   2.在弹出的录制新宏对话框中设定新的宏名``随便``自己知道是啥就行 将宏保存在个人宏工作簙中  单击确定后,按停止录制宏按钮 。 3.同时按alt和f11进入宏界面,点菜单的插入,模块,粘贴如下代码: sub dayin() 。 dim x, i as integer  x = executeexcel4macro("get.document(50)") msgbox "现在打印奇数页", vbokonly  for i = 1 to int(x / 2) + 1  activesheet.printout from:=2 * i - 1, to:=2 * i - 1 next i  msgbox "现在打印偶数页", vbokonly for i = 1 to int(x / 2) + 1  activewindow.selectedsheets.printout from:=2 * i, to:=2 * i next i  end sub  4.在此界面下直接按f5运行此宏,解决问题。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯