vba

0热度

1回答

我必须打印邮资标签作为我的在线业务的一部分。我有一个宏来将标签放置在一个页面中，但我想要一种将图像移动到另一个页面的方式。如何使用VBA宏将我的20张图像移动到5张单独的页面上，每张图像上有4张图像？顺便说一下，这在mac中。谢谢。 Sub ImageResize() ' ' ImageResize Macro ' Resizes all images to a height of app

0热度

2回答

如何防止Excel打开CSV文件时发生任何更改

我有多个.csv文件，其中包含我在另一个程序上生成的数据。我想要打开这些文件中的每一个，从中复制所有数据并将其全部粘贴到Excel上的现有工作簿中。我的问题是，当我用excel打开csv文件时，它会自动将csv文本分成三列或更多列，以后我无法使用“文本到列”数据工具（或任何其他工具）转换数据，因此自动转换从Excel中打破两个不同数字的一些单一值）。有什么办法可以防止excel在我打开csv文件时

0热度

2回答

VBA：平滑数据

我在excel中创建了一种方法，通过改变单元格的值（间隔），我可以通过“移动平均值”来平滑数据，并在图形中实时查看更改，而不是每次都必须点击数据分析 - 移动平均数等。问题在于，我发现Excel的显示速度很慢，因为它似乎是每次在同一张表格中“计算”移动平均值（或别的东西）。当我在同一个文件中有很多数据时，情况会变得很糟糕。这是我目前做的方式：我复制下面的E3公式然后我拖累了相同数量的占用的行中

1热度

3回答

子程序，用于导入其代码片

我得到此代码工作一段时间，但最后几天它没有工作。从活动workbook1它假设进口sheetworkThisworkbook2： Sub ImportallWBsh() 'https://michaelaustinfu.files.wordpress.com/2013/03/excel-vba-for-dummies-3rd-edition.pdf, Page 245 Dim

0热度

1回答

如何通过从子表格中选择任何行来填充MS Access主窗体

Hy人人专家！我想通过从MS Access中的子窗体中选择一行来填充主窗体，但它不工作，这是主窗体！在主要形式的每个控件绑定到数据源。这是子窗体！在这种形式我想通过选择任何行形成子表单来填充行数据的主要形式。当我标记红色。当我选择它时，它应该自动填入主窗体。我试图通过调用这样的参考。 me.ShiftProdRecord2_Query_SubForm = textbox.value

0热度

3回答

当我使用VBA删除其他工作表中包含重复值的角色时，如何删除不包含重复项的角色

我想删除列B中已有ID出现在“交易”片。但是，当我使用下面的代码删除行时，不重复的ID行也被删除（最顶层的异常除外）。我的删除代码是否有误？这里是我的代码： Sub Removeduplicate() Dim i As Integer Dim j As Integer Dim num As Integer Dim lastCellB As Range num = 0

0热度

2回答

VBA检查网页浏览器的ActiveX控件

我有一个带有宏的工作簿来生成一个HTML文件，并将其显示在嵌入其中一个工作表的Web浏览器中。在Excel 2016测试此宏后，我碰到这里所描述的ActiveX控件的问题就来了：How to make Microsoft Web Browser object work in Excel 2016 而这里的一段脚本在Web浏览器加载页面： Sub LoadHTML() Set IE = S

0热度

1回答

Excel VBA禁用从工作表中粘贴特定范围

我有一些Excel宏，人们在执行前手动粘贴到它的数据。为了避免宏运行中的错误，我想禁用粘贴某些列的数据。我 Private Sub Worksheet_Change(ByVal Target As Range) Target.Column = 7 Target.Column = 8 Target.Column = 12 End Sub 试过有人能指导我如何可

0热度

3回答

可添加新值的VBA下拉列表

我有一个受保护的工作簿，它具有使用数据验证手动创建的下拉列表。我有一个隐藏的工作表，其中我已经为其中的值定义了名称，并使用=SheetName!A1:A6在实际工作表上创建了数据验证。这足够我的需要。然而，新的请求引发了应该有能力增加用户新值的能力。例如：假设我有一个下拉值为A，B和C.现在用户必须从三个中选择一个。但是，如果他想要D，E（一次性使用），他应该能够增加任何新的价值。不需要将这

0热度

3回答

在Excel中选择变量的位置（作为单元格）VBA

所以，我有一个关于选择一个公式化值的确切单元格的问题。我真的是VBA的新手，我在网上搜索了至少2天的宝贵答案。在这里让我给你展示代码，试图说明它后来做了什么; Dim r As Range MinTime = WorksheetFunction.Min(Range("C5:L14")) Set r = ActiveSheet.Cells.Find(MinTime) r.Select