excel-vba

0热度

1回答

VBA - 2010 - 如何反转过滤器

我想知道一个简单的解决方案，用于反转过滤值。尽管在我看来，这是一件容易的事，但在互联网上进行研究的时候我还没有取得成功。的情况和问题：我有多个列的表，和很多行（确切数额并不重要，很明显），我想看看发生了什么不在一列的内容过滤。问题是，我通常需要做一下例如了很多 - 在项目数据库我已经过滤价值超过500 000 €的那些，这是我从一个特定国家来了。只需点击一下，我想看看哪些是低于500 000

0热度

1回答

VBA：代码运行但没有生成输出

我有一个Excel工作簿，其中有两张表，名为“Dashboard Supplier View”和“ComputingSolutions”。在仪表板供应商视图选项卡中，用户必须记下名称中的值cell“categoryName”。当用户在这个命名单元中写下“Computing Solutions”并运行代码时，我希望代码转到ComputingSolutions表单并将该表中列A中的所有供应商名称存储到

0热度

1回答

从用户表单填充数据复选框和可选按钮

我正在创建一个用户表单，我希望能够填充数据选项卡中的值以及默认为某些值。我想我有文本框和组合框，但无法找到使用多个可选按钮生成数据到一个单元的信息取决于选择。从这个例子中，我的标准是“二级保险”我该如何去把它们全部链接起来，以便让单元格b1填充选定的选项？我完全猜测，但我认为复选框更简单一些，如果选中则为true，如果未选中则为false。到目前为止，我所看到的只是一个代码，用于填充指定文

1热度

1回答

Excel VBA Excel十进制精度

我有一个VBA脚本生成的分配，需要精确到20位小数。我使用CDec()以正确的小数精度填充数组。我遇到的问题是，当我将数组输出到Excel工作表时，小数精度显着下降。例如，我确认在我的数组中，数字是0.1557094848581301243552712433，但是当它输出到工作表时，它会降到0.15570948485813。我可以将数组写入文本文件，并进一步确认数组保持正确的精度。我甚至尝试创建一

0热度

1回答

从多个Excel工作簿中拉出关键信息的错误

我正在尝试在工作簿中编写一个宏，其目的是显示一组excel文件中的关键信息。第一列包含将在代码中使用的文件的名称。我到目前为止编写的代码应循环显示汇总表中11个文件名的列表，并将每个文件中的单元格E21中调用的信息拖放到汇总表的单元格Hx中。我已经没有运气让它工作到目前为止，我的第一个错误得到是“无效的限定符”的行，说“MySheet”。我知道这里还有很多其他的错误，因为我从来没有试图写一个从

-2热度

1回答

如何按单元格值复制列

我正在寻找最有效的方法，通过Excel中的单元格值将列从一个工作表复制到另一个工作表。我有以下表格： Sheet1 我想复制的列在该表中 “湾/海洋” 和 “小河”： Sheet2 的 “的stationID” 在表1和表2应该匹配。谢谢！

-1热度

1回答

如何让两个字符串具有相同的ID，如果它们具有80％的相似性？

有两个类似的说明，它们有80％的相似性。我需要两个相同的ID。还有其他的id描述有60％的相似性。这些应该保留自己的ID。一旦id desc被考虑和修改，不应该被视为参考。此外例如： id id description 1 pepsodent 2 pepsodent salt 3 pepsod 4 pepsodent and salt 5 peps 现在，pepsod

1热度

1回答

VBA将数据从一张表复制到另一张

我是VBA的新手，需要项目帮助。我需要编写一个读取列C中的工作表名称的宏，并将源工作簿中的值粘贴到目标工作簿中的范围，该范围在列D中指定。因此，例如，需要复制Myworkbook书籍Sheet2中的数据，并将其粘贴到他们的工作簿Sheet2范围内。范围和图纸编号信息存储在单独的工作簿中的地方。编辑：我添加了一张wbOpen看起来像的图片。 This is it here. Option Exp

0热度

3回答

在vba中选择一个动态范围

我的工作表包含列A中的动态行数。我想从第一次满足条件到最后一次选择动态行数。在列A中，我的名字只出现在块中。例如，从A1到A10“Alfred”，从A11到A13“Flo”，从A14到A27“Dave”。我希望能够从A1选择A10如果变量名称=“阿尔弗雷德” 选择A11至A13如果变量名称=“弗洛”等我从来不知道什么时候开始的名称或结束，但我知道他们在块。我的想法是从A1到最后一行做一个

1热度

1回答

使用VBA从枢轴字段获取可见项列表

我正在使用以下代码来循环显示透视项目的透视图字段。但pivotitem.count给出一个0时，枢轴字段在行标签当我将此透视字段移动到列标签，代码工作正常。但我需要这个字段留在行标签上。有没有解决我的问题？ Dim pt As PivotTable Dim pf As PivotField Dim pvtitem As PivotItem Set nwSheet = Worksheets