1、单元格输入
Range("a1") = "ab"
Range("a1") = "a" & chr(10) & "b" # 换行输入
2、单元格复制
2.1、range().Copy range()
复制多少单元格,粘贴多少单元格
range("a1"a10").Copy range("c1") # a1:a10的内容、格式等复制粘贴到c1:c10
2.2、range().Copy…Worksheet.Paste range()
先将目标区域进行复制,然后使用工作表的粘贴方法
Range("a1:a10).Copy
ActiveSheet.Paste Range("f1")
2.3、指定粘贴方式
PasteSpecial 方法
将剪贴板中的 Range 对象粘贴到指定区域中。
语法
expression.PasteSpecial(Paste, Operation, SkipBlanks, Transpose)
参数
expression 必需。该表达式返回一个 Range 对象。
Paste XlPasteType 类型,可选。指定要粘贴的区域部分。
XlPasteType 可为以下 XlPasteType 常量之一,对应选择性粘贴-粘贴方法
xlPasteAll 默认值
xlPasteAllExceptBorders
xlPasteColumnWidths
xlPasteComments
xlPasteFormats
xlPasteFormulas
xlPasteFormulasAndNumberFormats
xlPasteValidation
xlPasteValues
xlPasteValuesAndNumberFormats
Operation XlPasteSpecialOperation 类型,可选。指定粘贴操作。
XlPasteSpecialOperation 可为以下 XlPasteSpecialOperation 常量之一,对应选择性粘贴-运算
xlPasteSpecialOperationAdd
xlPasteSpecialOperationDivide
xlPasteSpecialOperationMultiply
xlPasteSpecialOperationNone 默认值
xlPasteSpecialOperationSubtract
SkipBlanks Variant 类型,可选。若为 True,则不将剪贴板上区域中的空白单元格粘贴到目标区域中。默认值为 False。
Transpose Variant 类型,可选。若为 True,则粘贴区域时转置行和列。默认值为 False。
示例
Range("a1:a10").Copy
Range("e1").PasteSpecial (xlPasteValues) # 只粘贴数值
3、单元格剪切
Cut 方法
用法与Copy方法一样
4、填充公式
FillDown 方法
从指定区域的顶部单元格开始向下填充,直至该区域的底部。区域中首行单元格的内容和格式将复制到区域中其他行内。
语法
expression.FillDown
参数
expression 必需。该表达式返回一个 Range 对象。
示例
本示例基于单元格 A1 的内容填写 Sheet1 的单元格区域 A1:A10。
Worksheets("Sheet1").Range("A1:A10").FillDown
FillUp 方法,与FillDown一致
FillLeft 方法,同上
FillRight 方法,同上
5、行列插入
Insert 方法
行上方插入,列左侧插入
示例
Rows(4).Insert
网友评论