excel

    0热度

    1回答

    我不是来自软件背景并试图编写宏以避免导致错误的重复工作。请随时提出建议,让它变得更好。我尝试从本网站的不同程序中抽取部分内容并使其工作。 预先感谢您。 这是我正在做的。 a)我想从当前文件(说文件1)打开保存在特定位置的Excel文件(可以说是文件2)。 作品 b)以文件2相同在该文件中最后一个标签创建新的选项卡,工程 c)中重新命名使用2个不同的细胞从文件1所创建的标签(Auto Rename基

    0热度

    1回答

    我想在单元格范围内运行排名公式。我在挠挠我的头,为什么它不工作。拉斯特罗只是计算行数的公式。 Range("B1:B" & Lastrow).Formula = "=RANK(A1,Offset(" & Chr$(36) & "A1" & Chr$(36) & "," & Lastrow & ",0))" 我觉得这是与CHR $(36)做错事,但是当我尝试CHR(36),它也不起作用。 (删除

    0热度

    1回答

    我喜欢从Excel打开PowerPoint文件。 我试了几次,但它不起作用。 的问题听起来类似于这些: not able to Open Powerpoint using VBA 唯一的区别是,我得到另一个错误代码: 'Laufzeitfehler '-2147024894(80070002)': 死了Methode' 打开'fürdas Objekt'Presentations'ist fehl

    -1热度

    2回答

    我有一个包含大量数据的电子表格,并且已经构建了多个交叉检查。在给定的列中,我有逻辑测试返回TRUE或FALSE。我想在最后的TRUE或FALSE中总结大量的测试,以便能够立即发现任何FALSE。 我尝试用IF(E10:E400<>1;0;1)这样做的,按下CTRL +移+进入,但并未奏效。 有谁知道答案?

    0热度

    1回答

    这工作正常,直到我将它添加到一个循环中。我认为这是因为我添加了两次样式。 我想添加样式到工作表的第一行。 if (LastRowInsertionIndex==1) { xlWorkSheet.Activate(); xlWorkSheet.Cells[1, 1] = "CaseNumber"; xlWorkSheet.Cells[1, 2] = "Names";

    2热度

    2回答

    我正在尝试编写一个宏,它将不同工作簿中定义的工作表组合起来,并将它们保存到一个单独的工作簿中。每个工作簿都包含一个名称相同的工作表MODEL。此片材具有一个组合框,此组合框与工作表的名称在下面码相关联的,如:当所有的工作表中一个工作簿组合在一起,并更名 Sub ComboBox1_Change() Application.ScreenUpdating = False Select Case S

    -1热度

    1回答

    编辑整理。让我重写它。 这是一个游戏,在它结束时,您将收到一个得分的实验。根据这个分数,你可能会赢或者输。 我的目标是找出获胜的相关性得分,所以首先我需要在列D 列B和C是手动输入从损失胜排序。 D列是自动输入,因此它将在下面引用的代码将被执行。 问题出在这里使用的公式,因为它不会导致我想要的结果。 在下面我Excel中的布局,可以看到列d是我想要的夺冠成绩结果是。 但它没有准确地从损失中挑选得分

    0热度

    1回答

    标题说明了一切。还从微软获得了代码。它跳过标题和最后一行之后的第一行,但成功导出为ex​​cel。 Dim excel As Microsoft.Office.Interop.Excel._Application = New Microsoft.Office.Interop.Excel.Application() Dim workbook As Microsoft.Office.Int

    0热度

    1回答

    由于我的文档通常有一些可以反复使用的特定短语,因此我想将它们全部热键以节省时间。更具体地说,我打算让Macro1(插入“当然”),Macro2(插入“问题是”)和Macro3(插入“到时间”),热键Alt + 1,2 ,分别为3。如果我按Alt + 2,“问题是”立即插入到我的cusor中。 下面是我使用的基宏: Sub Macro1() Selection.TypeText Text:

    -5热度

    1回答

    请问我需要检查这段代码,它总是给我错误。 >>> import pandas as pd >>> import numpy as np >>> from pandas import ExcelWriter >>> LC="C:\\Users\\Taqwa\\Desktop\\2017_2018\\Fall\\TFT CEE 5604\\lane changing model\Volume.x