Tag: date格式的

优化date转换循环: 我有一组数据（n），约有1500个项目长满DD.MM.YYYY格式的date，Excel无法识别。我的目标是改变他们擅长的事情，我就是这样做的。 Function date_to_excel() Call public_dims Dim date_i As String date_array = ThisWorkbook.Sheets("Spread").Range(Cells(7, 5), Cells(7 + n, 5)) For i = 0 To n date_i = ThisWorkbook.Sheets("Spread").Cells(7 + i, 5) If date_i <> "" Then date_array = Split(date_i, ".") date_i = date_array(1) & "/" & date_array(0) & "/" & date_array(2) ThisWorkbook.Sheets("Spread").Cells(7 + i, 5) = […]

从不同的数据中返回date，其中date格式为文本，date的数字从1到2不等: Data —————–| —– Formula —|——————- Date (Output) —————————— (name – Aug 7, 2015) ——————————————————— 07/08/15 | -'}{[]//-;'; (lots of characters) (name – Aug 7, 2015) ——————-07/08/15 长度总是变化很大（名称也变化 – 2015年1月27日） – 27/01/15 Varied text (name – Aug 17, 2015) —————————————– 17/08/15 与数据的问题是，它使用几个字符，并不断变化，并且一些date显示一个数字较短，（例如（名称 – 2015年8月17日）（名称 – 2015年8月7日））使其难以使用=右边和=中间的位置变化（从阅读停止Excel作为date，我已经包括了下面的图片，因为我知道我的数据不是以一个干净的方式显示，提前道歉。以下是我尝试过的一些公式： =DATEVALUE(MID(A2,FIND("-",A2)+1,LEN(A2)- FIND("-",A2)-1)) 由于符号太多，无法返回正确的值。 =RIGHT(A2,14) , =SUBSTITUTE(RIGHT(C2,14),")","") , =datevalue 无法在一天中提取一位数的date。

按月份总结date – 擅长: 我有一个date列日/月/年，即时试图总结他们按月和年。例如。如果我有01/01 01/01/2012, 23/01/2012 01/2012 | 2我想有一个摘要表显示01/2012 | 2 01/2012 | 2 。有一个简单的方法来做到这一点？此刻我试图复制完整的date，重新格式化它只显示mm / yyyy，然后运行countif公式，但它似乎是一个复杂的方式来做到这一点，或者这是正确的方式吗？

如何返回每个moday的date编号: 对我来说是一个很大的困境，我星期一和星期五和学生上课，我无法弄清楚如何在本月或下个月回到星期一或星期五的星期几。 9月19日是星期一，下周是9月26日我想在下个月回来，星期一将是3，然后10，17 我尝试了一个愚蠢的公式，如=（19 + 7）return 26，但是然后显示33，但一个月没有33天。希望你们了解我，也许帮助我，谢谢

按特定date时间关联值的平均列: 我有一个列的时间格式为“dd / mm / yyyy hh：mm”，另一个是那个时间点的温度。我期待分别计算每个月的昼夜平均温度。 5月的平均温度在06:00到18:00之间，五月的温度在18:00到06:00之间，三月份的温度也是如此。 Time Celsius(C) 06/05/2016 10:49 28 06/05/2016 11:49 29 06/05/2016 12:49 31 06/05/2016 13:49 27.5 06/05/2016 14:49 24 06/05/2016 15:49 25 06/05/2016 16:49 24.5 06/05/2016 17:49 23.5 06/05/2016 18:49 23 06/05/2016 19:49 22.5 06/05/2016 20:49 22.5 我目前使用下面的公式： =AVERAGEIFS(C2:C3643,B2:B3643,">=01/05/2016",B2:B3643,"<=31/05/2016",B2:B3643,">=01/05/2016 06:00",B2:B3643,"<=31/05/2016 18:00") 如果date是在五月和一天之内，尝试计算一个平均数 – 但是它似乎没有工作，当我改变小时期时，它仍然吐出相同的数字（这是一个月的平均数）。

在Excel VBA中查找季度的周数: 我需要一个VBA函数，它将返回给定date四分之一的星期数。例如，1/1/2016的input将返回1，2016年1月4日将返回2，10/1/1将返回1,10/7/2016将返回2,11/11/2016将返回7 我有一个在Excel中的function，这样做： =IF(O48="","",WEEKNUM(O48)-WEEKNUM(LOOKUP(O48,DATE(YEAR(O48),{1,4,7,10},1)))+1) 但我正努力将其移植到VBA。帮帮我？谢谢！

