Tag: datetime

将date与特定date时间格式(VBA)进行比较

编辑:根据答案,我可以从一个范围内获得最小/最大date: Dim dt As Date dt = WorksheetFunction.Min(Range("D2:D300")) 但这还不够。 如何用数组而不是范围使用这个函数? 原帖:我有以下几栏: 格式是: DD / MM / YYYY HH:MM 我试图从第一列中得到最早的date时间和第二列中的最新的date时间。 在这种情况下: 02/01/2017 6:07(1月2日的第一列的earlist datetime) 02/02/2017 14:11(二月二日的最后一个date) 我有一个multidimensional array(myData)与单元格的值,我的function是这些: Private Function GetLatestDateFromData() As String Dim latestDate As String Dim i As Long latestDate = myData(1, ColumnsIndex(3) – 1) For i = 1 To UBound(myData, 1) – 1 […]

Spreadsheetgear:转换为date时间时出错

我试图分析Excel工作表中的单元格值,并使用下面的代码将其转换为date时间。但我得到一个错误: 'arguments.CurrentWorksheet.Workbook.NumberToDateTime(inpDate)'抛出一个'System.ArgumentOutOfRangeException'types的exception。base:{“指定的参数超出了有效值范围。\ r \ n参数名称:无效的date – 时间序列号。 “} ActualValue:null消息:”指定的参数超出了有效值的范围。\ r \ n参数名称:无效的date – 时间序列号。 码: double inpDate = arguments.GetNumber(2); startDate = arguments.CurrentWorksheet.Workbook.NumberToDateTime(inpDate); 其中工作表中的内容是20170113。 你能build议吗? 谢谢。

在VBA中将date值列从YYYYMMDD更改为MM / DD / YYYY

我有一个表格的date值范围,显示date值为20160812.我正在寻找价值显示为08/12/2016,而不是。 这是我目前的代码: Private Sub Update_Click() Application.ScreenUpdating = False Application.Calculation = xlCalculationManual Dim path As String, fileName As String Dim lastRowUniversal As Long, lastRowOutput As Long, rowCntr As Long, lastColumn As Long Dim inputWS1 As Worksheet, inputWS2 As Worksheet, inputWS3 As Worksheet, outputWS As Worksheet Const dtFORM As String = "=IF(ISNUMBER(J4:J<r>),DATE(YEAR(J4:J<r>)-1," & "MONTH(J4:J<r>),DAY(J4:J<r>)),J4:J<r>)" 'set your sheets […]

保存date时间单元格后,pandas不会读取excel文件

我正在用pandas read_excel读取一个文件 df0 = pd.read_excel(cfname,'Calendari', index_col=0, parse_cols='A:R', converters={'Categoria':str,'Fase':str, 'Grupo':str, 'Jornada':str, 'Partido':str, 'IdPartido':str,'Leido':str}) df0.head() 输出是: Linea Categoria Fase Grupo Jornada Partido IdPartido Leido Data Hora 2 CCM 1 1 1 -1 NaN No Jornada 1 NaN 3 CCM 1 1 1 0 NaN No Data Hora 4 CCM 1 1 1 1 CCM110101 No 2017-09-30 00:00:00 […]

excel vba公式与date比较在公式中的IF函数

假设单元格A1是date:23/06/2017 现在在Excel中,如果我把下面的公式放在单元格B1中: = IF(INT(C2)>INT(2/15/2017);"Year1";"Year2") 那么它工作正常。 但是,如果我试图把它认为VBA结尾: – Set sht1 = xWb.Sheets("ProcessedData") sht1.Range("B1").Select sht1.Range("B1").Formula = _ "=IF(INT(A1)>INT(2/15/2017);""Year1"";""Year2"")" 它给我错误1004(对象未find)。 我试着用CDate,但我想,我在这里失去了一些东西。 你能帮我解决这个问题吗?

EXCEL VBA DATETIME减法

这个问题之前曾被问及我试图实现该解决scheme,但我不能得到它的工作这基本上是我正在尝试达到减去date时间值来获得总小时数,即使是超过一天然后值我想要显示的是36:03,这是格式[h]:mm,tks,下面是我试图实现的VBA代码 Sub dateissue() Dim startdate As Date, enddate As Date Dim doublevar As Double enddate = "13/2/2014 08:10:00" startdate = "12/2/2014 18:10:00" doublevar = enddate – startdate Range("D3").Value = Format(doublevar, "[h]:mm") End Sub 我在D3中的结果总是:12任何理由

VBA或Excelmacros添加1年

我有一个Excel电子表格,我想添加一个单元格中的date。 单元格B3当前的值为1/1/2014 想要创build一个macros,将该date更改为1/1/2015 似乎很容易,但我的search没有给出预期的结果。 任何帮助,将不胜感激。

Excel – date时间文本到列

我有多行的date时间数据。 例如: 1/10/2014 10:10 2/3/2015 00:03 12/3/2015 12:03 4/3/2015 08:03 2/3/2015 14:03 6/3/2015 22:03 29/03/15 08:03:40 20/03/15 19:03:25 前6行似乎已被Excel识别为DateTime,而第7行和第8行似乎是文本格式。 我无法对其执行任何date时间计算。 我尝试了“文本到列”,但是这并不能让我把date和时间保持在一起。 请指教。

Excel VBA格式“Fri Feb 27 08:45:00 CST 2015”变为可用date

目前我正在为报告目的而build立一个数据库。 原始数据将来自一个自动化的数据源,发送一个CSV到一个共享的位置。 我有一些进程,出去获取数据,然后把它放在一个共享的位置,然后我有一个Excel文档,连接设置为数据,然后将连接到数据并刷新工作簿时打开。 这个过程是完整的,但我遇到的问题是,原始数据源是导出CSV格式的date为“Fri Feb 27 08:45:00 CST 2015”(例如)。 我需要把它变成“MM / dd / yyyy hh:mm:ss”的格式。这时从供应商处获得输出格式并不是一个可行的select。 任何帮助将不胜感激,我真的不知道甚至从哪里开始,所以我没有代码发布。 我会说这将在大量的行上完成。 例如,它可能是B2:B10000

用多列写excel文档

嗨,大家好我在这里得到一个奇怪的错误,不知道是什么问题。 不幸的是有太多的可能性,我无法弄清楚。我有一些时间string,我从数据库中返回。 我想把它们放进一个带有一些随机生成值的Excel电子表格中。 任何想法将不胜感激:) import xlsxwriter # Create a workbook and add a worksheet. workbook = xlsxwriter.Workbook('Expenses042.xlsx') worksheet = workbook.add_worksheet() # Add a bold format to use to highlight cells. bold = workbook.add_format({'bold': True}) # Write some data headers. worksheet.write('A1', 'Facility', bold) worksheet.write('B1', 'Type', bold) # Some data we want to write to the worksheet. […]