Tag: 范围
excel vba范围属性非连续范围
我只想从包含Sum(E1:E4)的原始单元格填充不同的非连续范围。 这里的代码（这是行不通的，只是为了让想法更清晰）： Selection.AutoFill Destination:=Range("K1:K4", "O1:O5", "Q1:Q5"), Type:=xlFillDefault
Range.FormulaArray在特定情况下导致错误
我有一段代码将数组公式放在一个范围内。 这是抛出运行时错误：1004“无法设置Range类的FormulaArray属性”。 但是，当我在单元格中粘贴相同的公式，并按Ctrl + Shift +input一切工作正常。 strFormula = "=IF(SUM(–(A2=Data!$A$2:$A$1423)*–(B2=YEAR(Data!$B$2:$B$1423))* –(C2=MONTH(Data!$B$2:$B$1423)) * (Data!$E$2:$E$1423))=0,TEXT(,),SUM(–(A2=Data!$A$2:$A$1423)*–(B2=YEAR(Data!$B$2:$B$1423))* –(C2=MONTH(Data!$B$2:$B$1423)) * (Data!$E$2:$E$1423)))" shtAbsoluteData.Range("D2").FormulaArray = strFormula IF条件插入时发生问题。 所以没有IF下面的代码工作正常： strFormula = "=SUM(–(A2=Data!$A$2:$A$1423)*–(B2=YEAR(Data!$B$2:$B$1423))* –(C2=MONTH(Data!$B$2:$B$1423)) * (Data!$E$2:$E$1423))" shtAbsoluteData.Range("D2").FormulaArray = strFormula 注意：如果我使用shtAbsoluteData.Range("D2").Formula那么没有错误，但结果是不正确的
VBScipt到Excel – 范围函数语法
重新：Excel 2007 我正在使用VBScript来创build一个Excel文件，并有一个小问题与语法我想… 如果我这样做，它可以愉快地将我的图表从我的应用程序粘贴到Excel单元格A1中的工作表： – ActiveDocument.GetSheetObject("CH_Contacts").CopyTableToClipboard True XLSheet2.Paste XLSheet2.Range("A1") 我现在需要做的是替代variables而不是A1，但我不确定正确的语法来做到这一点。 我有2个variables名为num_cols＆num_rows所以我想要做一些像… XLSheet2.Paste XLSheet2.Range(num_cols,num_rows) 我注意到，如果我logging一个Excelmacros，并拖动一个区域，它会产生这样的事情… Range("PV58:PZ58").Select 那么我也需要引号吗？ 我是否也需要冒号？ 任何帮助赞赏
如何sumif的范围的查找值？
我不知道如何解释我正在努力实现的目标，所以我将从我正在使用的数据开始： 1）列出与游戏对应的ID的表格。 每个游戏都有几个ID。 2）在这些ID上列出ID和$获得的表。 在另一个表中，我有游戏列表，并希望返回在这些游戏上获得的总和： 表1,2,3 我试图用SUMIF和VLOOKUP公式的组合来做到这一点，但我似乎无法find一种方法，因为VLOOKUP返回一个值而不是范围。 如果范围的查找值（与代码对应的游戏）匹配，我想要做的就是求和sum_range（$赚到）。 我可以简单地添加一列到第二个表，返回该代码的游戏与VLOOKUP。 但问题是这需要在大量的工作表中完成，并且每次都要接收新的数据。 希望这是有道理的，并提前感谢您的帮助，我可以得到！ 干杯，玛丽亚
写入一个范围的第一个单元格
我有一组范围，我想在每个范围的第一个单元格中写入一个值： Range("AccessabilityRange").Item(1, 1).Value = "Accessibility" 我已经尝试了一些变化，但他们都没有工作。 我是否需要首先提取单元格地址然后写入？ 我也看到偏移使用和计数，但不知道为什么一个会被选上另一个？
在列F中复制具有特定值的范围内的行
我有一个工作表，有很多列，也很多行。 从这个工作表中，我想复制匹配2个条件的行：1.列B中的值必须与不同工作表中的下拉列表中的选定值匹配2.列F中的值必须与来自不同工作表中的选定值匹配下拉列表。 我有一个脚本，适用于条件之一。 Private Sub Worksheet_Change(ByVal Target As Range) Dim fRow As Integer, lRow As Integer Dim value As String Dim mychart As chart Dim mycharts As ChartObject If ActiveCell.Address = Sheets("blad1").Cells(1, 1).Address Then Sheets("chartdata").Cells.ClearContents For Each ChartObject In Sheets("blad3").ChartObjects ChartObject.Delete Next value = Sheets("blad1").Cells(1, 1).value With Sheets("schaduwblad") fRow = .Range("B:B").find(what:=value, after:=Range("B1")).Row lRow = .Range("B:B").find(what:=value, […]
自动生成带有dynamic范围的堆积条形图？
我期待为我的同事开发一个工具，使用它自动生成一个堆积的条形图。 我需要这个适用于任何大小的数据集，任何数量的Product和任何数量的Part 。 所以，我需要一个自动调整的VBA范围为我的macros，我不知道该怎么做。 它需要做到以下几点： 在一行中取值为SUM，并将其logging在结尾处的列上。 为每个行创build一个堆积条形图。 转到“select数据”和“切换行和列” 将Total数据值设为No Fill 使Total数据标签显示“Inside Base” 通过改变Y轴的最大值，从堆积的条形图中删除空格。 我的问题如下： macroslogging没有logging将Total数据select设置为不填充。 我应该怎么做只有Total据点？ 如何使用VBA切换行和列？ 最后，我不确定如何使这个macros适用于任何大小的数据集？ 以下是我一直在练习的一组示例数据集 这是我想创build的图表types： 以下是我手动创build的macros： Sub StackedBar1() ' ' StackedBar1 Macro ' ' Range("G2").Select ActiveCell.FormulaR1C1 = "=SUM(RC[-5]:RC[-1])" Range("G3").Select ActiveCell.FormulaR1C1 = "=SUM(RC[-5]:RC[-1])" Range("G4").Select ActiveCell.FormulaR1C1 = "=SUM(RC[-5]:RC[-1])" Range("A1:G4").Select ActiveSheet.Shapes.AddChart.Select ActiveChart.SetSourceData Source:=Range("'Sheet3'!$A$1:$G$4") ActiveChart.ChartType = xlColumnStacked ActiveChart.SetSourceData ActiveChart.SetElement (msoElementDataLabelCenter) ActiveChart.SeriesCollection(6).Select ActiveSheet.ChartObjects("Chart 4").Activate ActiveChart.SeriesCollection(6).DataLabels.Select […]
Excel在范围内查找指定值的最后一条logging
我有一个Excel的公式问题。 我有一些账户活动的表格/范围在数天内的金额如下 date / account / amount 1-Jan / 20 / 60 1-Jan / 30 / 2 2-Jan / 20 / 3 2-Jan / 20 / 4 3-Jan / 10 / 5 4-Jan / 20 / 6 我想提取给定帐户的最后logging如下 10 -> 3-jan / 5 30 -> 1-Jan / 2 哪些公式会根据标准find最后的范围？ 如何做到这一点？
MS Excel – 按降序对多个分数/数字进行sorting和排列
我正在寻找一个MS Excel排名公式解决scheme，而不使用VBA /macros或MS Excel的内置sortingfunction，这将允许我按降序排列多个列包含排名（即排名1，排名2和RANK 3）对主场（即PLAYER）进行sorting，并按降序重新排列列表。 示例：三重排名和平局（排名不分） 结果：按降序排列的相邻列：按列G（RANK 1）sorting，然后按列H（RANK 2），然后按列J（PLAYER）中的匹配/相应播放器名称列I（排名3） 。
创build行VBA的范围
我有多行，有时是有序的，有时不是。 在sorting中，我需要创build一个范围，这不是为了复制数字。 事情是，最多的行可以是20。 例如单元格： 1 3 五 6 7 8 9 10 13 14 15 那里将会是： 1 3 5-10 13-15 是否可以编码？ 谢谢
