发文章
发文工具
撰写
网文摘手
文档
视频
思维导图
随笔
相册
原创同步助手
其他工具
图片转文字
文件清理
AI助手
留言交流
定义一个普通按钮
Private Sub CommandButton1_Click() ThisWorkbook.Sheets(1).Rows(1).Delete End Sub
删除指定行,下面的纪录向上移
Sub Macro1() Rows("11:11").Select Selection.Delete Shift:=xlUp End Sub
来自: 昵称QAb6ICvc > 《vba应用》
0条评论
发表
请遵守用户 评论公约
用VBA删除EXCEL隐藏行
用VBA删除EXCEL隐藏行。Public Sub Deletehide1()If Rows(i).Hidden = True Then.End Sub.Public Sub Deletehide2()Set mrng = ActiveSheet.UsedRange.s = mrng.Rows.Hidden = True Or Rows(i).Height ...
工资条(隔行插入的宏)
工资条(隔行插入的宏) Sub Macro1()''
删除列-用宏
删除列-用宏excel宏中删除一列为什么会整个表格都删除了Sub 删第一列() '''' 删第一列 Macro'' 宏由 ** 录制,时间: 2013-12-25'' Columns("A:A").Se...
Excel VBA(5) – 一键制作工资条
Excel VBA(5) – 一键制作工资条。今天教一个 VBA 的经典案例:自动制作工资条。以下是原始的工作表,要做成工资条,需要隔行插入表头,...
Word VBA批量删除文本框
Word VBA批量删除文本框。Word VBA批量删除文本框代码整理。''//代码一功能: 批量删除word文本框中的内容。For Each sha In ActiveDocument.''//代码二功能: 删除word文本框而保留文字...
如何用vba给一个word表格的最后插入一行
如何用vba给一个word表格的最后插入一行Sub Example() Dim myTable As Table Set myTable = ActiveDocument.Tables(1) myTable.Rows.Last.Select Selection.InsertRowsBelow 1End Sub.Sub ...
160.一键创建斜线表头
函数作用:一键创建斜线表头。Sub 斜分单元格(sht As Worksheet, row As Integer, col As Integer)
单元格互换
单元格互换。Dim TheArea1, TheArea2 As Variant.Cells.TheArea1 = Selection.TheArea2 = Selection.Cells = TheArea2.Cells = TheArea1.
使用VBA代码选择单元格/区域
使用VBA代码选择单元格/区域。例如,要选择同一工作簿中另一工作表上的单元格区域D3:E11,可以使用下面的代码:Application.Goto ActiveWorkbook.Sheets("Sheet3").Range("D3:E11"...
微信扫码,在手机上查看选中内容