Chinaunix首页 | 论坛 | 博客

东园公(SAP-ABAP)myabap.blog.chinaunix.net

首页　| 　博文目录　| 　关于我

m04375036

  • 博客访问： 720997
  • 博文数量： 158
  • 博客积分： 6010
  • 博客等级： 准将
  • 技术积分： 1643
  • 用 户 组： 普通用户
  • 注册时间： 2007-10-11 14:37
个人简介

人法地,地法天,天法道,道法自然

文章分类

全部博文（158）

文章存档

2022年（1）

2020年（3）

2016年（1）

2014年（7）

2013年（4）

2010年（5）

2009年（86）

2008年（25）

2007年（26）

我的朋友
最近访客
推荐博文
写个函数用来转化值

分类：

2009-03-30 22:00:18

写一个函数:
Function switch(a)
 Dim Marray() As Variant
 Marray = Array("亥", "子", "丑", "寅", "卯", "辰", "巳", "午", "未", "申", "酉", "戌")
 switch = Marray(a Mod 12)
End Function
在单元格中调用公式=switch(A1),便可以得到结果!
阅读(597) | 评论(0) | 转发(0) |
0

上一篇：最基本财务基础知识,财务知识基础

下一篇：EXCEL工资录入中的问题-有关回复-VBA代码实现

给主人留下些什么吧！~~
关于我们 | 关于IT168 | 联系方式 | 广告合作 | 法律声明 | 免费注册

Copyright 2001-2010 ChinaUnix.net All Rights Reserved 北京皓辰网域网络信息技术有限公司. 版权所有

感谢所有关心和支持过ChinaUnix的朋友们

16024965号-6