一起研究，共同进步

你好！我想请教一下大佬！
就是我现在有个大批量的工作表（有14万行）
每一行要插入与前一行相同的行
请问这个宏怎么写？

大佬，想帮忙改个word宏，可以帮忙吗？

不知道楼主用vba对数组进行排序有深入研究不？我就对这个排序很头疼，找不到好方法。
我看到别人说先把结果输出工作表，然后利用工作表函数排序。我个人不太喜欢这种方法，我每次都是用两个相同的数组对倒一次，在对倒的过程中一边检索顺序一边倒数据，感觉还是很罗嗦，代码也不简洁。

数组排序的自定义函数
Function SortArrayAtoZ(myArray As Variant)
Dim i As Long
Dim j As Long
Dim Temp
'Sort the Array A-Z
For i = LBound(myArray) To UBound(myArray) - 1
For j = i + 1 To UBound(myArray)
If UCase(myArray(i)) > UCase(myArray(j)) Then
Temp = myArray(j)
myArray(j) = myArray(i)
myArray(i) = Temp
End If
Next j
Next i
SortArrayAtoZ = myArray
End Function

调用数组排序函数
Sub RunTheSortMacro()
Dim i As Long
Dim myArray As Variant
'Set the array
myArray = Array("p", "A", "G", 3, "l", "6", 10, "K", 7)
'myArray variable set to the result of SortArrayAtoZ function
myArray = SortArrayAtoZ(myArray)
'Output the Array through a message box
For i = LBound(myArray) To UBound(myArray)
MsgBox myArray(i)
Next i
End Sub

请问这个要怎么操作？

如图，使用公式解决此问题。
=IF(AND(B3=MIN(B3,D3,F3,H3,J3),C3=MIN(C3,E3,G3,I3,K3)),"渠道A",
IF(AND(D3=MIN(B3,D3,F3,H3,J3),E3=MIN(C3,E3,G3,I3,K3)),"渠道B",
IF(AND(F3=MIN(B3,D3,F3,H3,J3),G3=MIN(C3,E3,G3,I3,K3)),"渠道C",
IF(AND(H3=MIN(B3,D3,F3,H3,J3),I3=MIN(C3,E3,G3,I3,K3)),"渠道D",
IF(AND(J3=MIN(B3,D3,F3,H3,J3),K3=MIN(C3,E3,G3,I3,K3)),"渠道E","待定")))))
使用VBA代码可以在数组中，判断该渠道的费用是否为最小值，二者同时为最小，返回对应渠道名称即可。

请问withEvents这个关键词用来干嘛的，和用object关键词定义有什么区别呢

请问大家，有没有代码关于画出散点图然后再两两连接的代码，已知连接方案。
求帮忙

我想请教一个问题，excel中单元格变化自动执行宏，但是单元格如果是按照时间顺序，依次变化(类似于手动逐条输入，但是很快)，那怎么实现所有单元格变化之后再执行宏

Private Sub Worksheet_Change(ByVal Target As Range)
Dim MaxRow& '定义想要执行事件的行数
MaxRow=.... 'ubound（数组）或者其他
If Target.Row = MaxRow Then '指定行数为MaxRow时触发事件
自定义操作
End If
End Sub

如果行数是变量怎么判定呢？

这一次是3行，下一次可能是4行！

这个怎么写