自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(2)
  • 收藏
  • 关注

转载 vba将列名的字母转为数字

'transfer column from "A" to 1, from "Z" to 26 ......Private Function ColumnNum(ByVal a) As Long Dim r r = 0 If VarType(a) = vbString And Len(a) > 0 Then a = UCase(a) r = A

2016-03-06 12:54:17 2778

转载 VBA中将数字列转换成字母的方法

传入参数为Excel中列的序号。例如:传入1返回A,传入2返回B。Public Function Fun_GetEngName(ByVal argColumn As Integer) As String Dim strEngName As String Dim iNum, iMod As Integer iNum = argColumn \ 26 iMod = arg

2016-03-06 12:51:32 5011

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除