今天看到一个锁定的例子，很不错，所以就折腾了下。 特定区域的锁定。比如将A列~D列的范围锁定起来~ 写个宏！ 代码如下： Sub 锁定() Dim a As Long a = Sheets(1).[b65536].End(xlUp).Row ActiveSheet.Unprotect &
分类： 宏代码
VBA调整文本的方向
好久没写VBA方面的了文章，今天无聊打开excel折腾了下，这两天总是在做表格。先来看看这样的。 141 41 14 14 41 如果要把上面的数字从水平抬升到自定义角度，如何实现？ 那就是宏啦~代码如下： Sub setorientation() Dim intorient As Integer intorient = Application.InputB
VBA实现单元格位移
前面讲了OFFSET函数位移，当然函数是要人一次次敲的。能不能简便点呢？有！宏或VBA实现！ 代码如下： sub my_offset on error resume next ActiveCell.Offset(0, 1).Select’当前单元格向左移动一格 ActiveCell.Offset(0, –1).Select’当前单元格向右移动一格 &nb