vba如何把當前日期賦值給單元格？材料/工具:Excel2010 1。打開一個Excexcel表格怎么按時間段篩選，最好用VBA，比如一張表格包含名字，工序，時間，怎么篩選出在指定時間段內(nèi)數(shù)？這么多天

vba如何把當前日期賦值給單元格？

材料/工具:Excel2010 1。打開一個Exc

excel表格怎么按時間段篩選，最好用VBA，比如一張表格包含名字，工序，時間，怎么篩選出在指定時間段內(nèi)數(shù)？

這么多天沒有回音，所以我 我要走兩步。首先，我 我將啟用自動過濾。單擊“日期”列中的篩選箭頭，并輸入兩個自定義條件。一個是起始日期大于等于起始日期，一個是兩個條件關系還可以。

excel怎樣用vba寫完成日期？

1打開Excel表，單擊“文件”、“另存為”,在“保存類型”中選擇“啟用Excel宏的工作簿”進行保存。

2點擊[開發(fā)工具]和[Visual Basic]打開VBA項目窗口。

3雙擊 "第一頁(第一頁)及"欠 "VBAProject (xlsm)和"打開代碼輸入窗口。

4在代碼輸入窗口中輸入以下VBA代碼:

private worksheet _ selection change(byval target as range)amp # 39在工作表的選定區(qū)域發(fā)生變化時執(zhí)行。

將b1標注為布爾值

Dim a、b、c、d、e、f作為變量

Dim i，j為整數(shù)

設置我的文檔(#34頁1#34)

對于i 2到1000 amp#39循環(huán)2-1000次，即下面的自動填充時間達到1000行。

我的文檔。單元格(I，1) amp#39將單元格分配給a。

b我的文檔。細胞(I，2)

c我的文檔。細胞(I，3)

我的文檔。細胞(I，4)

e我的文檔。細胞(I，5)

f我的文檔。細胞(I，6)

b1 (a ltgt #34#34，b ltgt #34#34，c ltgt #34#34，d ltgt #34#34，e ltgt #34#34)

如果b1True And f #34#34 Then amp#39如果該行已填入信息，自動填充時間為空，則執(zhí)行自動填充時間。

5數(shù)據(jù)信息寫入同一行第一至第五列對應的單元格，同一行第六列對應的單元格為空，則當前時間會自動寫入同一行第六個單元格。