作者Idgias (乖猫)
看板Office
标题[算表] VBA 选取最後一列资料列
时间Fri Feb 24 19:51:06 2017
软体:Office Excel
版本:2007
使用巨集功能录制了一段巨集，但其实我不会写VBA，还请各路高手相助! (抱拳)
内容如下：
Range("E4").Select
Selection.End(xlDown).Select
Rows("202:202").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
Selection.EntireRow.Hidden = True
Range("E4").Select
这两块想要修改的部分如下：
黄色：
﹡选择E栏最下面一个资料列 (相当於在E栏使用Ctrl+↓的快捷键)
﹡将该列整列选取
红色：
﹡选择E栏最下面一个资料列『的下一列那一格』
﹡执行存档的动作
简单来说，是要在资料输入完之後，然後复制贴上值，
最後预选到下次需要输入资料的栏位，接着存档。
感谢相助!
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 114.25.93.92
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1487937069.A.3C0.html
1F：→ soyoso: 该列整列选取，以range.entirerow.select 02/24 20:28
2F：→ soyoso: 下面一个资料列「的下列那一格」以range.offset 02/24 20:29
3F：→ soyoso: 存档动作workbook.save 02/24 20:30