日期范围输入VBA
是指使用Visual Basic for Applications（VBA）编程语言来处理日期范围输入的方法。
概念： 日期范围输入是指用户在应用程序或表单中需要输入一个起始日期和结束日期的范围。VBA可以帮助开发人员通过编写代码来验证、处理和格式化这些日期范围。
分类： 日期范围输入可以根据输入方式和验证方式进行分类。根据输入方式，可以分为手动输入和选择日期的方式。根据验证方式，可以分为基本验证和自定义验证。
优势： 使用VBA处理日期范围输入具有以下优势：
- 自定义验证：可以编写代码来验证用户输入的日期范围是否符合要求，例如起始日期不能大于结束日期。
- 格式化控制：可以根据需求格式化日期的显示方式，例如将日期以特定格式显示或转换成其他日期格式。
- 强大的日期函数：VBA提供了丰富的日期函数，可以方便地进行日期计算、比较和转换等操作。
- 可扩展性：VBA可以与其他功能和模块结合使用，例如数据库查询、图表生成等，从而实现更复杂的日期范围处理功能。
应用场景： 日期范围输入在各种应用程序和表单中都有广泛的应用，例如：
- 酒店预订系统：用户可以输入入住日期和离店日期来查询可用房间。
- 薪资管理系统：用户可以输入薪资发放的起始日期和结束日期来计算员工的薪资。
- 数据分析工具：用户可以输入数据分析的时间范围，以获取特定时间段内的统计结果。
推荐的腾讯云相关产品： 腾讯云提供了多个与日期范围输入相关的产品和服务，以下是其中一些产品及其介绍链接地址：
- 云数据库MySQL：提供了可靠的、可扩展的关系型数据库服务，可以存储和管理日期范围数据。产品介绍链接：https://cloud.tencent.com/product/cdb
- 云函数（SCF）：为开发者提供无服务器的事件驱动型计算服务，可以用于处理日期范围输入的验证和计算。产品介绍链接：https://cloud.tencent.com/product/scf
- 人工智能服务（AI）：腾讯云提供了多个人工智能相关的服务，可以用于日期范围输入的语义理解和处理。产品介绍链接：https://cloud.tencent.com/product/ai
请注意，以上推荐的腾讯云产品仅供参考，具体选择还需根据项目需求和技术要求进行评估。
相关·内容
我想将vba公式应用于指定的单元格。我正在开发的vba是这样的:如果我在C2上输入一些东西，一个日期戳就会自动放在D2中。 Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 3 Then Exit Sub
If Target.Cells.Count > 1 Then Exit Sub
With Target.Offset(0, 1)
.Value = Now
.NumberFormat = "MM/DD/YYYY"
End With
End Sub 但是，如果我在C
浏览 22提问于2020-06-19得票数 0
回答已采纳
我已经在excel中创建了一个VBA用户表单，并希望将可以输入到标签为“日期”的文本框中的内容限制为在另一个工作表的单元格中列出的日期列表。
这个是可能的吗？或者从特定的单元格填充列表框？
浏览 1提问于2016-10-02得票数 0
2回答
我想用VBA更改单元格的日期格式，但我不知道。以下面的例子为例，A列是输入，B列是输出，这在泰国日历中是必须的.
我的目标是将Sheet1列A中的值提取到具有转换日期的许多页中.
浏览 2提问于2019-10-14得票数 1
回答已采纳
我正在尝试找到一个VBA代码，当数据是复制并粘贴到同一行的C列中时，它将自动在A列中输入当前日期。
我想出了如何在手动将数据写入C列时自动输入日期，但当我将数据粘贴到中时，这将不会使工作：
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("C:C")) Is Nothing Then
With Target(1, -1)
.Va
浏览 2提问于2020-08-26得票数 0
回答已采纳
在Excel2010 VBA中，我正在测试以确保我的代码能够正确处理无效的用户输入。我正在使用CDate来验证日期输入。我发现在输入无效日期"0/5/14“的情况下，CDate会返回日期5/14/2000。
这是一个CDate错误，还是我漏掉了什么？在Excel工作表单元格中，"0/5/14“的计算结果不是日期。
同样，Excel VBA中的Year("0/5/14")返回2000，而Excel工作表单元格中的=Year("0/5/14")返回错误。
Windows区域设置为英语美国，因此月/日/年是标准设置。
浏览 4提问于2014-05-08得票数 2
如何使用Excel单元格内容(日期)搜索另一个工作表上的某个区域，并返回该区域中该日期右侧的单元格中包含的该日期的相关信息。我需要检查日期是否是工作日而不是假日，以及是否是月底。该范围内有
Column 1 Column 2 Column 3 Column 4 Column 5
Date Day of Week BD or WE HD or NH Y or N
BD =工作日，WE =周末，HD =节假日，NH =非节假日，Y=月末，N=非月末从2011年到2016年的每个日期都在该范围内计算
我想使用用户在工作表的单元格中输入的日期
浏览 2提问于2011-09-17得票数 0
我希望在Excel中创建一个UserForm1，当用户添加开始日期和结束日期时，它将在一个table1中创建新行，使用VBA填充如下所示：
Example: User enters - START DATE: 5/9/2020 & END DATE: 5/16/2020
表返回(添加到table1中的行和计算)：
DATE COUNT P1/P2 START DATE END DATE
5/9/2020 1 1 5/9/2020 5/16/2020
5/10/
浏览 1提问于2020-05-11得票数 1
回答已采纳
1回答
动态范围的excel公式
、、、、
我用excel创建了一份报告。其目的是将数据粘贴到“数据”选项卡中，并刷新工作簿，以填充包含图表和透视表的所有选项卡。
我有其他列，这些列包含基于输入的数据填充的公式。每个提取将有不同的行数，因此我希望这些列只根据输入的数据中的行数填充。是否有办法做到这一点，并避免不得不拉下公式或删除额外的公式？就像一种动态范围？
例如:假设我的摘录有10行数据。我的A栏是开放日期，B栏是截止日期。如果我想让C列在数据输入有周转时间(关闭日期-开放日期)时自动填充，我怎么能这样做，只向下10行？
让我们说，接下来的几周数据提取有20 rows...could，我有列c填充所有20行，这次不用再拖公式10行了？
浏览 2提问于2017-01-16得票数 0
回答已采纳
我有表格的日期在A列，我需要找到最新的日期和筛选前7天的最新日期。我只在网上找到了vba代码，它需要今天的日期--7天，但我不能使用它，因为这些日期是去年的。
拜托了，谢谢！
编辑：
谢谢你的建议。我试图把它放在我的vba代码中，但是它过滤了0的结果。
Sub Filter()
Dim maxDate As Date
maxDate = WorksheetFunction.Max(ActiveSheet.Range("A:A"))
ActiveSheet.Range("A:A").AutoFilter Field:=1, Criteria
浏览 0提问于2018-10-16得票数 0
我在C2中有一个公式，=A2+B2说。每当C2更改值(实际值，而不是公式)时，我希望在D2中更新当前日期和时间。
我已经尝试了很多VBA代码和技巧，如果在C2中输入了公式，它们都不起作用。但是，如果我在C2中手动键入一个值，则日期和时间将根据需要进行更新。当然，这是因为输入/更改了一个实际值--也就是说，公式保持不变。
问题：是否可以创建一个VBA代码(或其他代码)，以便在C2中的公式结果发生变化时更新D2？
如果可能的话，我需要对单元格C2:C30 (+ D2:D30用于date+time)进行活动。
使用Excel 2010。
浏览 7提问于2012-02-16得票数 5
回答已采纳
1回答
我有一个代码，当用户单击按钮时，系统会比较当前日期和书面日期，然后用适当的颜色填充单元格。
问题是，如果在两天前我写了10-16-2017年，它将用红色填充背景。如果我今天检查的话，它必须把颜色变成黄色。问题是，一旦单元格被着色，它就不会改变颜色。
示例：
日期10-16-2017是写在3前，所以最初的颜色将是红色。
今天是10-16-2017年，所以当我按下按钮时，它必须变成黄色。
，这是我的代码：
Private Sub CommandButton1_Click()
Dim i As Integer
For i = Range("C5000").End(x
浏览 1提问于2017-10-16得票数 0
回答已采纳
我有一个很长的excel，包含日期和许多值列。我想要创建一个动态过滤器，用户可以在两个单元格中输入日期范围，每个列的值将由日期范围进行过滤，并显示根据筛选值计算的聚合值。
例如，在表中：
Row year weight_pounds gestation_weeks
1 2005 6.0627122049999995 38
2 2006 7.12534030784 40
3 2007 7.4406013425 39
4 2008 3.30032006214 43
5 2009 7.109907
浏览 4提问于2017-03-03得票数 0
回答已采纳
1回答
我有一个VBA代码，可以帮助用户通过为特定任务输入完成日期或天数来安排项目，然后创建一个显示项目完成百分比的图形。
VBA代码取决于单元格的格式以执行其计算。Excel在用户第一次输入值时正确选择数字或日期方面做得很好。但是，如果用户输入一个日期，然后决定输入一个数字(例如: 7)，他们最终将以1/7/1900作为日期，这将使excel不能正确地执行VBA。
有没有办法让Excel在单元格每次更改时“重新考虑”它的格式？如果没有，有没有办法在VBA中强制它这样做，并且只选择数字或日期格式？
谢谢,
-MK
浏览 2提问于2014-04-17得票数 0
我是VBA代码的新手，我有一个从1月到12月的值的下拉列表。我手动添加了到12月的日期。在我当前编写的代码中，如果我选择Jan，它将复制我输入的范围。当我选择jan或任何其他月份而没有指定范围值时，我需要自动选择Jan整月日期。这个是可能的吗？
For Each cel In Range("D2")
If cel.Value = "Jan" Then
Sheets("Actuals").Range("K1:AO1").Select
'copy required data to new sheet
Sheets("
浏览 2提问于2020-02-21得票数 0
我有VBA代码，允许用户输入日期并将输入的日期与当前的日期进行比较，以便以适当的颜色填充单元格，我正在使用Select语句。
我需要让单元格填写红色，用户输入的日期是当前日+ 10天。
怎么做的？
代码
Private Sub CommandButton1_Click()
Dim i As Integer
Dim objDate As Date
MsgBox (objDate)
For i = Range("C5000").End(xlUp).Row To 2 Step -1 'Range upto 5000, chnge this as per your r
浏览 2提问于2017-10-09得票数 0
回答已采纳
3回答
再次感谢您阅读我的问题。我正在列范围中输入一个日期，我注意到使用以下方法输入的两个日期在格式上存在差异。方法1:我有一个定制的用户表单，可以在中看到的活动单元中输入日期
方法2:我一起使用Cntrl+：来输入日期。
我虽然有相同的单元格格式，但我注意到两个日期的不同，这是我在excel中使用LEN公式调查的。
LEN给我的日期05.08.2021为10，方法1和方法2，LEN是5。在下一步，我使用这个日期来导出日历周数字，因为在两个方法中有差异，我得到错误使用方法1，它与方法2很好地工作。很可能是因为方法1持有一个非常长的s值，因为在我的日历周vba中，我有这个数字作为整数，我得到了错误。
谢
浏览 6提问于2021-08-05得票数 0
1回答
我试图将下面的公式转换为VBA语法。我的目标是，当用户输入从单元格(“A4”)开始的日期值时，从单元(“F4”)开始的相邻单元格将返回Day名称。但是，如果最后一行的单元格(“A4”)中没有日期值，则F列中相应的相邻单元格不应该有一个值。
我有一个excel公式的语法是
=TEXT(WEEKDAY(A4),"dddd")
作为一个VBA录音机，我得到的是以下内容：
Sub Day_Names()
Range("F4").Select
ActiveCell.FormulaR1C1 = "=TEXT(WEEKDAY(RC[-5]),"
浏览 1提问于2015-05-22得票数 3
回答已采纳
1回答
使用excel中的VBA，我有一个代码，将输入的日期与当前日期进行比较，根据结果，系统将以正确的颜色填充单元格。
代码在四种条件下进行比较。如果输入的日期减去当前的日期是：
=0
小于0
在1至4之间
在4至10之间
使用IF语句，但是系统给了我一个错误，错误在哪里，以及如何修复它？
代码：
Private Sub CommandButton1_Click()
Dim i As Integer
For i = Range("C5000").End(xlUp).Row To 2 Step -1 'Range upto 5000, chnge
浏览 3提问于2017-10-10得票数 1
1回答
我有一个excel表单，我与VBA一起创建的。在表单中，我有一个文本框，用户要在该文本框中键入日期。
我创建了这个VBA子句，以确保用户类型在支持xx/xx/xxxx.格式的日期中。
If Not IsDate(textboxDate1.Text) Then
Call MsgBox("Please select a correct Date format", vbOKOnly)
Exit Sub
End If
但是，使用此VBA代码，不管用户是否需要输入日期，用户都必须输入日期。因此，当我有另外4个文本框在我的表单中输入日期时，用户只需要输入1个日期，而不是5个，我就会
浏览 2提问于2012-08-08得票数 3
回答已采纳
有人知道如何在Microsoft Excel中获取行中的最早日期吗？每一行上没有可预测的列数，并且需要忽略日期以外的其他值。它可以使用Excel公式或VBA来完成。
有人有什么建议吗？
现在，我正在使用这个又快又脏的VBA函数，但是当我加载新的输入数据(大约200行乘100列)时，出现了一个消息框，指出Excel没有足够的资源来处理我的更改。
' returns smallest date on row
Public Function getSmallestDateFromRow(r As Integer, sheetName As String) As Date
Dim to
浏览 0提问于2013-04-02得票数 0
回答已采纳
我正在使用Excel工作表来跟踪特定的时间序列(如果您一定要知道，我每天的体重)。我创建了一个宏，它插入一行，自动添加今天的日期，并根据我的输入计算移动平均值。
还有一个图表可以直观地显示我的进度。我曾尝试录制一个更新图形中时间序列的宏，但没有成功。
如何创建宏或VBA脚本，以便在执行时将图形的范围从A(x):Cy更新为A(x-1):Cy，以包括今天的测量值？
谢谢!
浏览 1提问于2010-03-19得票数 2
回答已采纳
理想的情况下，我不想深入到VBA与此，因为我已经不是最伟大的EXCEL。这是我的情况，提前感谢任何能帮忙的人！
称为“工作负载”的工作表第1行中的每个单元格都是上升日期。所以，A1 = 1/1/2016 - B1 = 1/2/2016 - C1 = 1/3/2016等等.
在另一张名为“传奇”的书中，我有这样的公式：
=COUNTIF(workload!$A$2:$AE$66,"some text string")
“工作负载”中有65行实际的非标头数据(第2-66行)。这个公式在A2-A2 66的任何单元格中查找“某些文本字符串”的所有实例(我的所有非标头数据)。实际上，这给
浏览 7提问于2016-01-22得票数 1
回答已采纳
1回答
我有一个在我的Excel VBA应用程序上运行的高级筛选器，它应该过滤数据库中的日期，我在工作表上创建了高级筛选器，它工作得很好，但当涉及到筛选日期时，这是我使用的公式：
=IF(C5="",">1","<=" &C5) start date
=IF(C5="","<60000","<" &C5) end date
我尝试删除<60000中的引号，但收到错误。筛选器不会筛选请求的日期。例如，我要求过滤2018年9月20日和2018年9月30日之间的日
浏览 2提问于2019-04-24得票数 1
1回答
我使用VBA来捕获单元格中的日期输入。我遇到的问题是，如果单元格为空，则VBA将其读取为12:00 AM，因此我在VBA中的ISDATE()函数将其视为日期，但代码会出现故障，因为它不是实际日期。哪些VBA语法可以自动检查以验证单元格包含日期？
这是我当前的语法
Sub IsDate()
Dim d1 As Date
d1 = CDate(Range("A1").Value)
If IsEmpty(Range("A1")) = False Then
If IsDate(d1) = True Then
'Continue
End
浏览 0提问于2016-11-18得票数 0
回答已采纳
1回答
我需要一个公式的帮助，这个公式我已经修改了一段时间，但通过vlookup，indexmatches，sumproducts等都没有成功。
基本上，在一个选项卡“每周摘要”中，我在单元格H2中包含了日期，该日期将仅设置为星期一。我需要一个公式在单元格B3中，将查找到一个不同的选项卡“原始数据输入”基于此日期在单元格H2中，并返回前一周的值的总和(前5个金额使用原始数据输入选项卡上的工作日公式)。
例如，如果这是今天，11月14日，我想要从11月7日到11月11日的值的总和。
如果不对不同的日期执行5次单独的vlookup，这是可能的吗？
Ps。我最终会将其形成一个宏，但由于在进入该阶段之前我有许
浏览 0提问于2016-11-14得票数 1
如何将输入框中的用户输入限制为字母、数字和字符‘-’？我尝试了以下代码。
For I = 1 To Len(UserInput)
If VBA.Asc(VBA.Mid(UserInput, I, 1)) >= 65 And VBA.Asc(VBA.Mid(UserInput, I, 1)) <= 90 Or VBA.Asc(VBA.Mid(UserInput, I, 1)) >= 0 And VBA.Asc(VBA.Mid(UserInput, I, 1)) <= 9 Or VBA.Asc(VBA.Mid(UserInput, I, 1)) = 45
浏览 4提问于2016-04-04得票数 0
1回答
我有一个包含账单日期的‘账单’(A10:B50)范围，有些账单是在同一天支付的，所以结尾处有重复和空白。我有一个范围'Consolidated‘(D10:E30)，它将日期和账单金额合并到单个条目中。当我点击“Consolidated”中的日期时，它会使用条件格式突出显示账单范围内的各个条目。我使用以下内容来获取我正在单击的日期：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Range("C40").Formula = "=" & Target.
浏览 10提问于2017-07-01得票数 1
回答已采纳
3回答
填写缺失日期
、、、、
我正在处理大数据集，手工填充丢失的日期是非常乏味的工作。我想通过应用Excel公式或VBA代码来自动实现这一点，这可以帮助我填充所有这些缺失的日期。
请看下面的数据。
第一个表是我得到的输入，我想要第二个表作为输出。黄色单元格显示缺少的日期，该日期应与其上一行相同。
浏览 24提问于2015-12-28得票数 0
回答已采纳
1回答
因此，我有一个包含多个工作表的工作簿，每个工作表中的每一行都对应于不同的产品，并且有产品到达的日期以及其他一些信息。
我有一个名为"GRN-Date Search“的工作表，允许用户输入特定信息，并让VBA搜索工作表并复制和粘贴信息。
但是，在搜索用户定义的日期范围时，我遇到了困难。
这是我为一个单独的约会准备的，给你一个想法。我是VBA的新手，所以我不确定是否可以对日期范围使用.find函数。
如果您能提供任何帮助，我们将不胜感激。
Sub DateSearch_Click()
If Range("B3") = "" Then
浏览 4提问于2017-07-31得票数 1
1回答
我正试图找出如何以最干净的方式来做这件事。我需要一个公式，将输出双周日期或月的最后一个工作日，只有当一个双周的日期没有在该日期，并发生在下一个双周日期之前。将手动输入列表中的第一个日期，公式将使用该日期作为第一个日期。例如：
2014年5月15日(人工输入)
2014年5月29日(根据以前的单元格输出下一个双周日期的公式)
2014年5月30日(根据最后一个日期输出最后一个工作日的公式)
2014年6月12日(..and等)
(2014年6月26日)
(2014年6月30日)
2014年7月10日
2014年7月24日
2014年7月31日
我希望这是合理的。我更喜欢使用公式而不是VBA来做这
浏览 1提问于2014-05-15得票数 0
回答已采纳
1回答
我有两本练习册。一次包含每周更新的动态数据(动态数据透视表)。另一个包含需要在其中输入此数据的主表。 在VBA中，如何根据标题的匹配项复制和粘贴数据？这两个表具有相同的标题(即日期)。工作表1具有从单元格G6开始的标题，并且随着新日期的添加，标题每周增加一次。 我想写一个宏，如果两个标题匹配，它会将数据从一个工作簿复制并粘贴到另一个工作簿。 亲切的问候 D
浏览 32提问于2019-09-10得票数 0
我在一个单张excel中有一个表格，其中的字段是日期和连续的哥伦布，用来输入不同面值的货币的数字和末尾的总列。
这张表每天加一行。
我想把列头(例如，2000,500,200等)乘以。有最近一天的面额号码。表示标题行×表的最后一行。
我不能使用最后一个空白行来实现这一点，因为表下面有不同的其他数据。
我还在寻找一种不涉及VBA的解决方案。
所以有人能帮帮我吗。
浏览 3提问于2021-07-24得票数 2
回答已采纳
2回答
你好，所以我写的代码在VBA excel，将访问一个数据库从一个网站。你必须在网站上输入你想要的数据的日期。它们是单选按钮，所以我想知道如何在vba代码中访问它们，以便它总是单击该按钮。另外，其中一个选项有一个日历视图，用于输入开始日期和结束日期。您将如何在vba中访问这个。谢谢大家的帮助。
这是一个访问一个按钮的想法。
IE.Document.getElementsById("(HTML Button Id)").Item.Click
浏览 1提问于2018-05-17得票数 1
回答已采纳
我正在尝试使用vba自动选择数据透视表的报表筛选部分中的日期。其思想是用户在运行宏之前输入开始日期和结束日期。代码将首先清除所有筛选器，然后选择在指定日期之间出现的所有日期。我有下面的代码，只要存在指定日期的数据就可以工作，但当没有数据时会抛出错误。任何对解决这个错误的帮助都将受到高度的感谢。
代码：
Sub PivotFilter()
Dim pvtF As PivotField
Dim pvtI As PivotItem
Dim StartDate As Date
Dim EndDate As Date
Sheets("Report").Activate
StartDat
浏览 4提问于2017-05-22得票数 0
我正在寻找以下问题的解决方案：
我需要向Excel工作表上的特定范围添加验证。验证应该允许任何日期和简单的字符串输入，如"done“或"tbc”。
我知道如何仅通过VBA为日期添加验证，但我找不到在一个单元格中使用两种验证类型的方法。
我的问题有什么解决方案吗？
非常感谢你提前
浏览 1提问于2016-06-06得票数 1
因此，我一直在尝试自动化电子表格上的一些功能，并且在很大程度上已经使我编写的VBA代码按预期运行。但是最让我抓狂的是自动填充应用程序用户名。所以我以Sub的身份运行它，因为我有几个不同的函数在运行，这是代码。
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A4:A198")) Is Nothing Then
Call AutoName
End If
End Sub
Sub AutoName()
Dim myCell
浏览 13提问于2019-11-08得票数 0
我有一个Access表单-让我们称之为“添加劳动力”(Access 2007)，它可以将数据保存到表中。
该表有两列，分别称为“开始日期”和“结束日期”(该表存储任务)。
还有另一个名为FiscalYears的表，它包括会计年度的开始日期和结束日期，其结构如下
FyID FYear StartDate EndDate
示例数据：
FYId FYear StartDate EndDate
-----------------------------
1 2010 10/1/2009 9/30/2010
2 2011 10/1/2010 9/30/2011
因此，在我的“添加劳动
浏览 5提问于2010-09-20得票数 1
回答已采纳
在两个单元格中输入我想要的日期范围后，我正在尝试使用命令按钮在excel中创建一个“报告生成器”来生成报告，sheet1的B2和D2只包含日期(从2019年1月1日到2019年12月31日) 我尝试将这两个日期链接到每个工作表中的其他12个工作表(每个月)，每一天包含50行和40列，以单元格B2、B52、B102、B152...ETC中的日期开始。 我成功地做了以下(简单的部分)在月表中使用命令按钮(VBA)只显示我想要的一天的50行，我能够隐藏不需要的行，在单元格A1中选择日期(带有日期下拉列表)并单击单元格A2中它旁边的命令按钮，使用日期数量(43466 =2019年1/1,43467
浏览 21提问于2019-05-21得票数 0
我正在使用Microsoft Access进行操作。现在我想列出两个日期之间的日期。
例如，输入: 1-1-2010和5-1-2010给出这些值。
1-1-2010
2-1-2010
3-1-2010
4-1-2010
5-1-2010
如果可能的话，我想用SQL做这件事，否则用VBA。
浏览 2提问于2010-10-25得票数 2
1回答
我需要用VBA将数据输入到线图中。当我在原始测试中使用Excel时，我需要给出一个基本的一维范围。问题是，现在我需要在VBA代码中隐藏一些东西，这样用户只需单击一个按钮就可以看到一些基本输入所产生的曲线。
我认为至少有两种选择：
之前将图表对象放置在Excel中，并让它指向某些VBA片段。在这种情况下，我应该从Excel中以某种方式指向VBA吗？或者VBA会通过某些ID访问图表区域吗？
从VBA、图表窗口、图表和系列输入动态创建所有内容。这可能会更棘手，因为我已经冻结了窗格，因此会有一个问题:哪个窗格是活动的(我希望避免选择正确的窗格)
你有什么建议？在这两种情况下，如何才能真正做到这一
浏览 2提问于2011-12-01得票数 0
回答已采纳
1回答
我正在使用VBA Cells(emptyRow，2).Value = "TODAY()“将日期输入到一个单元格(B2)中。
这将显示美国格式的日期，例如03/04/2015 (2015年3月4日)
如果我直接在单元格中输入公式=TODAY() (而不是使用VBA)，它将以UK格式显示日期，例如04/03/2015 (2015年3月4日)。
谁可以帮助我的原因，请和如何保持它在英国的格式，无论用户的地区设置是什么。
浏览 3提问于2015-03-04得票数 0
我有这个代码来检查日期，并根据日期用颜色填充单元格。
我需要的是，当用户打开文件并写入日期时，系统将直接检查日期并填写正确的颜色。
发生的情况是，在用户输入日期后，他需要单击宏图标，以便代码执行操作。
代码：
Sub test()
Dim i As Integer
Dim OfficerList(4) As String
For i = Range("C5000").End(xlUp).Row To 2 Step -1 'Range upto 5000, chnge this as per your requirment'
Select Case
浏览 0提问于2017-10-06得票数 0
我试图让用户在一个单元格中输入一个日期。使用输入日期和今天的日期，我将计算自用户输入日期以来已经过去了多少天。
例如:用户在单元格(C4)中输入"2/15/2019“--第二天显示"1天/秒”等等。
我已经搜索并尝试了很多事情，但都失败了，我对excel或VBA一点也不精通，所以我甚至不确定这是否可能。
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("L:L")) Is Nothi
浏览 3提问于2020-02-15得票数 1
回答已采纳
1回答
我试图了解Excel如何处理日期格式和日期值。
问题的上下文：
我的应用程序具有以下体系结构
Excel客户端: 2016法语与windows 7法语
SQL server数据库
在Excel工作簿中，工作表有一个用于捕获数据的Change事件处理程序(为了解释的简单性，假设有所有日期)并将输入值保存到数据库中。值被捕获并保存为字符串，加载为文本，并在工作表中格式化为日期。
在工作表中，Change事件处理程序处理用以下代码跟踪的输入(从数据库加载数据时禁用事件处理程序)。
With Target
Dim mydate As Date
mydate = CDa
浏览 0提问于2018-11-21得票数 0
2回答
我在用户表单中有一个文本框，帮助用户将日期添加到我的数据库中，用户必须输入这种格式的代码："2019-254“("a -3数字”)。如果teh格式不正确，则msg似乎会告诉用户使用正确的格式重复操作。我知道如何在处理像折叠代码这样的日期时做到这一点：
Private Sub Valider_Click()
If Not IsDate(TextBox_Date) Then
MsgBox "Please enter a correct date:10/09/2019", vbCritical
Else
ws.Cells(24, Fin_Col_IT + 1)
浏览 5提问于2020-07-27得票数 0
回答已采纳
2回答
我试图在VBA中创建一个条件格式规则，它将只更改当前日期的单元格背景色。我有一列今年的日期。我也在使用Office 2010。
oSheet.Range(Cells(iStartRow, 1), Cells(iLastRow, 1)).FormatConditions.Add xlCellValue, xlEqual, "=" & Cells.Address & "=" & Date
我正在尝试识别当前单元格的地址，以便将其与今天的日期进行比较。请记住，此公式将根据不同日期的列进行检查。
我可以很容易地在Excel中创建条件格式，但是我尝
浏览 4提问于2015-02-04得票数 1
回答已采纳
我需要一个更灵活的XIRR前端，它可以组合任意数量的现金流和日期范围，因此我从
Public Function vbIRR(ParamArray args())...
接下来的一切都运行得很好，这样当我调用
=vbIRR(A1:A10,B1:B10)
我得到了一个很好的答案。问题是，我的A1:A10可能与执行有效的XIRR计算所需的符号相反。当然，我现在可以调整我的VBA，但更普遍的是，我应该能够简单地编写
=vbIRR(-A1:A10,B1:B10)
它不起作用。调试VBA，我可以看到args(0)是"error 2015“。(我还注意到，标准XIRR也会出现类似的错误。)
这很奇怪
浏览 0提问于2017-02-18得票数 1
我想执行一个带有来自excel的日期参数的sql server存储过程，该日期参数是电子表格单元格中的输入。是否可以在不使用VBA的情况下执行此操作？我的目标是每次在excel文件中设置新的日期值时都能获得动态结果，我找到的示例都是在使用excel文件中的动态参数时使用vba。如果有办法在没有vba的情况下做到这一点，请提供帮助。提前感谢
浏览 5提问于2018-03-23得票数 0
3回答
目前，我有一个非常大的电子表格(40k+行)，数据包括“名称”、“日期”和“值”列。格式是统一的。我希望能够用相同的“名称”和“日期”对所有“值”求和。例如：
Name date value
peter 201103 7
pan 201103 9
felix 201104 9
peter 201104 12
peter 201104 17
现在，我想将日期为"201104“的所有"peter”的值相加。一种方法是SUMFS，但这不是我可以使用的(仅使用excel 2003 )。我尝试的另一件事是首先通过输入框自动筛选日期，然后使用SUMIF对具有相同名称的值进行求和。问题: S
浏览 2提问于2011-12-13得票数 3
回答已采纳
我有一个宏，如果条目的日期大于2周，它就会从表中剪切出单元格。然后删除这些单元格。然而，这会导致我的格式化数据输入区域每次都变短，所以我试图找到一种方法来解决这个问题。我的想法是写一篇文章，从最后一个格式化的行复制格式，并将其粘贴到它的正下方，但我不确定如何在VBA中执行此操作。我是VBA的新手，不知道是否有人知道如何帮助我？谢谢!
浏览 20提问于2020-07-31得票数 0
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
