Tag:

SUMPRODUCT获得行+1

我有一个如下表格: 12/7/2012 AB 100 12/21/2012 AI 20 12/23/2012 AI 25 12/1/2013 AI 20 12/1/2014 AI 20 我想获得列D中的值,其中列B是“A”,列C是“我”。 我使用了一个sumproduct来获得D列中的值,但是我需要从B列为“A”而C列为“I”的地方往下走1行。 这是我的公式: =SUMPRODUCT(–(B:B="A"),–(C:C="I"),F:F+1). 它应该返回值85,但它返回值为4。

删除一些基于单元格值的行之前导入到datagridview使用c#

我想从车库导入excel文件到datagridview。 使用下面的代码,我可以成功地从我的Excelfile upload两列。 但是我想在导入之前修改我的excel文件progmamicaly。 在我的Excel表中,一列包含城市名称,其他列包含人口编号。 我想删除包含低于10000人的那一行。 但我真的不知道该怎么做。 这里是我导入excel文件的代码。 private void button1_Click_1(object sender, EventArgs e) { String name = "Gemeinden_31.12.2011_Vergleich"; String constr = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + @"C:\C# tutorial Backup\Zensus_Gemeinden_org.xlsx" + ";Extended Properties='Excel 12.0 XML;HDR=YES;';"; OleDbConnection con = new OleDbConnection(constr); OleDbCommand oconn = new OleDbCommand("Select * From [" + name + "$D8:E11300]", con); con.Open(); OleDbDataAdapter sda = […]

VBA:插入可变数量的行

我写了下面的代码,但我不能通过一个行,我想要插入可变数量的行。 编译器尖叫,它需要一个“列表分隔符或)”,那里有一个冒号。 但是我找不到其他的写法。 请帮忙! =)所以,有问题的路线是从两端来的。 就在它上面有一条评论线,我也尝试过没有成功。 另外,你会如此善良,并解释我什么,我需要下面的命令(他们也可以在问题行中find):Shift:= xlDown,CopyOrigin:= xlFormatFromLeftOrAbove 最后,关于如何改进代码的任何build议,有经验的程序员在阅读时都不会感到晕眩? =) 巨大的提前谢谢你, Option Explicit Dim ws As Worksheet Dim Blatt1, Blatt2 As String Dim Anfangsjahr1, Anfangsjahr2 As Integer Dim reporting_Jahr1, reporting_Jahr2 As String Public Sub Dreiecke() For Each ws In Worksheets If ws.Name Like "RVA_H*" Then If IsEmpty(Blatt1) = False Then Blatt2 = ws.Name Anfangsjahr2 […]

Excel行增量公式

有人可以帮助我关于公式行增量excel。 我有一个工作表(I6)列和IM复制另一个工作表上的数据(H138)行,我需要做的是复制I6列(I7,I8,I9)将遵循,并有另一个表上的数据是(I138,J138,K138)。 目前的公式是(H139,H140,H141)。

python xlsxwriter根据行数据写入单元格

我有python字典: student_age = {'bala':20,'raju':21} student_id = {'bala':289,'raju':567} 以及十多个与学生姓名和价值不同领域相似的词典。 预计的excel结果: 代替 worksheet.write(0,2,20) 我想根据学生的名字写(如“ 写”(“bala” – >“age”,20) 更新的代码: import xlsxwriter workbook = xlsxwriter.Workbook('student_data.xlsx') worksheet = workbook.add_worksheet() student_age={'bala':20,'raju':21,'ram':22} student_id={'bala':289,'ram':567,'raju':654} students = student_id.keys() print(len(student_age.keys())) fields = [student_age, student_id] # add other dicts here… for row, student in enumerate(students): worksheet.write(row, 0, student) # name column for col, student_data in enumerate(fields): […]

条件格式,基于整行,适用于其他工作表 – Excel 2010

我目前有一个电子表格,它具有条件格式,可以根据“D”列的值(AL列)更改列的颜色(待定和主动更改为黄色,预定和转发更改为绿色,以及停用和取消更改到红色)。 然而,我在这个曾经是excel文件中有几个工作表,我想把相同的规则扩展到。 有没有办法将这些规则应用于文档中的其他工作表,还是必须为每个文档手动input这些规则?

检查单元格值,匹配时复制

我有一个不断增长的名单。 如果某个单元格值大于10,则应将整行复制到某个工作表中。 如果值为10或更小,则应检查下一行,直到达到包含数据的最后一行。 这是我目前的macros。 它像以前一样将行复制到相同的位置。 我需要他们列出没有自由空间。 Sub Copy() Dim s1 As Worksheet, s2 As Worksheet Dim N As Long, i As Long, j As Long Set s1 = Sheets("Hours") Set s2 = Sheets("Check") N = s1.Cells(Rows.Count, "R").End(xlUp).Row j = 1 For i = 1 To N If s1.Cells(i, "R").Value > "10" Then s1.Cells(i, "R").EntireRow.Copy s2.Cells(j, […]

InputBox中的行参考?

这里是我目前在VBA(Excel)中的代码。 它大部分来自我制作的macros观录音。 我正在寻找的是能够插入,例如,行10只是10在input框中,而不必把它放在10:10。 有没有办法让我编辑我的当前代码,以允许这个? 我试过使用行(“TargetRow:TargetRow”),但是这给了奇怪的结果。 Dim TargetRow As Variant TargetRow = InputBox("Insert row # where data should be inserted. This should take the format XX:XX (eg 90:90 for row 90)", "All Industries Row", "XX:XX") wbThis = ThisWorkbook.Name Windows(wbThis).Activate Rows(TargetRow).Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromAbove Windows("otherworksheet.xlsx").Activate Range("A119:J119").Select Application.CutCopyMode = False Selection.Copy Windows(wbThis).Activate Range(TargetRow).Select Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _ xlNone, […]

如何在Excel中更改列标题?

a1 | b1 | 0.1 a1 | b2 | 0.2 a2 | b1 | 0.3 a2 | b2 | 0.4 如何把这个表格转换成 xx | a1 | a2 b1 | 0.1 | 0.3 b2 | 0.2 | 0.4

在Excel中的具体dynamic编号

我有个问题, 是否有任何方法可以使用公式编制excel(1; 1.1; 1.2 ….)中的编号格式? 我需要隐藏第二行,编号应该是dynamic的,仍然显示 (1; 1.1; 1.2 …)不是(1; 1.2)… 我需要locking第一个(1)号码的特定行。 因为我有3到3.45然后4到4.20 … 在这里input链接描述