VBA -使用返回按钮显示第一张工作表中的数据
VBA（Visual Basic for Applications）是一种基于Microsoft Visual Basic语言的宏编程语言，用于在Microsoft Office应用程序中自动化任务和定制功能。VBA可以用于Excel、Word、PowerPoint等Office应用程序。
在Excel中，使用返回按钮显示第一张工作表中的数据可以通过以下步骤实现：
- 打开Excel，并按下Alt + F11打开VBA编辑器。
- 在VBA编辑器中，选择插入 -> 用户窗体，创建一个用户窗体。
- 在用户窗体中，添加一个按钮控件，并将其命名为"返回按钮"。
- 双击返回按钮，进入按钮的点击事件处理程序。
- 在按钮的点击事件处理程序中，使用以下VBA代码实现显示第一张工作表中的数据：
Private Sub 返回按钮_Click()
Sheets(1).Activate
End Sub- 保存并关闭VBA编辑器。
- 在Excel中，点击返回按钮，即可切换到第一张工作表并显示其中的数据。
VBA的优势在于它可以与Office应用程序无缝集成，通过编写宏代码，可以自动化执行重复性任务、定制化功能，提高工作效率。VBA还可以访问和操作Excel的各种对象和属性，实现更复杂的数据处理和分析。
推荐的腾讯云相关产品：由于腾讯云主要是云计算服务提供商，与VBA无直接关联，因此无法提供特定的腾讯云产品链接。但腾讯云提供了丰富的云计算服务，如云服务器、云数据库、云存储等，可以根据具体需求选择适合的产品。您可以访问腾讯云官方网站（https://cloud.tencent.com/）了解更多信息。
相关·内容
2回答
我有一个包含2个工作表的Excel工作簿。VBA代码会将CSV文件加载到第一张图纸中。然后，VBA代码将第一张图纸中的数据绘制到第二张图纸中的图表中。此VBA代码每5秒运行一次，并导致图表闪烁。
有谁有什么建议来防止闪烁吗？我试过了
Application.ScreenUpdating = False
而且它也没有帮助。
浏览 16提问于2015-04-08得票数 0
我有一个excel表，其中有一个按钮，当按下显示一个用户表单中，用户输入他的凭证登录到一个网站从excel。现在，我正在尝试添加另一个具有相同功能的按钮的工作表，但登录到另一个网站。也就是说，当用户按下第一张表中的按钮，他应该能够登录到第一个网站，在从第二页初始化用户表单的情况下，用户应该能够登录到第二个网站。简而言之，有没有办法让我的VBA代码知道用户表单是从哪个页面初始化的。
在这种情况下，如何两次重用同一个用户表单？
浏览 0提问于2015-06-30得票数 0
我是Excel VBA的新手。我需要使用Excel VBA完成一项重要的自动化任务。它需要将特定的数据/文本从Word文件拉到Excel工作表中。请参阅附件中的示例文件。
需要将Word文件中突出显示的日期及其下面的每个日期提取出来，放入Excel第一张工作表的'PO issue date‘栏中。同样，word文件中的每个零件编号(突出显示)都需要将其放入“Funai part No”列中。
类似地，需要将word文件中'TOTAL‘下的数量放入'Required Qty’列，将word文件中的PO编号(Lastrow end value - 70525003)放入
浏览 2提问于2017-04-19得票数 0
1回答
我有一个Excel表单将数据输入到工作表中。工作表CC的最后一列包含计算某些输入字段的公式。这是一个很长但很简单的公式。
当我在表单中输入数据时，VBA表单本身中的一个字段会一直显示基于工作表列CC中的公式的输入结果吗？我不知道如何用VBA写那个长公式，所以想知道是否有办法绕过它。
如果不可能，那么在表单中输入数据时，有一个按钮检查结果如何？单击此按钮暂时将表单数据输入电子表格，填充CC单元格，结果显示为消息框，而VBA数据窗体仍处于打开状态。此结果消息框可以有两个按钮，确认条目或取消。如果单击“取消”，则删除电子表格中输入的数据。如果单击“确认”，则输入的数据保持不变。
如果有人能提出解决办
浏览 6提问于2012-12-20得票数 0
我的工作表上有一捆数据，我每天都在更新。单元格B9显示使用这组数据计算的公式的结果。我想在我的Excel工作表中添加一个按钮，当单击该按钮时，它将接受单元格B9中显示的值，并将其放在同一工作表上的单元格P2中。明天，我将进来更新数据包，它更新B9中显示的值，然后再次单击按钮，它将B9中显示的值移动到第P列中的下一个可用单元格。我将每天重复这个过程来构建趋势数据。我的VBA技能很差..。我可以找到VBA代码将数据从一个地方移动到另一个地方。我可以找到VBA代码来“找到下一个可用的单元格”，但是我不知道如何将这两个脚本结合在一起才能达到我想要的结果。
浏览 0提问于2018-10-05得票数 0
回答已采纳
我试着在excel中做一些问卷调查(是的，我知道有更好的方法;-)
我有几个工作表，每个工作表都有一些ActiveX选项按钮可供选择(是/否)。
问题是，当我在第一张和第二张工作表中选择一些问题并进一步进入下一张时，以前工作表中的一些选项按钮再次变为未选中状态。我在这里看不到确切的模式，因为一些表单保留了选项按钮的所有状态，一些表单丢失了所有状态，还有一些表单以不同的方式对它们进行了检查。
所以我的问题是:在这个问题上有什么特殊的限制吗？如果这很重要，我的工作簿中有许多ActiveX对象。
我使用Office 2010。
浏览 0提问于2013-01-29得票数 2
回答已采纳
我正在运行VBA代码来显示菜单。
有几个命令按钮，每个按钮选择一个不同的工作表(我做锁/解锁的选择表)供用户使用。
在工作表上完成后，我在工作表上有一个重新显示菜单的宏按钮。这个很管用。
我不能让工作表在屏幕上保持打开。节目似乎停止了。
迄今的守则：
这是一个命令按钮，它应该打开一个工作表来处理历史数据。
Private Sub cmdRPTSRVHIST_Click()
Unload MAINMENU
`Deactivate MAINMENU`
`Close MAINMENU`
`Worksheets("QRYsrvHst").Select`
浏览 2提问于2022-06-22得票数 0
2回答
我是excel的新手，不擅长VB，也找不到解决以下问题的方法:我有一张包含文章数据的单张，另一张只包含文章的标题和被引用的次数。
例如，第一个工作表包含以下列中的数据：
First Author Second Author Other Authors Publication Year Title Published In More Info
其中的第二个是：
Title Count
我希望将第一个工作表中的所有数据复制到第二个工作表的相应行(基于文章标题)。有些标题可能在第一张纸上出现两次，但只应复制一次到第二页。另外，如果所有从第一个工作表复制到第二个
浏览 4提问于2014-02-19得票数 0
回答已采纳
例如，如果我有一个数据表值，它具有以下值：
Table name = Employees
Column Names = Names, Titles
列的值将包括
"SamT, Manager"
"Nock, Manager"
"John, Entry Level"
"Kris, HR"
因此，如果我在excel spreed工作表上从表2上的sql server表生成该表，我如何创建一个参数来帮助我通过在不同的工作表(一个)中输入值来自动筛选该表。参数可以是标题的下拉列表，也可以只是一个接受这些值的文本框。例如，我在第一张工作表的
浏览 1提问于2014-03-31得票数 0
如何在python中将excel数据导入到dataframe中。
基本上，当前的excel工作簿在打开时运行一些vba，这会刷新一个数据透视表并执行一些其他操作。
然后，我希望将数据透视表刷新的结果导入到python中的dataframe中，以便进一步分析。
import xlrd
wb = xlrd.open_workbook('C:\Users\cb\Machine_Learning\cMap_Joins.xlsm')
#sheetnames
print wb.sheet_names()
#number of sheets
print wb.nsheets
文件的刷新
浏览 1提问于2013-07-09得票数 34
回答已采纳
1回答
我有两张表：Sheet1和Sheet2。表1是供最终用户输入数据的表单。而Sheet2是包含使用表单中输入的数据形成的数据表的隐藏工作表。图纸1有一个保存按钮，该按钮触发VBA代码将图纸1表格中的数据保存到图纸2数据表。
表2对数据表的每一列都有几个数据验证规则。当我在表2的数据表中直接手动输入值时，这些数据验证工作正常，并被触发(并显示错误消息)。
但是，当我使用这段代码将数据从Sheet1 (表单)移动到Sheet2 (表)时，不会检查数据验证，而是粘贴值。当我移动到Sheet2时，将检查数据验证规则，并突出显示不符合验证的单元格。
我想要的是，一旦我使用代码将数据从sheet1传输到sh
浏览 1提问于2021-05-20得票数 0
对于以下情况，我需要编写一个简短的VBA脚本。工作簿包含多个工作表。第一张表是汇总表。在摘要工作表之后，包含我想要在摘要工作表上显示的信息的工作表数量是不规则的。信息总是在“B栏”中。脚本应复制每个工作表的“B列”，并将其粘贴到汇总表中的下一个空列。换句话说，它应该复制“Sheet 2”中的“column B”并将其粘贴到“Sheet 1”中的下一个空列，然后复制“Sheet 3”中的“column B”并再次粘贴到“Sheet 1”中的下一个空列，依此类推。
非常感谢您的帮助，谢谢！
浏览 1提问于2015-06-07得票数 0
我对VBA非常陌生，一直在努力从以下内容中找到任何现有信息：
我有一个工作簿(excel 2013)和一个表格(excel表)，其中包含数据/文本等，就像主项目列表一样。在其他几张表中，我有类似的表，其中有相似的数据，但用于子项目。我要做的是在主项目列表(第一张表)的主页面上有一个单击按钮，一旦单击该按钮，它将检查其他工作表(子项目)上的表，以查找第1列中带有yes的行，并将每行(带有yes)复制到主项目表中的下一行。第2列中有一个唯一的引用，必须进行检查，这样它就不会重复行。
我已经开始使用我在这里找到的一些代码，但是它是用来复制到一个新的工作表，而不是一个表，显然这只是我尝试实现的函数的一
浏览 5提问于2015-06-23得票数 0
回答已采纳
2回答
我是VBA的初学者。在第一张表上，我有如下格式的数据：
表1
我想要做的是使用VBA显示以下图形，该图形根据找到的数量动态填充区域：
表2
这是我的第一个VBA，所以我有点挣扎。这是我关于如何处理这个问题的想法：
我的想法是向下滚动sheet1 col中数据中的字符串，并确定它是否是我们以前见过的日期：
Public Sub Test()
ActiveSheet.Range("Sheet1!A1:A5000").AdvancedFilter Action:=xlFilterCopy, CopyToRange.Range("Sheet2!A
浏览 78提问于2015-06-26得票数 0
回答已采纳
我是Excel宏的新手，正在尝试将数据从一个工作表复制到另一个工作表。在第一张表中，我有如下数据： Id Name Salary
1 AAA 1000
2 BBB 5000
3 CCC 6000 在另一个sheet2中，我有一个按钮，在单击它时，我需要为sheet1中的所有记录生成以下格式(一种表单)的数据。 Id
Date (Today's Date)
Name
Salary
--Few More Specific Data 在我的例子中，点击上面的按钮，我需要从sheet1中填写三次数据，比如， Id 1
Date 21/OCT/2
浏览 31提问于2021-10-24得票数 -1
在过去的几个月里，我正在构建一份PowerPivot销售报告，并在此过程中自学VBA和DAX。我的报表有几个预配置的视图，可以通过VBA按钮进行选择，这些视图完全可以正常工作，直到您关闭工作簿并重新打开它。每次第一次打开工作簿时，第一行AddDataField CubeFields代码中的VBA代码都会出错。这就好像excel没有预先计算我要添加的度量值。
如果我在数据透视表中手动删除/添加一个值，然后运行VBA代码，它可以完美地运行。如果我打开VBA窗口，然后将其关闭，PowerPivot代码完全可以正常运行。手动更改数据透视表中的值或简单地打开PowerPivot数据选项卡，都会提示Exc
浏览 0提问于2018-05-25得票数 2
1回答
我是VBA的新手，我正在Excel中做一个简单的项目。我有一份设备清单，每一件都分成一个不同的工作表。第一张工作表是一张目录，上面有所有设备的清单。单击其中一个可以将用户带到特定设备的工作表上。目前，我已经将一个宏绑定到一个名为New_Entry的按钮上，该按钮根据模板创建一个新的工作表：
Sub New_Entry()
Sheets.Add Type:= _
"C:\Users\MyName\AppData\Roaming\Microsoft\Templates\Archive_Entry.xltx"
ActiveSheet.Move Afte
浏览 8提问于2017-09-04得票数 0
回答已采纳
是否可以使用Selection定义在另一个工作表中的宏按钮中使用的数据。
我正在尝试制作一个模板工作簿，它的第一张工作表是一堆宏按钮。我希望能够在另一个工作表中选择数据，单击我的按钮工作表，然后单击我的按钮在其他工作表中选择的数据上运行宏。
我遇到的问题是工作表似乎同时有独立的选择。因此，我的宏总是在按钮工作表中的选定内容上运行，而不是在我所在的工作表上运行。你有什么想法吗?我该怎么做？数据的选择需要是动态的，所以我不能只说.Cells(1,1).value，因为它可能不是我需要的数据。
浏览 38提问于2018-05-30得票数 0
回答已采纳
我有一个有几张工作表的工作簿，每一张都有关于不同产品的信息。第一个工作表是一个摘要，只包含部分数据。目前的情况是，在产品表中填写数据后，必须有人手动复制相关信息并粘贴到汇总表中。所以我正在尝试写一个宏，所以用户选择最近添加的行，按下一个按钮，然后宏将其复制到第一张工作表中。但是，我不想复制所有列。我想要抓取所有选定的行，但只有A、B、E、F、G列。这就是我到目前为止所得到的。 Set range1 = Selection.Resize(,2)
range1.Copy
With Sheets("Summary").Range("A" & Rows.Cou
浏览 59提问于2021-10-06得票数 0
我在Excel中拖动以填写公式时遇到问题。我在行中有公式，这样每一行都有一个引用其他工作表上的行/单元格的不同公式。
假设在工作表1上，单元格C2:C9中的公式从单元格C4、G4、H4等提取工作表2中的数据。如果我突出显示工作表1单元格C2:C9，然后单击向下拖动以形成单元格C10:C17中的另一组公式，则单元格C10 :C17中的公式会更改其引用8行，因此，如果工作表1 C2从工作表2 G4中提取数据，则工作表1 C10中的下一个类似公式将从工作表2 G12中提取数据。
这就是我遇到的问题；不是公式改为每8行引用一次，我如何才能使它只更改1行呢？或者，对于拖动和填充的每一组新公式，仅将这些公
浏览 9提问于2017-08-24得票数 0
1回答
经过大量的研究，我找不到和我有同样问题的人。有哪位大师能帮我拿一下我的Excel宏吗？
我的宏执行以下操作：
打开另一个excel工作簿
将第一张工作表从此工作簿复制到当前的工作簿。
在复制的工作表中创建一个按钮
在这个新创建的按钮中编写一些代码
这是一个问题，当我的宏在按钮中写入代码时，它会打开VBA代码编辑器，然后关闭。我的宏做了很多次，所以VBA代码编辑器在宏运行期间一直在闪烁。
"Application.ScreenUpdating = False“没有解决这个问题。
请参阅下面的代码来执行这一步骤4，如果您知道解决方案，请告诉我。
wb是我的工作簿，w
浏览 1提问于2018-03-15得票数 0
1回答
我试图计算不同公司在特定的特定日期，从2007-2020年的837次观测的回报，一个+/- 1天的公告。这意味着我的公司将在13.04.2017宣布一项收购，在此我需要公司从12.04.2017至14.04.2017交还，我在第一张(Sheet1)上有所有的数据。如第一张图所示。
在我所有的收购中，我将得到01.01.2007-31.12.2020年的股票数据，在接下来的837个不同的表上是这样的。根据数据，我需要计算收购公司的回报(返回B，计算为B3/B2)和索引(返回c)，在此从返回C(这是F列)中减去返回B，最后生成一个由F4+F5+F6组成的返回框(在本例中)。这将是这样的与
浏览 1提问于2022-05-05得票数 0
当VBA宏按钮(而不是AcitveX按钮)被快速连续单击时，Excel“有时”会崩溃。
VBA代码大量使用对象模块，因此我认为这是一个垃圾收集问题。在退出按钮之前，我显式地将顶层对象设置为空，单击宏，认为它会强制垃圾回收。那不起作用。
这是非常令人沮丧的，因为它是间歇性的。也许每10到20次就有1次。
所显示的代码只是单击处理程序的按钮。从这个处理程序中调用了大约10,000行代码，我没有显示这些代码。VBA代码从工作表中读取信息，进行一些计算，更新工作表上的excel图表，并将一些数据写入工作表。我做通常的关闭事件和屏幕更新。
我只是希望其他人已经遇到了快速的宏观执行，导致excel崩溃。再
浏览 0提问于2019-06-21得票数 0
回答已采纳
1回答
我有一个包含表的表，也就是嵌套的表。(例如Person ->宠物数据)。第一张表显示所有的人，第二张表显示每个人的宠物。
我有一个显示嵌套表的按钮，这个按钮显示/隐藏包含宠物的表数据。
JAVASCRIPT:
function toggletable(id) {
var tableid = document.getElementById(id);
tableid.style.display = (tableid.style.display == "table") ? "none" : "table";
}
现在，如果我刷新页面，那么
浏览 9提问于2022-03-10得票数 0
1回答
*使用真实数据编辑 Pay Stub Hours worked 我编辑了我的原始问题，现在考虑我的实际工作表。司机的名字在第一张图中工作表的单元格J5中。小时数显示在第二张图中显示的单独的工作表(相同的工作簿)上。我希望将J5中的名称与第二张图像中出现的任何条目相匹配，并对每个每日小时计数进行总计，然后将其放入第一张工作表上的相应单元格中。例如，Hazem的周日总数将在第一个工作表上的单元格B11中，然后继续。
浏览 6提问于2020-10-02得票数 0
回答已采纳
我不熟悉excel宏。我需要你的帮助。我有一个有两张纸的excel文件。在第一张表中，我有一些数据
在第二张表中，我需要一个按钮，它将获取不同的C列(Mname)和它们的ID。
浏览 2提问于2013-12-27得票数 0
1回答
这里是Vba初学者。我有名为"Dane“的工作簿，其中我有工作表，每个工作表都必须搜索特定的行。这些行不能包含来自我的宏工作簿中A列的值，并且将在特定列中用"1“突出显示。我使用嵌套循环--外部用于工作表，内部用于行。问题是:1只在第一张纸上显示。当我添加‘Dane.Worksheets(I)’时。在'prodRange(x，1)‘错误“对象不支持属性或方法”之前发生。
Dim Dane As Workbook
Set Dane = Workbooks("something.xlsx")
Dim prodRange As Range
Set prodRa
浏览 2提问于2020-09-03得票数 0
回答已采纳
1回答
我必须制作一个VBA宏来检查excel表上是否已经有一个图表。因此，如果有任何图表，我必须删除它，如果没有，我必须放入一个新的图表。
我尝试直接使用：Worksheets("Sheet.Name").ChartObjects.Delete，但是如果一个图表不在工作表上，它就会产生一个错误。
我也尝试使用ThisWorkbook.Charts.Count，但是它总是显示我的工作簿中有0张图表，尽管第一张表本身有2张图表。
请帮帮忙。谢谢:)
浏览 4提问于2017-01-23得票数 0
回答已采纳
我在一个表单上有许多按钮，它们为用户提供额外的信息，每个按钮使用DCount查看是否有任何信息要显示，如果有，打开一个弹出式表单来显示它。一切都运行得很好，但现在对于一个特定的按钮，打开弹出表单需要30秒到1分钟，这显然是不可接受的。我不明白为什么它一开始工作得很好，但现在却变得如此缓慢。所有其他按钮仍然在一秒钟内打开它们的窗体。VBA是：
Private Sub btnNotes_Click()
'open the popup notes for the current record, if there are associated records
If DCount(
浏览 2提问于2012-10-15得票数 1
回答已采纳
2回答
我知道，我在问一个不寻常的问题。但是请帮帮我。
我在工作簿上有一个下面的代码，它将负责在工作表上复制/粘贴数据。它允许我将数据粘贴到单元格中，而不需要更改格式(过去只有值)。
基本上，代码将使用目标格式。类似于“粘贴值”。它允许用户粘贴来自任何其他格式的数据。因此，这种格式在各个工作表上是一致的。
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Dim vNewValues as Variant
NewValues = Target
Application.Enabl
浏览 7提问于2017-10-13得票数 2
回答已采纳
1回答
我在一个excel文件中有两个以上的工作表，其中一个工作表(A)有我想要过滤的数据。在其他工作表中，我希望有一个超链接，当单击每个超链接时，将链接到工作表A，它将根据该工作表显示过滤后的数据。
例如，在表A中，我有以下数据
A - apple
B - book
C - cat
A - angel
B - bread
在另一个工作表中，我有一个指向过滤数据"A“的超链接，因此当单击它时，工作表A将显示：
A - apple
A - angel
在另一个工作表中，当单击超链接时，它将在工作表A中显示筛选过的数据：
B - book
B - bread
我听说过VBA，但我不知道。在不使用V
浏览 15提问于2014-08-08得票数 1
我已经开发了一个excel插件，可以将工作表导入到现有的表格中。我希望能够双击任何地方，并能够跳回第一张纸。
Private Sub Worksheet_BeforeDoubleClick(ByVal target As Range, cancel As Boolean)
Sheets(1).Select
cancel = True
End Sub
另一个程序写一个摘要的excel文件。我已经开发了一个加载宏，当打开并运行时，导入完整的解决方案表并执行一些数据操作。有没有办法将这段代码转移到excel sheet vba工程中？提前感谢
浏览 2提问于2016-08-04得票数 0
1回答
在我的公司，Excel是处理数据的主要工具。
我正面临着这种情况。人们在excel中获得关于必须被翻译成其他语言的产品的信息。我有一个用jupyter运行的python代码。但是，要求用户在jupyter中运行python代码并不方便。
因此，当“输入”表中的用户填写表，然后单击按钮并运行python代码并将数据输入到“Output”工作表时，我想要使用带有按钮的excel文件。
我想这是为了加入的VBA
Sub RunPythonScript()
'Procedure to run a Python Script in a VBA Procedure using the shell
浏览 11提问于2022-03-27得票数 0
回答已采纳
1回答
我在excel表中有这类数据。
我想要这样呈现：
而是动态的。我这是什么意思？嗯，如果数据在第一张图片中发生变化，那么数据应该在第二张中更改。
例如，如果我为Client2添加另一个值条目，如下所示
然后，第二个表中的数据应该更新如下：
如果仅仅使用公式，这是可能的吗?或者我必须做一些VBA编程才能实现这一点吗？
浏览 0提问于2018-01-21得票数 1
回答已采纳
3回答
是否可能有多个按钮，比如“button 1”和“button 2”运行相同的VBA代码，但是根据按下的按钮产生不同的结果呢？
例如，当我按下按钮1，我希望它去一个网站，加载数据，并将其放在第一页，但当我按下按钮2，它去同一个网站，并加载到工作表2。
我知道我可以有相同的VBA代码的多个实例(具有不同的名称)，但是我希望简化代码并防止它过于复杂。
浏览 0提问于2016-02-02得票数 2
回答已采纳
我希望vba代码查找特定范围的数据，如果主表中存在这些数据，那么根据条件检索最后一行数据。例如，(有3行带有" dler“，我希望将dler与三行的第二张工作表进行比较，如果所有行都存在，则检索dler行)，这意味着将名称与其他行进行比较，等等.图片是两张，第一张是(主表)，第二张是vba用它来查找(主表)中的数据的表，我有这个代码，但我不知道如何更改它以处理动态记录。
Sub Matching_name()
Dim a_name As String, i As Long, j As Long, Last_Row As Long
For i = Last_Row T
浏览 4提问于2016-07-30得票数 1
回答已采纳
我每天都在获取数据。为此，我使用不同的命令按钮来过滤数据，并从不同的工作表收集数据。已经在第一张纸上保留了大约25个命令按钮。我的问题是，例如，命令按钮20不应该工作，或者不应该被点击，直到20号工作表可用。目前我正在使用
Dim j As Integer, k As Integer
j = Worksheets.Count
For k = 20 To 20
With Worksheets(k)
有时，我会错误地点击命令按钮，这个特定的工作表不可用，代码不会生成任何数据。
浏览 4提问于2017-01-13得票数 0
1回答
我的Excel 2010工作簿中有2张工作表。第一个人的名字排成一行，如下所示: Jens A. Christian Peter Jens A. Anders Jens A. Ett.
在第二张纸上，我想做一个组合框，它显示第一张纸上的所有名字，但没有重复的名字。这可以在VBA代码中实现吗？
此外，我想让列表成为动态的，但我想我只需要调用函数：
Private Sub Workbook_Open()
才能做到这一点？
提前感谢
浏览 3提问于2012-05-14得票数 0
回答已采纳
我有一本有两张工作表的工作簿。第一个工作表包含要复制的数据，第二个工作表包含字符串，我想在其中插入已复制的数据。问题是，我不知道如何确切地定义第二页字符串的文本开始/结束位置，我想粘贴在哪里？
例如:在第一张纸上，我的范围是A1:A4
<Tracciato xmlns="http://">
<Riquest>
<Test>
<Code></Code>
然后从第二个工作表B2单元格中获取一个值293并将其插入其中，因此我得到：
<Tracciato xmlns="http://
浏览 1提问于2014-10-03得票数 1
回答已采纳
我有一个excel VBA宏，它可以不断更新数据库。
我使用ActiveX控件触发宏，在excel工作表上“开始”按钮。
当电子表格正常工作时，我希望在电子表格的一个单元格中显示状态为" working “。
如果出现错误，则应显示“已停止工作的”。
我怎么能这么做？
浏览 0提问于2011-04-07得票数 2
回答已采纳
我在Excel中有一个类似以下内容的项目列表： ? 然后，此列表将用作其他多个Excel工作表和文件中我的表格的参考： ? B列的公式是：(If A in list，"Delete"，"Keep")。我已经构建了一个宏，它将在列B上循环，如果值为Delete，则删除整行。因此，在本例中，如果我单击蓝色按钮，第5行将被删除。 下面是我的代码(适用于工作簿中的所有工作表)： Option Explicit
Sub WorksheetLoop()
Dim i As Long
Dim ws As Worksheet
Dim Last As Long
浏览 9提问于2019-05-03得票数 0
回答已采纳
尝试使用excel vba用户表单自动执行电子表格中的许多任务。Sheet1上有一个包含两个命令的Button1。
sub Button1_click()
sheet1.range("a3").select
userform1.show
end sub
例如，有一个数据输入工作表(sheet2)，我们希望切换到该工作表以将数据值输入到列表中。
为了简化本例并显示我的问题，用户表单有一个按钮
sub CommandButton1_click()
userform1.hide ' hide the form
sheet2.activate
sheet2.
浏览 0提问于2017-12-20得票数 2
回答已采纳
4回答
我有一个按钮，在我的excel工作表的底部，生成另一个表盎司点击。该函数运行良好，但我需要在单击按钮后返回到工作表的顶部，而不是返回到新工作表。
将使用哪种VBA代码来执行此操作？
浏览 2提问于2013-06-14得票数 4
回答已采纳
我的excel vba程序有一个非常奇怪的问题。我有大量的执行查询和格式化数据的vba代码。每件事都运行得相当快。但是，如果我将页面保存为pdf，然后返回到左右单击并执行更多查询。每件事都需要更长的时间才能运行。我必须等待10秒才能执行查询并向我显示数据。在保存为pdf之前，这只需要一秒钟。有人知道这是怎么回事吗？
谢谢!
我正在使用excel 2007。我创建的pdf通过VBA，但我也测试了使用保存为pdf按钮在excel和完全相同的事情发生。只有当我将整个工作表保存为pdf时，它才会放慢速度。如果我选择一个图表，并将其保存为pdf，它不会减速。我试图保存的工作表由几个组合框、按钮、两个图
浏览 2提问于2011-08-18得票数 1
有没有人有基于当前日期将数据从一个工作表复制到另一个工作表的宏？
我正在使用一个三页的工作簿。第一张表将保存多个工厂的日产量数据的手动输入，第二张表将保存正在进行的每日数据，键入第一张表。宏将与一个按钮相关联，因此一旦单击，它将搜索日期为今天的每一行，并将该行复制到工作表2上的下一个可用空白行。
样本数据...
工厂1输入
日期-$ Produced -人工小时
3-29-10 - 4538 -8
3-30-10 - 7862 - 12
3-31-10
4-1-10
4-2-10
工厂2输入
日期-$ Produced -人工小时
3-29-10 - 4545 -9
3-30-10 - 764
浏览 1提问于2010-03-29得票数 0
我对使用VBA非常陌生，需要在第一张工作表(而不是活动工作表)的B列中选择第一个空单元格。每当我尝试激活代码时，我都会收到以下错误：
Cell.Select
为了解决此问题，我需要更改哪些内容？下面是我尝试使用的代码：
Dim ws As Worksheet
Set ws = Sheets("sheet1")
For Each Cell In ws.Columns(2).Cells
If IsEmpty(Cell) = True Then Cell.Select: Exit For
Next Cell
浏览 0提问于2019-05-14得票数 0
1回答
我有多个Excel表格。第一张表包含了全部信息的数据。第二个工作表包含所有订单行项的数据。
我需要根据第一张表中的信息遍历第二张表格，并将行项中的总数加起来。
例如，，下面是第一张纸：
，这是第二张纸：
我需要：
将第一张表中的"Customer“字段与"Customer”和"Customer“列进行比较。
如果第二张中的"Customer“或"Customer”包含第一张中的"Customer“字段中的文本，它将比较"Item”字段。
如果第一张表中的“项目”字段与第二张表中的“项目”字段相匹配，则将数量
浏览 2提问于2016-03-01得票数 0
2回答
我有一个宏，它重置特定工作表的格式，以及VBA代码，用于搜索数据。我希望当前执行搜索的按钮首先删除所有预先存在的格式。
工作表称为列表，用于重置的宏称为Reset1。
有人能告诉我我会怎么做吗？
浏览 4提问于2017-03-25得票数 0
回答已采纳
1回答
我有一个我不能解决的问题，我正在编写一个Excel宏，它建立一个数据透视表，从一个表中获取数据。当表中的字段为0时，我不想执行已计算字段的计算，并在数据透视表中显示空白单元格。
我的条件公式是这样的：
=IF((field1=0),"",(field1/field2))
将此公式放入VBA中，如下所示
pt.CalculatedFields.Add Name:="ptfieldname", Formula:="=IF((field1=0),"",(field1/field2))"
显示一个空的数据透视表，当我使用数据透视表选项标签
浏览 4提问于2012-05-11得票数 1
回答已采纳
我曾经构建了一个VBA按钮来自动锁定所有单元格中的数据。而且它运转得很好。现在我想把那个按钮复制到另一个工作表上。因此，我创建了另一个按钮，复制和粘贴整个VBA，然后编辑工作表名称和范围。而且，它只工作了5%的时间，其余的时间，我得到了一个“运行时错误'1004'：没有发现细胞。”我尝试过一些固定的方法，将工作表更改为工作表，或者在特殊单元格参数中添加一个"，23“。然而，现在一切都不起作用。当我尝试进入时，它有时会说rng和lckrng都是空的，有时只显示锁为空，而根本不显示rng。问题是，这过去是一个工作的代码，现在，它仍然工作约5%的时间。知道为什么吗？非常感谢!
浏览 2提问于2017-09-06得票数 1
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
即时通信 IM
对象存储活动推荐
腾讯云开发者
