考虑一个包含三列A，B和C的表。我想使用以下两个条件对此表进行sorting。 主要标准：根据列C对整个表进行sorting，使C中的条目增加。 例如， 2009 ， 2009 ， 2010 ， 2010年等 子标准：当列C中的条目是相同的，比如说， 2009 ，我想sorting表，使列B中的条目减less。 例如，如果C中有两个2009 ，那么我想B有100和99 。 我如何在Excel中实现这个function？

我宁愿停留在Google表格中的几个条件格式规则的简单公式上。 我的数据由DD/MM/YYYY格式的date组成（格式 – >数字 – >date中设置）。 我在A1有一个参考date“Last Updated”，在B1:B9范围内有一列date。 我的两条规则都适用于这个范围，应该像下面这样工作： 如果此date大于或等于（即后期）A1 – >背景的date为黄色。 如果这个date小于（即较早）A1 – >背景的date是绿色的。 我已经尝试了许多不同的公式，但没有一个似乎能正常工作或按预期工作。 例如，使用第一个条件格式规则： =$B1 >= A1 =GTE($B1, A1) …再次以VALUE($B1) ， DATEVALUE($B1) 以下是使用自定义公式=(VALUE($B1) >= VALUE(A1))的第一条规则的结果。 这对我来说不太准确。 — A ———- B ———- Expected ———- Actual ———- 1 02/02/2015 01/01/2015 FALSE FALSE 2 02/01/2015 FALSE TRUE (YELLOW) 3 03/01/2015 FALSE TRUE (YELLOW) 4 01/02/2015 […]

我正在尝试将范围保存为图片文件。 下面的代码（从另一个post挖掘）的作品，但我不想创build一个图表页面，然后我需要删除。 有什么build议么？ Sub savedeal() Dim sSheetName As String Dim oRangeToCopy As Range Dim oCht As Chart Dim myFileName As String, myPath As String myFileName = Format(Now(), "dd-mmm-yy") & "-" & "DEAL.PNG" myPath = "D:\Hughs Files\Google Drive\Work Folder\Polaris\Blog\" Worksheets("BOOK").Range("B15:M45").CopyPicture xlScreen, xlBitmap Set oCht = Charts.Add With oCht .Export Filename:=myPath & "\" & myFileName, Filtername:="PNG" End […]

Python 3.4 我有一个杂乱的组织的Excel文件，但这是肯定的： 除了在每一行的第一个逗号之前出现的东西，包括逗号，我都需要一切。 例： 打印命令的文件给我这个： Word1时髦，左侧，UDLRDURLUDRUDLUR 没有（因为不）存在哈哈extraline，右侧，RBRGBRGBRGRBGRBGBR 我想得到的是这样的： 左边，UDLRDURLUDRUDLUR 右边，RBRGBRGBRGRBGRBGBR 我也想把它变成一本字典： dictionary = {“Left Side”：“UDLRDURLUDRUDLUR”，“Right Side”：“RBRGBRGBRGRBGRBGBR”，} 所以基本上我想摆脱一切，直到第一个逗号（逗号包括），使第二部分的关键（以第二个逗号结束），第三部分的价值（线结束的价值）。 执行这个最简单的方法是什么？

我的数据看起来像这样 1|1|1|1 101 1|1|1|2 101 1|1|1|3 101 1|1|2|1 102 1|1|2|2 102 1|1|3|1 103 1|1|3|2 103 1|1|3|3 103 1|1|3|4 103 1|1|3|5 103 1|1|4|1 104 1|1|4|2 104 1|1|4|3 104 <— my eq works till here 1|2|1|1 105 <— my eq needs to return 105 but all my eq modifications have failed 1|2|1|2 105 1|2|2|1 106 1|2|3|1 107 […]

我写了一个代码，在过滤一些行后从其他表导入表的一个代码。我的问题是，当我超过了表中的行数超过了表。 现在，我想知道是否有办法用行数来dynamic修改表的大小。 Public Sub refresh() Dim ws1 As Worksheet, ws2 As Worksheet, lr1 As Long, lRow As Long Set ws1 = ThisWorkbook.Worksheets("Scénarios de menace") Set ws2 = ThisWorkbook.Worksheets("Analyse de risque") Application.Calculation = xlCalculationAutomatic ws2.Range("B6:N" & ws2.Cells(ws2.Rows.Count, 2).End(xlUp).Row).ClearContents lr1 = ws1.Cells(ws1.Rows.Count, 2).End(xlUp).Row ws1.Range("A1:A" & lr1).AutoFilter Field:=1, Criteria1:="x" ws1.Range("B3:N" & lr1).SpecialCells(xlCellTypeVisible).Copy ws2.Range("B6").PasteSpecial Paste:=xlPasteValuesAndNumberFormats ws1.Range("A6:A" & lr1).AutoFilter ws2.Activate: […]

是否有可能使用excel_reader2search电子表格中的某个值，并获取行号，所以我可以使用它来获取整个行值？ 试图把自己从数据转储到数据库，因为我只想显示值。 是的，我知道我可以做data-> dump，但是我需要基于login的单行值。 提前致谢。

我有一个电子表格，其中包含包含邮政编码的实际美国地址。 我也是美国所有邮编的纬度/经度的数据库，可以在这里find： http ： //www.boutell.com/zipcodes/ 我正在寻找一个VBA解决scheme来匹配正确的纬度/经度的邮政编码。 一个声明说：“如果邮政编码匹配，请在新栏中input相应的邮政编码”。

我有六个dataframe，z1，z2，… z6。 （从一个excel文件的六张不同的表中读取）。 我需要对这些数据框进行子集化并build立一些模型。 每个过程都是相同的。 我希望能在循环中做到这一点，但无法find正确的语法。 （我试图使用粘贴和分配function，但它没有帮助）。 比如我想要 for (i in 1:6){ Z=subset(Zi,Zi$var1==1) } Zi应该是已经定义好的Z1，Z2，Z3。 我可以在每次迭代中通过粘贴function生成一个variablesZ1，Z2 temp = paste（'Z'，i，sep =''）但是我不能在上面的代码中使用'temp'代替Zi。 有关于类似问题的其他线程的讨论，但我无法find任何直接相关的问题。 如果我失去了一些东西，请将我指向正确的线索。

我有报告说，我经常从两个不同的来源运行，这两个来源都有一个唯一的标识符，用于链接两个报告中的数据（我将调用字段ID“LINK ID”）。 该字段出现在两组输出中（但是输出来自2个填充不同数据点的不同系统）。 我通常将每个报告剪切并粘贴到新创build的工作簿中的单独工作表中，然后进行匹配。 有一次，我曾经在一个子例程中循环遍历包含“LINK ID”的列，然后在另一个工作表上包含相同的“LINK ID”的另一列循环，如果发现一个匹配它会复制链接到匹配的整个数据行并粘贴到第一个工作表上。 我所做的代码从来没有完全完成，但是我想看看能否一劳永逸地找出这个问题，因为如果我不必一次一个一个浏览这些代码，那真是太棒了。 。 这是我有什么： Private Sub Find_And_Link() Dim rw As Long Dim mr2 As Long Dim ws3 As Worksheet Set ws3 = Sheets("VM") With Sheets("AY") For rw = 2 To .Cells(Rows.Count, "F").End(xlUp).Row If CBool(Application.CountIf(ws3.Columns(1), .Cells(rw, "F").Value)) Then mrw = Application.Match(.Cells(rw, "F"), ws3.Columns(1), 0) ws3.Cells(mrw, "A").Resize(1, 12).Copy _ Destination:=.Cells(rw, "G") […]