C＃Exceldate值以数值forms出现: Excel文件是由第三方应用程序生成的。我正在编写一个实用程序来进一步处理该Excel文件。当我读取包含date值的列时，我得到一个数字string，如05/02/2016（dd / MM / yyyy）即将到达42405。我已经尝试使用.Text，.Formula，.Value，.Value2 – 所有的方法都返回数值。我知道FromOADateTime，但我的要求是读取date值作为一个string，正是它在屏幕上显示的方式。谢谢。编辑1：当我将列转换为Excel中的文本，通过使用格式单元格并select文本，所有date值甚至在Excel中转换为数值！这是否提供任何线索？第三方应用程序可能将数据存储为数字值，但Excel将其显示为屏幕上的datestring。我想读取屏幕上显示的值。编辑2：该问题没有出现在该列中的所有date值中。我的第一印象是，将date值写入Excel时，第三方应用程序不一致。但我无法控制它。编辑3：这是下载文件的链接： http : //wikisend.com/download/316956/Prob.xls 。在这个文件中，我需要从第13行开始读取列B中的所有date值作为文本下面是我的机器的外观截图的链接： http : //wikisend.com/download/443994/Screenshot1.jpg 编辑4：find罪魁祸首在我的代码与NineBerry的答案帮助：阅读Text属性之前，我打电话ws.Columns.ClearFormats（）和ws.Rows.ClearFormats（）; 我需要做到这一点：如何获得Excel表格中占用的单元格的范围 …，以便正确获取表单中使用的范围！原来的问题解决了。现在的问题是如何使用ws.UsedRange而不调用ClearFormats（）来正确获取使用单元格的范围。我的具体要求是获得在任何单元格中使用的ROWS数据范围达到Col H. I不需要在Excel中使用整个UsedRange，Col H中的UsedRange对我来说已经足够了。任何解决scheme？或者我应该发布一个新的线程？

date入住Vb.net: 我有一个问题，在Excel中，一列中包含一个唯一编号，格式如下：mmdd后跟序列号01,02 ..例如：101201（10：月，12：今天的date，01：第一个条目），101202。，我需要的是，我的vb.net表单应该采取最后input的数据（例如：101202）检查是否是今天的date。如果是，那么应该加1并显示在消息框中（是的，那么应该显示101203）。如果不是，那么它应该采用当前date并从01开始（如果date是2016年10月13日，则为101301）。我设法从上一行获取数据。但是，我应该如何检查date？请帮忙！ Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click xlWorkBook = xlApp.Workbooks.Open("C:\Users\Desktop\testing.xlsx") 'xlApp.Visible = True xlWorkSheet = xlWorkBook.Sheets("Sheet1") Dim row As Long row = 1 With xlWorkSheet While .Cells(row, 2).value IsNot Nothing row = row + 1 End While 'MsgBox(row – 1) End With Dim r […]

Excel创builddate和小时系列: 我想在Excel中创build一个列，例如A，date和时间系列，具有一定的时间步长。例如： 14.10.2016 00:00:00 14.10.2016 04:00:00 14.10.2016 08:00:00 等等….. 然后，只需拖动单元格，然后按照我想要的那样继续前进。任何想法？提前非常感谢！

Excel VBA根据系统date编写文件名: 我想在Excel中写一个VBA脚本来保存一个文件，并给出一个预定义的名字。其中一个标准是，如果不是过了上午11点，那么它应该添加到文件名“H12”。如果是过了上午11点，那么应该加上“H16”。这是我迄今为止，关于这个特定的部分（有更多的代码是不相关的显示在这里： Dim SaveTime As Integer SaveTime = Round(Timer / 3600, 0) dt = Format(CStr(Now), "yyyy_mm_dd") FolderName = "path/to/file" If SaveTime < 11 Then With Destwb .SaveAs FolderName _ & "\" & Destwb.Sheets(1).Name & dt & "H12", _ FileFormat:=FileFormatNum .Close False End With Else With Destwb .SaveAs FolderName _ & "\" & Destwb.Sheets(1).Name […]