您是否曾经想过反转单元格中包含的内容?使用反向宏,您可以轻松地将“我的文本”更改为“ txet yM”。该宏在访问和修改单元格内容的技术方面具有指导意义。

Sub Reverse()

If Not ActiveCell.HasFormula Then         sRaw = ActiveCell.Text         sNew = ""

For J = 1 To Len(sRaw)

sNew = Mid(sRaw, J, 1) + sNew         Next J         ActiveCell.Value = sNew     End If End Sub

该宏仅影响单个选定的单元格,并且不会对已经包含公式的单元格进行任何更改。

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(2322)适用于Microsoft Excel 97、2000、2002和2003。可以在以下功能区中为Excel的功能区界面(Excel 2007及更高版本)找到本技巧的版本: