Excel 创建一个按纽用来对B列进行排序，区域是A4：W200，求代码？
1、在工作表D列，按顺序输入序号；
2、按行选定整个工作表（从“姓名”以下行开始），然后点击菜单栏的“数据—排序”，在“排序”工具条的“我的数据区域”下面勾选“无标题行”，在“主要关键字”下面的下拉框中点击“列A”，后面勾选“升序”，然后点击“确定”按纽；
3、从“姓名”以下行开始选定B、C两列的单元格区域，按步骤2中方法将选定区域按列B升序进行排序；
4、按行选定整个工作表（从“姓名”以下行开始），按步骤2中方法将选定区域按步骤1中输入的序号所在D列升序进行排序，然后删除D列即可。
Sub 按钮1()
Dim I
If [E3] = "" And [E5] = "" And [E7] = "" Then
Rows(3).Copy Rows(2)
Rows(5).Copy Rows(3)
Rows(7).Copy Rows(4)
End If
For I = 1 To Range("E65536").End(xlUp).Row
If Cells(I, "e") "" Then
Rows(I).Select
Selection.EntireRow.Hidden = True
End If
Next
End Sub
Sub 按钮2()
Rows("1:500").Select
Selection.EntireRow.Hidden = False
Rows(2).Copy Rows(3)
Rows(3).Copy Rows(5)
Rows(4).Copy Rows(7)
End Sub
您可以在Excel中使用VBA代码创建一个按钮，点击该按钮可以对B列进行排序。下面是一个简单的例子，您可以拷贝并在Excel中运行：
首先，打开Excel，并点击“开发人员”选项卡。
点击“插入”选项卡，然后选择“按钮”工具。
然后，在工作表上点击要放置按钮的位置，即可在工作表上放置一个按钮。
在Excel中点击按钮，然后在“属性”窗格中输入按钮的名称。例如，您可以输入“排序”作为按钮的名称。
然后，点击“按钮工具”下的“编辑代码
Private Sub SortButton_Click()
'定义变量
Dim i As Integer
Dim j As Integer
Dim temp As Integer
'排序
For i = 4 To 200
For j = i + 1 To 200
If Worksheets("Sheet1").Cells(i, 2) > Worksheets("Sheet1").Cells(j, 2) Then
temp = Worksheets("Sheet1").Cells(i, 2)
Worksheets("Sheet1").Cells(i, 2) = Worksheets("Sheet1").Cells(j, 2)
Worksheets("Sheet1").Cells(j, 2) = temp
End If
Next j
Next i
End Sub
您可以将上述代码复制到VBA编辑器中，然后修改工作表和列的名称，即可创建一个排序按钮。
Excel 使用 VBA 脚本语言来实现自定义操作，包括创建按钮并进行排序。要实现上述操作，您需要打开 Excel 的 VBA 编辑器（通常是按下 Alt + F11 组合键），然后编写一段代码。
下面是一个示例代码，它创建一个名为 "Sort B Column" 的按钮，点击该按钮后，会对工作表上 A4:W200 范围内的 B 列进行排序：
Sub CreateSortButton()
Dim btn As Button
Set btn = ActiveSheet.Buttons.Add(10, 10, 100, 20)
btn.Caption = "Sort B Column"
btn.OnAction = "SortBColumn"
End Sub
Sub SortBColumn()
Dim rng As Range
Set rng = Range("A4:W200")
rng.Sort Key1:=rng.Columns(2), Order1:=xlAscending, Header:=xlYes
End Sub
您需要在 VBA 编辑器中将这段代码复制并粘贴进去，然后保存。接下来，您就可以在工作表中使用新创建的按钮，点击它即可对 B 列进行排序。
请注意，上述代码仅提供了一个示例，您可能需要根据自己的需求来修改代码。例如，您可以更改按钮的名称、位置、大小等。此外，您可能还需要修改排序所使用的参数，以获得更精确的排序结果。
点录制宏，按要求操作一遍，完成录制，代码就出来了，再在按钮点右键，关联到录好的宏代码，就ok了。
妫狱多糖： EXCEL中把同一列相同的内容复制到另一列的方法如下:1、在b1列写公式:=if(countif(A:A,a1) > 1 ,A1,＂＂)2、拖动控制点进行填充即可.3、如果需要格式一样,那就用格式刷刷一下,就可以了.
潮阳区15566379687： excel怎样制作宏按钮 - ？
妫狱多糖： 步骤/方法 1 按钮的本质就是一个宏,所以在制作按钮之前,我们先来录制一个宏,把宏都准备好了,就可以制作按钮了.先打开一个表格如图所示,选中大标题,接下来我们在菜单栏上执行:开发工具--宏2 设置宏名称为【大标题】,保存位置...
潮阳区15566379687： excel里面怎么把B列的数据按照A列数据的顺序来排列一一对应,B列的数据A列一定有,A列的B列不 - ？
妫狱多糖： 步骤如下: 1.将B列按照A列顺序对应排列 2.输入公式如下: 3.往下拖动填充 4.将C列复制到B列,选择性粘贴,数值 5.删除C列,结果如下:
潮阳区15566379687： 如何在excel中添加按钮计算D=A*B/1000,要求A列和B列数字改变时,点击一下按钮,就能计算出一个结果 - ？
妫狱多糖： 你的意识表述不够明白,是AB每行对应单元格计算一个结果,还是整列求和计算?这个简单公式不需要按钮,excel公式即可胜任.
潮阳区15566379687： VBA对EXCEL,画一个按钮,点这个按钮就把指定单元格同列且下一行的单元格数值送往目的工作区指定的单元格 - ？
妫狱多糖： '把表1B1单元格的值写入表2的B列最后一个单元格下一个单元格中 Sheet2.Range(＂b65536＂).end(xlup).offset(1).Value = Sheet1.Range(＂b1＂).Value'把表1B1单元格的内容放入表3的C列最后一个单元格下一单元格中(包括公式、格式) Sheet1.Range(＂b2＂).copy Sheet3.Range(＂c65536＂).end(xlup).offset(1)
潮阳区15566379687： excel有什么常用的按建,比如添加什么的 - ？
妫狱多糖： 搜下Excel的常用快捷键,很多的:移动到当前数据区域的边缘:CTRL+ 箭头键 移动到行首:HOME 移动到工作表的开头:CTRL+HOME 移动到工作表的最后一个单元格.:CTRL+END 向下移动一屏:PAGE DOWN 向上移动一屏:PAGE UP ...
潮阳区15566379687： 在excel中如何制作一个按钮 - ？
妫狱多糖： 开发工具-插入-选择一个窗体控件-在excel中画出来-点中窗体-鼠标右键-指定一个宏.右键工具栏空白处,点选“窗体”调出窗体控件工具箱 选择“按钮”工具,然后在合适的位置画出按钮 这时,会跳出一个“指定宏”的窗口,先不管它,关闭此窗口 接下来,按ALT+F11组合键,打开VBE窗口,点菜单上的“插入”-“模块”,然后在右边的编辑窗口粘贴下面的代码 Sub 删除指定区域() Range(＂A2:E5＂).Select Selection.ClearContentsEnd Sub注:里面的A2:E5是指定要执行删除任务的单元格地址,可根据实际修改 关闭VBE窗口,回到EXCEL工作表,右键刚才插入的按钮-指定宏,选择刚才的宏名,确定
潮阳区15566379687： 怎么用excel按照年份将B列和D列做一个对比柱形图 - ？
妫狱多糖： 新建excel文档,导入所用数据. 以图中的数据,我们将第一行的数据作为X轴数据,后两行数据作为Y轴数据.先将数据画成散点图. 选择数据,在“插入”栏中选“散点图”,画散点图时要选择图中所示的“带直线和数据标记的散点图”...
潮阳区15566379687： Excel按键插入当前日期. 在A列中每一个单元格放一个按钮,当按下按钮时,B列中的对应单元格现实 - ？
妫狱多糖： 这个实现难度太大.在A列放置按钮,如果是少数几个,如果有几千行,那工作量是很大的,因为每个代码的内容不一样,无法判断此按钮在第几行.
潮阳区15566379687： 关于EXCEL创建列表 - ？
妫狱多糖： 这个问题真的很简单,也可以根据这个序列项恢复回来,当然这个序列项不用的时候也可以隐藏,不会影响整个的布局的,,,这是EXCEL本身自带的功能,除非你会修改这个办公软件语言,这样你的原始顺序就即使由于误打乱了,不过我可以给你一间接的方法避免这个问题出现,不过那是不可能,,n,再将创建列表区域含盖这个序列项就可以! 在做列表的区域前添加一列序列项1,2,3,4,,你的意思是不要降升两筛选项
