Tag: excel 2010

将现有的macros应用于整个工作簿，而不考虑工作表的数量

几乎没有“信息技术”的背景下，我创build了一个macros，使用loggingfunction，只有在给出运行命令时，才能改变电子表格（excel 2010）的布局（列宽和页面方向适合打印在一个页面上） 。 这是很容易的部分 问题是，它只改变了ActiveSheet，它需要我点击工作簿中的每一个工作表并执行macros。 在工作簿中可以有从1到15页的不同数据行。 （只取决于一天）; 我想改变macros在“ACTIVE WORK BOOK”上运行，而不pipe工作表中包含的数量是多less？ 这里是整个macros的一个副本： Sub VerificationWorkbook() ' ' VerificationWorkbook Macro ' Verification Workbook ' ' Keyboard Shortcut: Ctrl+Shift+V ' Application.PrintCommunication = False With ActiveSheet.PageSetup .PrintTitleRows = "" .PrintTitleColumns = "" End With Application.PrintCommunication = True ActiveSheet.PageSetup.PrintArea = "" Application.PrintCommunication = False With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = […]

在Excel中复制大量的数据

我有一个大约90个格式相同的工作簿的电子表格。 我需要从一个完整的工作表中复制和粘贴位于一行中的336个独立公式到所有其他工作表。 不幸的是，这最终导致大约30k个单元需要立即复制和粘贴。 有没有一种解决办法，而不是分手，手动？ 任何帮助是apperciated。 谢谢。

Excel 2010图表轴未显示出来

我正在将EXCEL 2003应用程序转换为EXCEL 2010.数据显示正常，但轴不再显示。 哪个函数显示轴自动缩放？ 例如：如果您在Excel折线图中绘制以下系列。 [0.22,0.33,0.44,0.55,0.66,0.77,0.88,0.99,1.1,1.21,1.32,1.43,1.54,1.65,1.76,1.87,1.98,2.09,2.2] Excel确定y轴值应该是[ 0,0.5,1,1.5,2,2.5] [ Excel如何确定图表的轴值？ 1 。 如何使图表中显示的自动值[0,0.5,1,1.5,2,2.5]变成y轴？ 谢谢 更新了相关代码 – With ActiveChart .SeriesCollection(2).Select '.SeriesCollection(2).AxisGroup = 2 .HasTitle = True .ChartTitle.Text = OutputTitle & Chr(10) & ChartTitle2 .Axes(xlValue).HasTitle = True .Axes(xlValue).AxisTitle.Text = AxisTitle1 .Axes(xlValue).AxisTitle.Font.Bold = False .HasAxis(Excel.XlAxisType.xlCategory, Excel.XlAxisGroup.xlPrimary) = True .Export Filename:=ExportFile, FilterName:="GIF" End with 如果我取消注释'.SeriesCollection（2）.AxisGroup = 2，我将得到y轴显示，但x轴标签与值不匹配。 当前图表 – […]

excel VBA代码不工作

我有一个如下VBA代码的Excel表 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row = 1 And Target.Column = 5 Then Dim iRet As Integer If Not IsEmpty(Range("AZ1").Value) Then iRet = MsgBox("You have already selectd a Size Template", _ vbOKOnly, "Select Size Template") Exit Sub End If Dim arr As Variant arr = Split(Target, ",") Range("R14:AZ14").ClearContents Range("R14:AZ14").NumberFormat = "@" Range("R14", […]

Excel查找function

我有下面的表格： Col ABCD Row 1 Rating 2 3 5 Row 2 3 0 0.89 0.96 我正在做一个查找函数（=查找（0.874，B2：D2，B1：D1）），但它正在查看行2（0）中最接近0.874的下一个最小数字，并返回2.我希望它实际上在第2行0或0.89（0.874最接近于0.89），从第1行中select3。我如何去改变我的function，所以我可以得到这个工作？ 如果我的查询值是0.95，则返回数字是5，依此类推。 任何帮助将不胜感激！

我如何才能计数单元格，如果不同的单元格是一个特定的值？

我有一个有不同数量的单元格的范围。 每个单元格旁边都有另一个可以包含OPEN或CLOSED的单元格。 我只想要SUM的细胞，如果他们的状态单元格说OPEN。 下面是一个数字和状态的例子

Excel – 在图表中获取姓名

我需要像这样得到一个图表，其中绿色单元格包含列和行标题的名称列表，没有重复： 请你帮我弄清楚为了制作这样的图表需要使用的公式吗？

从checkbox更改单元格中的值

我在一个表中有一个值，在另一个表中有一个checkbox。 我希望在检查这个盒子的时候，这个值会增加1。 我想要做这样的事情： =IF(C23,B4=B4+1) 但Excel会引发错误。 C23是checkbox，B4是数字。

检查“行”中是否存在“单元格”值，并在同一列中返回一个值，但返回不同的行

例如，我需要检查值的第一个实例在范围“B3：AY3” ，并从第二行返回相应的值

Excel 2010 VBA：根据值将行复制到新工作表

正如标题所述，我试图首先检查特定单元格中的值，然后如果匹配，则将整个行复制到新工作表中。 没有错误被抛出，但结果是空的。 请协助。 Public Function freshSheet(inPart As String) Dim mag As Worksheet Dim currRow As Long Dim iohd As Worksheet Dim magCount As Integer Set iohd = ActiveWorkbook.Worksheets("IOHD") 'TODO: Create Magic Sheet. Set mag = ActiveWorkbook.Worksheets.Add(After:=ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count)) mag.Name = "Magic" 'TODO: Iterate through IOHD Sheet. For currRow = iohd.Rows.Count To 2 Step -1 'TODO: IS PART […]