Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlAdd, SkipBlanks _ :=False, Transpose:=Fals
è¿æ¯å æ³åéæ©æ§ç²è´´ãå³æå¤å¶çæ°æ®å¨è¢«éæ©çåºåä¸ç»ä¸è¿è¡å æ³è¿ç®ã
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlAdd, SkipBlanks _ :=False, Transpose:=Fals
Selection.PasteSpecial 表示å°éæ©çæ°æ®è¿è¡éæ©æ§ç²è´´
åé¢çé¨åï¼
Paste:=xlPasteValues, 表示ç²è´´ä»¥å¼çæ¹å¼è¿è¡
Operation:=xlAdd, 表示è¿ç®ä»¥å ççæ¹å¼è¿è¡
SkipBlanks _ :=False, 表示ä¸è·³è¿æ§åå æ ¼
Transpose:=False 表示ä¸è¿è¡è½¬ç½®
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlAdd, SkipBlanks _ :=False, Transpose:=Fals
Selection.PasteSpecial 表示å°éæ©çæ°æ®è¿è¡éæ©æ§ç²è´´
åé¢çé¨åï¼
Paste:=xlPasteValues, 表示ç²è´´ä»¥å¼çæ¹å¼è¿è¡
Operation:=xlAdd, 表示è¿ç®ä»¥å ççæ¹å¼è¿è¡
SkipBlanks _ :=False, 表示ä¸è·³è¿æ§åå æ ¼
Transpose:=False 表示ä¸è¿è¡è½¬ç½®
温馨提示:答案为网友推荐,仅供参考
第1个回答 2012-07-13
这段代码的意思是
将复制的单元格内容
以选择性粘贴的模式,粘贴在选择的目标单元格中(只粘贴数值,并使用"加")
将复制的单元格内容
以选择性粘贴的模式,粘贴在选择的目标单元格中(只粘贴数值,并使用"加")
第2个回答 2012-07-13
实现的是选择性粘贴-数值,把剪贴板上的数值加到所选区域单元格中
第3个回答 2012-07-13
选择性粘帖