友情提示：本文共有 1917 个字，阅读大概需要 4 分钟。
对于VBA的语句的常用写法，要多看，多思考，多应用。看过了，就可以有一个印象，在实际使用的时候，就可以依照影响写出自己的代码，这就是依葫芦画瓢，也是不错的方法。我在写代码的时候总是要大段的抄袭我之前写过的代码，这确实可以提高写代码的效率。
211 Application.OperatingSystem 返回所使用的操作系统的名称和版本
212 Application.OrganizationName 返回Excel产品登记使用的组织机构的名称
213 Application.FindFormat 查找的格式种类
214 Application.ReplaceFormat 替换查找到的内容的格式种类
215 ActiveSheet.Cells.Replace What:=” “,Replacement:=“”,SearchFormat:=True,ReplaceFormat:=True 替换查找到的格式
216 Application.Interactive=False 忽略键盘或鼠标的输入
217 Application.OnUndo “Undo Option”,“Undo Procedure” 选择UndoOption后，将执行Undo Procedure过程
218 Range(A1:A10).value="/Application.WorksheetFunction.Transpose(MyArray)" 将一个含有10个元素的数组转置成垂直方向的工作表单元格区域(A1至A10)
注：因为当把一维数组的内容传递给某个单元格区域时，该单元格区域中的单元格必须是水平方向的，即含有多列的一行。若必须使用垂直方向的单元格区域，则必须先将数组进行转置，成为垂直的。
219 Range(“A65536”).End(xlUp).Row+1 返回A列最后一行的下一行
220 rng.Range(“A1”) 返回区域左上角的单元格
221 cell.Parent.Parent.Worksheets 访问当前单元格所在的工作簿
222 Selection.Font.Bold=Not Selection.Font.Bold 切换所选单元格是否加粗
223 ActiveSheet.Range("A:B").SortKey1:=Columns("B"), Key2:=Columns("A"), _
Header:=xlYes 两个关键字排序，相邻两列，B列为主关键字，A列为次关键字，升序排列
224 cell.Range(“A1”).NumberFormat 显示单元格或单元格区域中的第一个单元格的数字格式
225 cell.Range(“A1”).HasFormula 检查单元格或单元格区域中的第一个单元格是否含有公式
226 cell.HasFormula 工作表中单元格是否含有公式
227 Cell.EntireColumn 单元格所在的整列
228 Cell.EntireRow 单元格所在的整行
229 rng.Name.Name 显示rng区域的名称
230 rng.Address 返回rng区域的地址
231 cell.Range(“A1”).Formula 返回包含在rng区域中左上角单元格中的公式。
注：若在一个由多个单元格组成的范围内使用Formula属性，会得到错误；若单元格中没有公式，会得到一个字符串，在公式栏中显示该单元格的值。
232 Range(“D5:D10”).Cells(1,1) ‘返回单元格区域D5:D10中左上角单元格
233 ActiveCell.Row 活动单元格所在的行数
234 ActiveCell.Column 活动单元格所在的列数
235 Range("A1:B1").HorizontalAlignment = xlLeft 当前工作表中的单元格区域数据设置为左对齐
236 ActiveSheet.Range(“A2:A10”).NumberFormat=”#,##0” ‘设置单元格区域A2至A10中数值格式
237 rng.Replace “ “,”0” 用0替换单元格区域中的空单元格
238 Dim colMySheets As New Collection 声明新的集合变量
239 Public colMySheets As New Collection 声明新的集合变量
240 Set MyRange=Range(“A1:A5”) 创建一个名为MyRange的对象变量
本文如果对你有帮助，请点赞收藏《对于VBA语句的常用写法 要多看 多思考 多应用》，同时在此感谢原作者。
