将时间从一张纸传输到另一张 - 哪个暗淡选项？

我一直在努力处理下面的代码以自动将数据从一张纸传输到另一张;但是我坚持如何编写时间元素。时间格式为hh：mm，并以相同的格式传输。任何帮助将不胜感激！！将时间从一张纸传输到另一张 - 哪个暗淡选项？

Private Sub Commandbutton1_Click() 

    Dim Dateadded As Date 
    Dim Time As ??? 
    Dim nameoftask As String 
    Dim typeoftask As String 
    Dim Iffollowupwhichtaskisitfollowing As String 
    Dim Howwastaskcommunicated As String 
    Dim Whowastaskcommunicatedto As String 
    Dim Whorequestedtask As String 
    Dim Whatistaskrequiredfor As String 
    Dim Descriptionoftask As String 
    Dim Deadlinefortask As Date 
    Dim myData As Workbook 

    Worksheets("sheet1").Select 
    Dateadded = Range("b5") 
    Time = Range("b7") 
    nameoftask = Range("b9") 
    typeoftask = Range("b11") 
    Iffollowupwhichtaskisitfollowing = Range("b13") 
    Howwastaskcommunicated = Range("b15") 
    Whorequestedtask = Range("b17") 
    Whatistaskrequiredfor = Range("b19") 
    Descriptionoftask = Range("b21") 
    Deadlinefortask = Range("b23") 

    Set myData = Workbooks.Open("filelink") 
    Worksheets("sheet1").Select 
    Worksheets("sheet1").Range("a1").Select 
    RowCount = Worksheets("sheet1").Range("a1").CurrentRegion.Rows.Count 
    With Worksheets("sheet1").Range("a1") 
    .Offset(RowCount, 1) = Date 
    .Offset(RowCount, 2) = Time 
    .Offset(RowCount, 3) = nameoftask 
    .Offset(RowCount, 4) = typeoftask 
    .Offset(RowCount, 5) = Iffollowupwhichtaskisitfollowing 
    .Offset(RowCount, 6) = Howwastaskcommunicated 
    .Offset(RowCount, 7) = Whowastaskcommunicatedto 
    .Offset(RowCount, 8) = Whorequestedtask 
    .Offset(RowCount, 9) = Whatistaskrequiredfor 
    .Offset(RowCount, 10) = Descriptionoftask 
    .Offset(RowCount, 11) = Deadlinefortask 
    End With 
    myData.Save 
    End Sub

来源

2016-09-13 G Cob

[Date]（http://stackoverflow.com/documentation/vba/3418/data-types-and-limits/11783/date#t=201609132226475078262）将存储日期或时间。这就是Excel如何在本地存储它们。 – Comintern

如果将时间变量变暗为日期，则单元格格式将使其与您的方法一致。

如果时间存储并显示在单元格中作为时间值，则其基础数据类型是小于1的十进制数。因此，您也可以将其调暗为双精度值。

如果您在当前代码中使用双精度型，则格式不会出现在新单元格中，不过只是单元格值。您需要使用您的首选时间格式来格式化目标单元格。

所以，日期是您想要变暗的数据类型。

来源

2016-09-13 22:28:36 teylyn

将时间从一张纸传输到另一张 - 哪个暗淡选项？

回答

相关问题