单元格字符显示问题，请进。

excelchao

怎么样使单元格字符从右往左显示？我用了设置单元格格式中的对齐方法，但是结果不是我想要的，有哪位高手能用函数公式设置下？先谢谢了！

李兴德

公式.zip (13.99 KB, 下载次数: 13)

2013-9-16 11:14 上传

点击文件名下载附件

cleverzhzhf

只用公式没有办法做到，要不然可以用多个辅助列单元格，然后用&一层层的连接
或者用迭代：
http://club.excelhome.net/forum. ... d=382167&page=1

cleverzhzhf

2楼李老师用的自定义函数contxt，按Alt+F11可以查看。代码如下：

1. Function contxt(ParamArray args() As Variant) As Variant
   
2.     Dim tmptext As Variant, i As Variant, cellv As Variant
   
3.     Dim cell As Range
   
4.     tmptext = ""
   
5.     For i = 0 To UBound(args)
   
6.         If Not IsMissing(args(i)) Then
   
7.             Select Case TypeName(args(i))
   
8.             Case "Range"
   
9.                 For Each cell In args(i)
   
10.                     tmptext = tmptext & cell
    
11.                 Next cell
    
12.             Case "Variant()"
    
13.                 For Each cellv In args(i)
    
14.                     tmptext = tmptext & cellv
    
15.                 Next cellv
    
16.             Case Else
    
17.                 tmptext = tmptext & args(i)
    
18.             End Select
    
19.         End If
    
20.     Next i
    
21.     contxt = tmptext
    
22. End Function
    

复制代码

excelchao

cleverzhzhf 发表于 2013-9-16 11:21
2楼李老师用的自定义函数contxt，按Alt+F11可以查看。代码如下：

高人高人，能否给我讲讲他写的是什么意思吗？我新手。

excelchao

李兴德 发表于 2013-9-16 11:14

老师，你这个函数是不是需要参数？怎么没反转？

李兴德

excelchao 发表于 2013-9-16 15:33
老师，你这个函数是不是需要参数？怎么没反转？

启用宏......

jsxjd

查看附件……

excelchao

jsxjd 发表于 2013-9-16 15:42
查看附件……

能否讲解下您的公式呢？我不是很理解这种方法，想学习下，打扰您，谢谢您了。

jsxjd

excelchao 发表于 2013-9-17 16:08
能否讲解下您的公式呢？我不是很理解这种方法，想学习下，打扰您，谢谢您了。

单元格公式的计算反复引用单元格本身的值。