EXCEL和VBA如何改变字母大小写 和 大小写互换?我写的自定义函数 | 您所在的位置:网站首页 › 写字写字母怎么写 › EXCEL和VBA如何改变字母大小写 和 大小写互换?我写的自定义函数 |
目录 1 EXCEL里改变大小写的内置函数 2.1 转换大小写的函数 2.2 神奇的把数字和中文大小写转换的函数 2 VBA里改变大小写的内置函数 2.1 改变大小写 的内置函数 2.2 使用 excel的WorksheetFunction. text() 函数 3 如果想交换字母的大小写呢? 3.1 ASCII码里的大写字母和小写字母 3.2 怎么把字符串string 像数组一样切片呢? 3.3 VBA的 字符转ASCII码和 ASCII转字符的两个函数 3.4 自定义函数,大小写互换 test_tran1(a) 1 EXCEL里改变大小写的内置函数 2.1 转换大小写的函数 upper() '全部改大写lower() '全部改小写proper() '首字母大写code() 'excel里查看字母asc码的函数 2.2 神奇的把数字和中文大小写转换的函数 NUMBERSTRING() 参数只可选1,2,3 NUMBERSTRING(A8,1) ' 转成小写汉字,且是数量单位NUMBERSTRING(A8,2) ' 转成大写汉字,且是数量单位NUMBERSTRING(A8,3) ' 转成小写汉字2 VBA里改变大小写的内置函数 2.1 改变大小写 的内置函数 UCase() '所有小写改大写lCase() '所有大写改小写VBA里,使用 worksheetfuction.upper() worksheetfuction.lower() 是不行的 2.2 使用 excel的WorksheetFunction. text() 函数 WorksheetFunction.Text(rng.Text, "[DBNum1]")WorksheetFunction.Text(rng.Text, "[DBNum2]") 3 如果想交换字母的大小写呢? 目标:如果想大小写互换:也就是把大写字母改成小写,而小写字母改成大写,怎么做? 先理清思路 搞清楚大写字母和小写字母的区别如何逐个从字符串数组里取每个字符?如何转化单个字符,且放回去? 3.1 ASCII码里的大写字母和小写字母 搞清楚大写字母和小写字母的区别在 ASCII码里,大写字母和小写字母可以对应位不同区间段的数字大写字母A-Z, 65-90小写字母a-z, 97-122因此只要判断了这个字符的acsii码值,就知道其是大写还是小写! 3.2 怎么把字符串string 像数组一样切片呢? python可以 string[1] 这样取但是vba里不行但是其实用 mid(string, i ,1 ) 也可以取每个字符 3.3 VBA的 字符转ASCII码和 ASCII转字符的两个函数 chr() 'ASCII转字符asc() '字符转ASCII码 3.4 自定义函数,大小写互换 test_tran1(a) 搞清楚大写字母和小写字母的区别把字符串看成一个数组,如何逐个从字符串数组里取每个字符如何转化单个字符,且放回去取最后的结果 Function test_tran1(a) '好像vba里字符串不能直接这样切片a[],只能用 mid()? For i = 1 To Len(a) '用ASC() 而不是chr() 更不是WorksheetFunction.code If Asc(Mid(a, i, 1)) >= 97 And Asc(Mid(a, i, 1)) |
CopyRight 2018-2019 实验室设备网 版权所有 |