Tag: timestamp

Excel VBA时间戳不更新

我有一个工作表，我正在build设，将跟踪我们的传入预告片，并把这些信息在仪表板上。 我有VBA安装程序，当用户将列A中的单元格从这里更改为closures时，它会将该行复制到下一个将保留预告片历史的工作表。 我的问题是VBA的时间戳完成的页面上没有更新时复制行。 我知道vba的作品，因为我可以更改完成的工作表上的拖车编号，它会触发vba和时间戳会出现。 但是我需要时间戳来显示从仪表板表复制行。 我是否错过了需要打开的东西，这将有助于触发时间戳？ 谢谢 编辑 – 对不起，我没有添加代码。 这是我已经完成的工作表上的时间戳 Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("C2:C10000")) Is Nothing Then Exit Sub If Target.Count > 1 Then Exit Sub If Target = "" Then Exit Sub With Application .ScreenUpdating = False .EnableEvents = False With Cells(Target.Row, 10) .Value = Now .NumberFormat = […]

对象范围的Excel VBA方法“ClearContents”失败

我已经看过有关“对象范围方法失败”的类似问题，但似乎没有人帮助我解决问题。 我收到的错误是：“对象范围的方法'ClearContents'失败” 基本上我想要实现的是，如果BG21的单元格值为1，并且相邻单元（BH21）中string的长度为0，则为相邻单元（BH21）添加时间戳。 理想情况下，我想重复这个范围（BG21：BG35）。 我知道我可以使用每种方法，但我想先清除这个错误。 我不想使用单元格公式，因为在单元格BG21更改为1时，我需要时间戳记。如果使用单元格公式，则随时打开工作簿，时间戳记将更改。 我有的代码是： Private Sub Worksheet_Change(ByVal Target As Range) Dim wb As Workbook, ws As Worksheet Set wb = ThisWorkbook Set ws = wb.Worksheets("Submittal Kickoff Meeting") If (ws.Range("$BG$21").Value = 1 And len(ws.Range("$BH$21").Value) = 0 And Target.Address = ws.Range("$BG$21")) Then ws.Range("$BH$21").Value = Format(Now(), "m/dd/yyyy hh:mm:ss AM/PM") Else ws.Range("$BH$21").ClearContents '<— Error occurs here […]

如何从R中的excel中以HH：MM：SS格式导入时间戳和持续时间？

我有一个Excel表格 ，其中包含HH:MM:SS格式的时间戳 。 但是，在将导出的CSV读入R后 ，相应列data$timestamp中的值将被解释为一个巨大的小数字（例如， 7,06018515869254E-04 。 我怎样才能让R来解释这些数字呢？ 我试过以下没有任何成功（产量NA ）： timeTest <- data$timestamp[1] print(as.POSIXct((timeTest – 719529)*86400, origin = "1970-01-01", tz = "UTC")) print(as.POSIXct(strptime(timeTest, %Y%m%d %H%M%S"))) 一个提示如何实现所需的格式将非常有帮助！ 以下是实际的CSV示例： 0,692210648148148|0,692534722222222|3,24074074074088E-04 当我使用| 作为分隔符，我导入数据如下： data <- read.delim(file,header=TRUE,sep="|")

定期删除重复的单元格

我在删除以下工作表中的重复的单元格时遇到问题。 E栏是小时，F栏是时间戳的分钟，我想组织。 我想要做的是在一个小时内删除所有包含重复分钟的行，以便每5分钟读取一次我的电stream和功率。 问题在于，有时你会在一分钟内得到5次，有时甚至是6次读数（因为读数是每9,10或11秒）。 另一个问题是，我不能简单地删除所有重复的细胞一天，因为模式每小时重复它自己，如果我简单地select所有细胞，只留下一小时的读数。 我在下面的代码中试图通过双击第一个出现的第一个“E”单元格在一小时内删除所有具有双精度值的行。 它在第一个小时内（0：00-0：55）应该可以工作，但是对于后面的数字（小时）它开始删除额外的行。 下一个合乎逻辑的步骤是，当天删除所有双重值。 整个事情不需要用户友好或互动，我只是想过滤5分钟的阅读，如果没有别的，粘贴到一个新的工作表进行进一步分析。 这是工作表的一个打印屏幕 ，包含数据 Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Dim clickedRow As Long Dim clickedValue As Long Dim currentValue As Long Dim counter As Long clickedRow = ActiveCell.Row clickedValue = ActiveCell.Value For i = clickedRow To (clickedRow + 100) currentValue = Range("E" & i).Value […]

将'yyyymmdd hhmmss'转换为'mm / dd / yy hh：mm'

我有一行数据（单元格A3和下）包含一个Unix时间戳yyyymmdd hhmmss格式，我试图自动转换为mm/dd/yy hh:mm格式。 我到目前为止的代码工作，当我有单元格A1开始的数据，但我需要保持空白，因此数据从A2开始。 以下是列A的示例屏幕截图： Sub auto_open() ' ' auto_open Macro ' ' ChDir "C:\" Workbooks.Open Filename:="C:\Users\username\Desktop\file1.csv" Intersect(Sheets("file1").Range("A:EW"), Sheets("file1").UsedRange).Copy ThisWorkbook.Sheets("Golden").Range("A2") Windows("file1.csv").Activate Application.CutCopyMode = False ActiveWorkbook.Close SaveChanges = False Dim x As Integer Dim y As String Dim z As String Dim w As String NumRows = Range("A3").End(xlDown).Row Windows(ThisWorkbook.Name).Activate For x = 2 To NumRows z […]

Excel默认date时间格式yyyy-mm-dd hh：mm：ss与yyyy-mm-dd hh：mm

我正在使用Excel 2010或Excel 2007导入带有date/时间信息的CSV文件。 我的CSV文件中的时间戳有以下格式：yyyy-mm-dd hh：mm：ss。 （例如：2015-07-17 12:34:56） 我的问题是，Excel似乎自动检测该字段是一个date/时间，它是删除第二个。 因此它显示我的数据为：“2015-07-17 12:34”没有第二个。 然后，当我再次保存我的文件在CSV第二个被丢弃，不存在于CSV了！ 我发现将所有文件的自定义单元格格式从“yyyy-mm-dd hh：mm”更改为“yyyy-mm-dd hh：mm：ss”非常耗时。 有没有办法在Excel设置或Windowsregistry中更改默认date/时间格式？ 当我打开并保存其中包含数据/时间信息的CSV文件时，什么是强制Excel保持第二的最佳（正确）方法。 谢谢，ssinfod

Oracle SQL Developer中的Exceldate字段导入问题

我有一个Excel文件（其中有从Oracle 10G数据库导入的数据）其中一个字段是date归档，其值为28-JAN-11 03.25.11.000000000 PM（date字段是数据库中的Oracle时间戳（6））。 当我试图将该Excel文件导入到另一个Oracle 10 G数据库（用于其他数据库/应用程序）时，出现错误，因为数据字段未被Oracle 10G识别 – >导入正在由ORACLE SQL Developer（表（字段）具有TIMESTAMP（6）作为数据types） 我如何导入该字段？ 暂时我做了TIMESTAMP VARCHAR2和它的工作，但我不能再转换成date字段在C＃代码（它说，不是一个有效的datetypes）。