Tag: excel 2007

在Excel 2007中如何获取单元格中的数字并仅提取其中的一部分

我有一个长度为10位的列中有多行,需要取右边的7位数字,并在旁边的下一列/行中发布。 有没有办法在macros中生成这个? 2300056711 0056711 2311080900 1080900

公式Excel显示数据时的第三个字符J

我想在第三个字符= J时显示数据。例如: Jajar asjur bajar kaka dede lala 结果 jajar asjur bajar

VBA – Excel强制重新启动

我有我的代码重大问题,应该重置工作表,不closures整个工作簿,并强制重新启动。 这不是一个问题,并且只是因为我添加了从On Error Resume Next开始的最后一段代码而发生。 Sub Reset() Application.ScreenUpdating = False Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets If ws.Name = "Set Up" Or ws.Name = "Report" Then Else: Application.DisplayAlerts = False ws.Delete End If Next Worksheets("Report").Cells.ClearContents On Error Resume Next Application.DisplayAlerts = False ThisWorkbook.Charts.Delete Application.DisplayAlerts = True On Error GoTo 0 End Sub […]

excel公式arrays

嗨,为什么我得到运行时错误13:types不匹配错误,而运行下面的代码 Application.Goto Reference:="R1C1:R232C221" Selection.FormulaArray = "=ROUND(a(),0)" Selection.Replace What:="a()", Replacement:="IF(IF(Sheet4!A1:HM232+Sheet5!A1:HM232=2,0," & _ "Sheet4!A1:HM232+Sheet5!A1:HM232)+IF(Sheet4!A1:HM232+Sheet5!A1:HM232=2,0," & _ "Sheet4!A1:HM232+Sheet5!A1:HM232)=2,0,IF(Sheet4!A1:HM232+Sheet5!A1:HM232=2,0," & _ "Sheet4!A1:HM232+Sheet5!A1:HM232)+IF(Sheet4!A1:HM232+Sheet5!A1:HM232=2,0,Sheet4!A1:HM232+Sheet5!A1:HM232))", LookAt _ :=xlPart, SearchOrder:=xlByRows, MatchCase:=True, SearchFormat:=False, _ ReplaceFormat:=False Range("I9").Select 1)我知道formulaarray应该是R1C1风格…但是A1风格不是必须的,它在A1风格也没有任何问题 http://msdn.microsoft.com/en-us/library/bb208529.aspx 2)我发现这种写作方式 http://www.dailydoseofexcel.com/archives/2005/01/10/entering-long-array-formulas-in-vba/

Excel中。 从数组函数中访问单个值

我在Excel 2007中有一个自定义函数。它返回双精度数组。 Dim ResultArray(10) As Double 如果我用Ctrl-Shift-Enter使用它,我会在一行中得到10个结果。 我想访问结果数组中的一个特定的resut。 说第二个结果。 我期望像= myFn(a,b,c)(2),但它不工作…. 可能吗?

Excel事件被忽略/不再被捕获,即Worksheet_Change没有被更改input

我正在研究一个复杂的基于电子表格的解决scheme。 偶尔用户会遇到一个问题,即表单中的事件似乎不再被Excel捕获。 目前我无法复制这种行为,但是我曾经嘲笑过这个PC,我可以证实,尽pipe在下面提到了一个断点,但是没有一个被调用: Worksheet_Activate() Worksheet_Deactivate() Worksheet_Change(作为范围的ByVal目标) Worksheet_BeforeDoubleClick(作为范围的ByVal目标,取消为布尔值) 这当然可以通过旧的经典“你有没有把它重新打开和closures”来解决,但是我想知道这是怎么发生的,以及如何防止它? 我甚至把Stop / MsgBox“blah”放到了方法中,看它是否只是VBE中的断点,但是我没有得到任何东西。 那么,谁知道为什么excel不是提高事件的孤独者呢? 干杯。 FRD

在Excel公式中对复杂条件中的数字进行舍入

我需要根据以下三个条件对数字(最后2位数,无小数)进行四舍五入: 如果00,那么-1 如果01到49,那么就凑到50 如果51到98,那么最多可以达到99 例子: 如果数字是1251,那么它是1299 如果数字是1298,那么它是1299 如果数字是4874,那么它是4899 如果数字是1433,那么它是1450 如果这个数字是1880,那么这个数字是1899 如果数字是1301,那么它是1350 如果数字是1200,那么它是1299 如果数字是1250,那么它是1250(不变) 如果数字是1299,那么它是1299(不变) ………………

将一个excel文件内容复制到另一个excel文件的末尾

我如何复制一个Excel文件到另一个Excel文件使用VBA我如何提到两个Excel文件的path? 这是我在网上find的: ActiveSheet.Move After:=ActiveWorkbook.Sheets(ActiveWorkbook.Sheets.Count) 这就是我所看到的,但我无法让任何人都可以告诉我,我可以做到这一点? 我必须将一个Excel文件的所有行和列复制到另一个Excel文件的末尾。 我如何做到这一点?

Excel使用多个不同区域格式的date/时间。 VB? 公式?

我目前在美国东部时间和我公司内使用的date格式是 月/日/年小时:分钟:秒 我需要复制和粘贴从其他地区提取的date/时间,他们有混合格式。 有些与我的格式相同,有些则使用英国格式 日/月/年小时:分钟:秒 目前,我必须手动编辑英国格式与其余的匹配,以便我的date公式不会有错误。 这是一个问题,因为我面对的是200多条logging,每条logging的时间都不一样。 有没有我可以用来解决这个问题的代码或公式? 我知道date时间格式可以通过系统区域设置来解决,但这没有帮助,因为更改为任一格式仍然需要我手动编辑那些不受影响的。 我正在考虑使用Visual Basic遍历,使用每行的唯一ID来识别是英国还是美国。 我在正确的轨道上? 否则有没有一个Excel的公式或方法可用于此? 提前致谢

Excel VBAmacros根据列中的文本将单元格的值复制并粘贴到某些单元格

我试图复制和粘贴文本值的Excel中基于文本比较一定数量的单元格。 请参阅下面的解释: 我有2栏A(空白)和B(有值) macros后,这将是最终的结果: 在检测到果实列并将行数值粘贴到行A后,基本上是取其底部的单元格。请注意,在到达下一个单元格之后,它将取下一个(底部)单元格的值。 F123,F124等。 有人可以提供我的excel vba代码吗? 谢谢。