首页 > TAG信息列表 > ActiveCell
Excel 学习笔记
Excel学习笔记 文章目录 Excel学习笔记一、基础二、函数三、图表四、数据透视表五、高级筛选六、宏 一、基础 1、运算符优先顺序:^, * /, + -, &, = > < 2、绝对引用 在要固定的单元的行号和列标前加$(或按F4) 3、常用快捷键 Ctrl + 1 弹出设置单元格格式窗口 Ctrl + H 替vba复制表头
Sub 复制表头() Dim i As Long For i = 2 To Range("A1").CurrentRegion.Count - 1 ActiveCell.Offset(-1350, 0).Rows("1:1").EntireRow.Select ActiveCell.Offset(-1350, -4).Range("A1").Activate Selection.Copy ActiveCell.读取行和列的值
iRows=activesheet.usedrange.rows.countiColumns=activesheet.usedrange.Columns.count'如果表格前面的几行或几列可能是空的,需要获得最下面的行数和最右面的列数:with activesheet.usedrange iEndRow=.rows.count+.row-1 iEndColumn=.Columns.count+.column-1end with '获字段的任意查找
内容:根据需要查找的关键词,在固定的表格中逐行查找。 Sub 任意查找() Dim i As Integer Dim strFind As String Dim LastRow As Long LastRow = ActiveSheet.UsedRange.Rows.Count '获得使用的行数 Range("B1").Select strFind = "钻头2" If T