谁能告诉我Insert的CopyOrigin参数是用来做什么的?它会接受什么价值观?
我已经包含了vba帮助(实际上帮助不是很大):
将一个单元格或一组单元格插入工作表或宏表中,并将其他单元格移开以留出空间。
需要expression.Insert(Shift,CopyOrigin)表达式。返回Range对象的表达式。
Shift可选变量。指定移动单元格的方式。可以是以下XlInsertShiftDirection常量之一: xlShiftToRight或xlShiftDown。如果省略此参数,Microsoft Excel将根据范围的形状进行决定。
CopyOrigin可选变量。复制原点。
发布于 2009-03-26 04:43:26
它接受一个参数,如下所示。
Const xlFormatFromLeftOrAbove = 0
Member of Excel.XlInsertFormatOrigin
还有..。
Const xlFormatFromRightOrBelow = 1
Member of Excel.XlInsertFormatOrigin
发布于 2009-03-26 06:25:34
添加到Lakshmanaraj的注释中-它会根据您插入单元格的位置和您希望选择的格式来选择格式选项。
假设你有:
第一行具有粗体文本,
第二行有斜体的东西。
选择第二行并执行以下表达式:
Selection.Insert CopyOrigin:=xlFormatFromLeftOrAbove
新行插入在第一行和第二行之间&它从“上面的行”或“单元格左侧的单元格”中选取格式规则。
在这种情况下,新插入的单元格的文本将以粗体显示,而无需您显式设置。
发布于 2011-04-18 12:49:06
你可以在这里参考:
Imports Excel = Microsoft.Office.Interop.Excel
Dim XLApp As New Excel.Application()
Dim xWkBook As Excel.Workbook = XLApp.Workbooks.Open(YourInitialPath)
Dim xSheet As Excel.Worksheet = CType(xWkBook.Sheets(1), Excel.Worksheet)
CurCell = xSheet.Range("G9:G11")
CurCell.Insert(Excel.XlInsertShiftDirection.xlShiftToRight, CurCell.Copy())
https://stackoverflow.com/questions/684531
复制相似问题