Tag: date格式的

比今天更好

我怎样才能使我在这一栏只能写date更多或相等的今天,而不是过去的日子。 我需要使用macros…或…? 任何想法?

VBA – 创build新工作表并重新命名

我试图插入一个新的表格,然后用一个button重新命名为当前的月份和年份。 对于一些额外的信息:我打算稍后删除此button,以便它会自动。 Private Sub CommandButton1_Click() nowMonth = Month(Now) nowYear = Year(Now) ActiveWorkbook.Sheets.Add After:=Worksheets(Worksheets.Count)Name = "nowMonth & , & nowYear) End Sub

excel从周数和年份开始

Excel中有以下表格,其中包含年份编号和周编号: Year Week —– —— 2015 33 2014 41 2016 40 我怎样才能得到每行有相应星期五date的第三列? 因此,2015年第33周应归还:2015年8月14日星期五。 我试图使用date函数weeknum函数,但不能得到任何一致的结果。

数字到Excel的date转换(奇怪的格式)

我已经收集了一些来自sql的细节,并显示如下的生日(每一行代表不同的出生date): -294022800 649119600 -138675600 49158000 32396400 631152000 -2147483648 731894400 -408067200 522025200 我试图用这个公式来改变他们在Excel中: =DATE(INT(A1/10000),INT((A1-10000*INT(A1/10000))/100),A1-(100*INT(A1/100))) 但是它不是很好,它必须采用不同的格式。 你知道什么样的格式,以及如何将其转换为Excel中的date? 为什么有些数字是消极的? 这可以是EPOCH格式吗? 如何在Excel中将其更改为正常的人类date?

Excel公式为每月MF和TS

我必须build立一个报告,其中有两个不同的date列; 前一个月的MF,以及上个月的TS。 如果在AI列有一个从上个月的所有天的列表 A 1 | 8/1/2013 | 2 | 8/2/2013 | … 31 | 8/31/2013 | 有没有一个公式可以用在B和C列来获得必要的date?

通过VBA更改date格式为SQL查询

我有一个问题,我没有能够回答到目前为止,我的问题是,我有一个使用SQL查询来访问SQL数据库和拉取信息的macros。 在excel中,它总是强制date到DD / MM / YYYY(你可以强制格式化,但是当它传递给SQL的东西时,它仍然以DD / MM / YYYY出现,即使格式看上去是正确的)。 我已经尝试了一些更改我的代码,试图“强制”,但我没有运气,我复杂化,还是不应该这样做呢? 大声笑。 我将提供我的VB代码和“属性”,看看使用macros所产生的“连接”是什么样的。 请注意,格式需要是YYYY-MM-DD,因为这是它存储在数据库中的方式。 目前解决这个问题的唯一方法就是使用date的“inf”,例如“2013-12-01”来强制它,否则就会到2013年12月1日。 有任何想法吗? 我一直在绞尽脑汁,因为太久了。 问候杰米 如果需要该信息,则服务器是SQLEXPRESS服务器。 代码如下: Sub CustomisedSQLQuery() ' ' SQL Query to allow user customisation. ' ' Dim FileName As String Dim User As String Dim StartDate As String Dim EndDate As String Dim Category As String Dim Confirm As […]

(Excel)将时间从几分钟改为小数

我有时间格式化为4.45 (意思是4小时45分钟)如何格式化为4.75 (从几分钟到1/100小时)?

Excel VBA:重新格式化date到两位数年份的非常短的date不起作用

我有从另一个应用程序导出的date列表。 最初它们被格式化为标准格式,没有任何特殊或自动转换,格式为YYYY.MM.DD 以前,我只是用斜线代替点,Excel将date识别为date,自动将它们格式化为适当的语言环境DD.MM.YYYY ,这很好地工作。 现在,我只是想删除年份的前两位数字(新格式DD.MM.YY ),但它不以我曾尝试过的任何方式工作。 我到目前为止所做的: currentCell.Value = CDate(currentCell.Value) :这将格式切换到date,但标准的长格式仍然适用。 currentCell.NumberFormat = "dd.mm.yy;@"从录制macros和手动更改值中可以看出。 似乎没有在输出格式上有所作为。 currentCell.Value = FormatDateTime(currentCell.Value, vbShortDate) :不起作用,因为短date是DD.MM.YYYY ,而不是当前语言环境中的DD.MM.YY format(date, "dd.mm.yy")如Tom Preston和msaint所build议:与NumberFormat版本相比,不会更改输出。 我观察到另一个奇怪的事情:在每个VBA应用date更改后,通过GUI手动更改date格式不再可能/似乎没有任何影响。 这可能是什么原因,我怎么能在VBA中实现真正的短date呢?

如何在Excel VBA中减去时间?

如何在Excel VBA中减去时间? 我试图减去这两个值,但我得到这个值“2.1527777777778E-02”而不是。 这是什么意思? Timein = 12/7/16 12:00:00 AM 超时= 12/7/16 12:30:00上午 这是我的代码示例。 提前致谢。 Dim Total as Double Dim Timein as Date Dim Timeout as Date Total = TimeValue(Timeout) – TimeValue(Timein) 'Result Total=2.1527777777778E-02

如何计算两个date之间的年数

这个macros计算工作经历的第一个和最后一个date之间的年数。 我做了这个工作,但以奇怪的格式(像一个date而不是一个数字)得到这个数字。 看起来有些事情可能是错的。 在此先感谢您的意见。 Sub CuentaExperiencia() Worksheets("Candidatos").Activate 'esta macro contabiliza los años de experiencia sumados Range("T2").Select Do Until ActiveCell.Offset(0, -18).Value = "" If ActiveCell.Value = "" Then ActiveCell.FormulaR1C1 = DateDiff("d", (ActiveCell.Offset(0, -2)), (ActiveCell.Offset(0, -1))) End If ActiveCell.Offset(1, 0).Select Loop Range("AE2").Select Do Until ActiveCell.Offset(0, -29).Value = "" If ActiveCell.Value = "" Then ActiveCell.FormulaR1C1 = DateDiff("d", (ActiveCell.Offset(0, […]