Sub compare()
Dim Arr() As Variant
Arr = Range("A1:Z6")
Dim R As Long
For R = 1 To UBound(Arr, 1)
If Arr(R, 1) = Arr(R, 4) And Arr(R, 2) = Arr(R, 5) Then
Arr(R, 3) = Arr(R, 6)
End If
Next R
Range("A1:Z6") = Arr
End Sub
上面的代码比较两列,看它们是否相等,并比较另外两列,看它们是否同时相等。然后,如果满足这些条件,
| one | two |
-------------
| A | 1 |
| A | 2 |
| B | 1 |
| B | 3 |
| C | 1 |
| C | 4 |
我希望在查询中的任何列中不重复,因此标准的SELECT DISTINCT one,two FROM table;或SELECT * FROM table GROUP BY one,two;不能完全工作,因为它在所有行中都是不同的,在本例中将返回所有6行。
理想情况下,我正在寻找:
| one | two |
-------------
| A | 1 |
| B
我有一个dataframe,希望删除在两个列(名为"Up“& "Down")中重复字符串的行。如果某些行仅在2列中的1列中重复字符串值,则不应删除它们。在复制的行中,我希望保留另一列(名为“折叠”)中值最高的行。除此任务外,第4列(名为"Name")还需要进行以下字符替换:
由此:
ID Name Fold Up Down
1 mRNA_splicing(5) 3.2 a,b,c,d,e f,g,h,i
2 mRNA_processing(7)
我试图根据列值复制数据。如果R列无效,则应将所有信息从sheet1复制到sheet2。
下面的代码正在运行。由于某种原因,它没有复制我的sheet1的最后两行。我在sheet1中有551行,而551行列R为无效。它只检查548行,跳过最后一行而不移动它们。
有人能帮我解决这个问题吗?
Sub Tab()
Dim cell As Range
Dim nextrow As Long
Dim a As Double
Application.ScreenUpdating = False
' get the count of rows in colum
因此,给定一个原始数据的二维数组(实际上是一个ArrayList<ArrayList<Object>>):
A B C D E
Bob null 42 null null
Sam null 38 blue 0
Tom null 35 brown null
我正在考虑编写的java tablemodel将自动折叠B列。
我试过在谷歌上搜索一些开源的东西,但我没有太多的运气。像这样的东西已经存在了吗?
在我的特定用例中,我有数百列和数千行。至少有30%的列(有时更多)为null。但是,