2015-06-10 91 views
0

我一直在建立一个仪表板作为工具结账表。输出到日志的数据工作正常。我还没有弄清楚如何实施我的下一步。我想找到一种方法将“检查”日期放入日志中以完成该过程。如何让vba执行此操作?

我想知道什么是有效的方法来引用sheet1; e10到sheet2; columnB将是。

if column (i) is empty or 0 then 
    =today() in sheet2;same row column (i). 
endif" 

我要分配给此宏的按钮。我在结帐过程中也是这样做的。

+0

这是有点不清楚你在问什么 - 似乎你想检查列的每一行是否为空,如果是这样,你想把今天的日期放入不同的工作表的同一行中?我的假设是否正确? – eirikdaude

回答

0

直接回答你的问题:在B1领域:

Sheets("Table1").Range("B1").Value = "Logging date: " & Now 

这个小片段使文本“2015年6月10日9点30分二十一秒记录日期”。另一种可能性是使用单元格(rowIndex,colIndex),在这种情况下单元格(1,2)在我看来不太可以理解。

正如我只能猜测,你的伪代码应该做的事,在这里我解释:

Dim row As Integer 
Dim col As Integer 
row = 1 
col = 2 

If (IsEmpty(Cells(row, col)) Or Cells(row, col).Value = "0") Then 
    Sheets("Table1").Range("B1").Value = "Logging date: " & Now 
Else 
    'whatever you want to do otherwise 
End If 

不要指望它可以立即解决您的问题。但也许这是你的第一个起点?