前言：
现时我们对“vba代码保存”大概比较看重，朋友们都需要分析一些“vba代码保存”的相关资讯。那么小编同时在网上搜集了一些对于“vba代码保存””的相关资讯，希望大家能喜欢，咱们快快来学习一下吧！以下是通过录制宏的方式所产生的VBA代码，后边的中文解释是操作步骤。
Sub 入库()
Range("B9:G9").Select '选择"B9:G9"单元格区域。
Selection.Copy '并进行复制。
Sheets("库存").Select '选择《库存》工作表。
Range("A1048576").Select '选择《库存》工作表A列中的最后一个单元格。
Selection.End(xlUp).Select '向上移动到A列最后一个非空单元格。
ActiveCell.Offset(1, 0).Range("A1").Select '以活动单元格为起点向下偏移1行。相对引用状态下。
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
' 选择性粘贴： 以值的方式粘贴 ； 不运算； 不跳空格 ； 不转置
ActiveCell.Offset(1, 0).Range("A1").Select '以活动单元格为起点向下偏移1行。目的为了取消选择。相对引用状态下。
Sheets("开单").Select '选择《开单》工作表
Application.CutCopyMode = False '取消蚂蚁线的选择
Range("D9").Select '选择"D9"单元格
Selection.ClearContents '清除当前所选择区域中的内容。
End Sub
录制以上代码的视频教程
版权声明：
本站文章均来自互联网搜集，如有侵犯您的权益，请联系我们删除，谢谢。
标签： #vba代码保存
