我有一个Excel工作簿，我需要与我的客户分享，但要确保它不在办公室networking之外打开。 如何保护我这样的Excel工作簿？

我录制了一个macros来创build一个表格，并在第9列中过滤掉某些值。 我想显示except for Taxes and General所有结果。 生成的代码反过来，过滤你想看到的字段。 我怎样才能切换它，所以我硬编码我不想看到的值。 所以当添加一个新的值时，它也会被自动提取，否则就会被忽略。 LastRow = Sheets(Sheets(1).Name).Cells(Rows.Count, "A").End(xlUp).Row ActiveSheet.ListObjects.Add(xlSrcRange, Range("A1:T" & LastRow), , xlYes).Name = "Table1" ActiveSheet.ListObjects("Table1").Range.AutoFilter Field:=9, Criteria1:= _ Array("Intel", "Cisco", "Global", "Local", "HR", "Finance", _ "Cables", "HP"), Operator:=xlFilterValues

我想获得一些数据，我input另一个macros到一个二维数组，所以我可以应用一个函数的数据，但不pipe我尝试我不断收到错误。 数据包括string和数字。 我总是可以引用单元格，忘记数组，但这会使函数复杂化。 这是我的代码： （声明） Dim nLiens As Byte, nCreditors As Byte Dim SecurityV As Currency, ASecurityV As Currency Const adjuster = 0.9 （相关潜艇） Public Sub VariableDeclaration() nLiens = InputBox("Enter number of liens in security") nCreditors = InputBox("Enter number of creditors") SecurityV = InputBox("Enter security full value") ASecurityV = adjuster * SecurityV Call ODebt End […]

有一对夫妇，如果在工作表中的ActiveX命令button。 当我隐藏一些行时，它们随着单元格移动并最终彼此重叠。 我应该使用哪个属性来告诉他们留下来？

我有一个要求从Excel中获取数据，并使用JavaScript在HTML页面中绘制图表。 有没有最好的教程呢？

我有一个配方的细胞 ="Average:"& AVERAGE(C2,C6)& "Items:"& SUM(C2,C6) 我需要在该单元格中的“平均”作为红色。 保持黑色

我试图在Excel中创build一个单元格，每当你在单元格上面写一些东西时，它会find你在特定列中键入的文本，并返回它旁边的单元格的值。 例： Derp <—我在这里键入单词“Derp” 1246.53 < – 这将返回在下面的单元格中find的“Derp”旁边的值 Names Values X 173 ZN 5345 Q 76578 Derp 1246.53 <—returns this AyyLmao 0.5 我已经尝试使用查找和匹配，但他们返回一些其他的值，所以我不知道该怎么做。

我试图创buildExcelmacros，这将标记在Internet Explorer页面上的某个表中的75个checkbox 该表的代码是： <TABLE id=ctl00_MasterMain_ucGenConfig_ucConfigContainer_ucConfigPopup_cblSchemes border=0><TBODY> <TR> <TD><INPUT id=ctl00_MasterMain_ucGenConfig_ucConfigContainer_ucConfigPopup_cblSchemes_0 type=checkbox name=ctl00$MasterMain$ucGenConfig$ucConfigContainer$ucConfigPopup$cblSchemes$0><LABEL for=ctl00_MasterMain_ucGenConfig_ucConfigContainer_ucConfigPopup_cblSchemes_0>Start</LABEL></TD></TR> <TR> <TD><INPUT id=ctl00_MasterMain_ucGenConfig_ucConfigContainer_ucConfigPopup_cblSchemes_1 type=checkbox name=ctl00$MasterMain$ucGenConfig$ucConfigContainer$ucConfigPopup$cblSchemes$1><LABEL for=ctl00_MasterMain_ucGenConfig_ucConfigContainer_ucConfigPopup_cblSchemes_1>Start2</LABEL></TD></TR> <TR> <TD><INPUT id=ctl00_MasterMain_ucGenConfig_ucConfigContainer_ucConfigPopup_cblSchemes_2 type=checkbox name=ctl00$MasterMain$ucGenConfig$ucConfigContainer$ucConfigPopup$cblSchemes$2><LABEL for=ctl00_MasterMain_ucGenConfig_ucConfigContainer_ucConfigPopup_cblSchemes_2>Default</LABEL></TD></TR> <TR> 等我尝试了各种方法，但不想玩 With IE.document.getElementsByName("ctl00_MasterMain_ucGenConfig_ucConfigContainer_ucConfigPopup_cblSchemes") .Item.Click end with 和 With IE.document.getElementsByName("checkBoxlist(ctl00_MasterMain_ucGenConfig_ucConfigContainer_ucConfigPopup_cblSchemes)") .Item(0).Checked = True 'Entered End With 和 For Each htmlelement In IE.document.getElementsByName("ctl00_MasterMain_ucGenConfig_ucConfigContainer_ucConfigPopup_cblSchemes") htmlelement.Item(0).Click Next htmlelement 预先感谢任何帮助或线索:)

我想在Excel中使用VBA定义一个Range， Sub convertePerc() Dim separador As String Dim linhaInicial, linhaFinal, colunaInicial, colunaFinal, numAnos As Integer Dim origem, destino As Range separador = "DRES(G)" colunaFinal = Sheets(separador).Cells(6, 5).End(xlToRight).Column linhaFinal = 40 numAnos = 10 origem = Sheets(separador).Range(Cells(10, 4), Cells(linhaFinal, colunaFinal)) colunaInicial = CInt(4 + numAnos + 1) colunaFinal = CInt(numAnos + colunaFinal + 1) destino = […]

我正在设置打印页脚，如下图所示。 如何强制格式为DD MMM YYYY？ 例如， 13 Oct 2015 谢谢！