Tag: excel 2007

VBA excelmacros处理5000行和5列

我正在使用Excel 2007,并且在范围A1:A5000中有5000个语句,在范围B1:E5000中有每个语句的四个备选。 我想将其转换为另一个slyle,其中所有数据都在范围G1:25000中,其中所有四个选项将在每个语句下。 我logging了一个macros,但我不知道如何循环,手动是不可能的。 在这里需要一些帮助…谢谢。 例: Statement1 – AlternativeA 1 – AlternativeA 2 – AlternativeA 3 – AlternativeA 4 Statement2 – AlternativeB 1 – AlternativeB 2 – AlternativeB 3 – AlternativeB 4 Statement3 – AlternativeC 1 – AlternativeC 2 – AlternativeC 3 – AlternativeC 4 Statement4 – AlternativeD 1 – AlternativeD 2 – AlternativeD 3 […]

Excel的 – 如果单元格包含项目设置另一个单元到今天的date

我想实现的是当一个单元格包含一个string值,然后我想要一个相邻的单元格等于今天的date: 例如 Order Number Date 1 05-11-2014 2 05-11-2014 no item 3 05-11-2014 所以当有订单号的时候,我想让excel做=TODAY() ,或者显示"no item" 查询将看起来像这样但是我不能确定search后包含的2个参数 =IF(OR(ISNUMBER(SEARCH({"cell has no value","cell has value"},B13))),"no item",TODAY()) 感谢任何帮助这个家伙

如何使用combobox来显示基于用户select的信息?

我有一个combobox有几个不同的select: Selection 1 Selection 2 Selection 3 现在我知道,一旦我做出select,它将返回一个数字,在我指定的任何一个单元格中: 1 2 3 现在让我们说,我有以下格式的= SUMIFS函数: =SUMIFS(Data!$G:$G,Data!$A:$A,Account!$B$6,Data!$B:$B,">=" & C5,Data!$B:$B, "<=" & D5) 现在我有一个单独的工作表是我的“数据库”或原始数据,我用这些数据填充这些单元格。 所以如果你看看 Data!$G:$G (which is the column that I'm summing) 有没有一种方法来总结一个特定的列基于comboboxselect在= SUMIFS公式?

基于comboboxselect更改单元格格式types

假设我有一个包含以下内容的combobox: Revenue Conversions CTR 现在,如果我要显示“收入”,我希望单元格包含“$”和“转化”以包含逗号分隔符和CTR格式化为“%”百分比的数字。 如何让这些单元格根据combobox中的select改变它们的格式?

在Excel中删除整行不应删除同一行中的button

我有我的数据从列A到列F在Excel表中。 我在H5的页面中间某个地方的其他列创build了一个button 不,当我删除无效的数据,只需select行号和删除应删除整个行。 但我的要求是,我们应该删除整个行为前:如果第5行有无效的数据。 我们将通过select第5行删除无效行并删除。但是我们在H列的同一行有一个button。 要求是该button不应该被删除。 有没有什么办法可以保留button,即使整行被删除。我试图locking单元格,窗格和拆分。 但没有运气。 你能帮我吗?

找出variables的范围,使一个简单的function正常工作

下面的VBA例程不工作,我不明白为什么… 我已经尝试在顶部设置一组公共variables,使variables之间的function,但它不工作。 下面代码的最终结果应该使得getthename具有cow的价值 Sub test() getthename = test2(test1("elephant")) End Sub Function test1(NewTitle As String) As String If NewTitle = "elephant" Then NewTitle = "horse" Else NewTitle = "pig" End If End Function Function test2(NewTitle As String) As String If NewTitle <> "horse" Then NewTitle = "cow" Else NewTitle = "rabbit" End If End Function

两个date列之间的差异格式化为常规

我有两列在Excel中,格式化为常规 – 与此数据: Column A Column B 11/2/2014 9:12:27 AM 12/3/2014 2:00:00 AM 我如何才能find他们之间的差异,如果他们被格式化为“一般”而不是“date”? 感谢您的任何build议, 标记

在自动closures工作簿之前保存文件

如果在1分钟内处于非活动状态,我想closures工作簿。 但是在closures之前,我想保存它的备份,但不要对原始文件进行更改。 我怎样才能合并这个代码: ActiveWorkbook.SaveAs filename:=filename, FileFormat:=xlWorkbookNormal 进入这个程序 Sub SetTimer() Dim bookname Dim filename DownTime = Now + TimeValue("00:01:00") bookname = ActiveWorkbook.Name filename = "C:\myhome\backups\" & bookname Application.OnTime EarliestTime:=DownTime, _ Procedure:="ShutDown", Schedule:=True End Sub 如果我把它插入代码,它会要求我在定时器完成之前保存。 我想在时间结束后再问。

当公式评估发现无时,Excelvalidation列表公式会生成错误

所以我一直试图在数据validation中使用dynamic下拉列表,而且我已经取得了很多成功,但由于某种原因,这个特定的公式正在踢我的屁股: =IF(ISERROR(INDEX(INDIRECT(A2&"SL1"),1,1)),A1,INDIRECT(A2&"SL"&INDEX(LevelO, V2, MATCH(A2, LevelO[#Headers])))) 我以前使用过的所有组件都没有问题。 但是,最后一个INDEX导致问题。 如果我删除并硬编码列号,所以它看起来像这样: =IF(ISERROR(INDEX(INDIRECT(A2&"SL1"),1,1)),A1,INDIRECT(A2&"SL"&9)) 然后它工作正常。 为什么我不能在INDIRECT函数中使用INDEX函数呢? 顺便说一下,所有适用的表和范围都存在,这不是问题。 当我把第一个公式放到一个单元格中时,它会评估所有命名的范围(使用公式评估)。 这是用Excel 2007。

每次将新值排列到两个单元格中

用最简单的方式解释它: | 1 | 2 | 3 | 4 | | 5 | 6 | 7 | 8 | …需要看起来像: | 1 | 2 | | 3 | 4 | | 5 | 6 | | 7 | 8 | 我尝试过使用TRANSPOSE()函数,但是在这种情况下似乎不起作用。 我怎样才能完成这个简单的任务?