看帮助Range.End 属性
End 属性适用于Range 对象描述返回 Range 对象,该对象代表包含源区域的区域结尾处的单元格.等同于按键 END+上箭头键、END+下箭头键、END+左箭头键或 END+右箭头键.只读.句法expression.End(Direction)expression必选.该表达式返回 Range 对象.DirectionLong 类型,必选.移动的方向.可为下列 XlDirection 常量之一：xlToLeft,xlToRight,xlUp或xlDown.
所以,1 就是 xlToLeft.