1樓：太極健
一週有七天，你要哪一天？
已知一個日期,怎麼判斷他是星期幾 vba**
2樓：匿名使用者
weekday("2010-4-8")
取的引數中的日期是一個星期的第幾天，星期天為1、星期一為2、星期二為3 依此類推。
配合weekdayname(）更好。
weekdayname(weekday("2010-4-8"))
如何通過vba把excel單元格的日期格式設定為「年月日時分星期」格式？
3樓：平陽虎
range("a1").select
selection.numberformatlocal = "e/m/d h:mm aaaa"
4樓：陽光上的橋
這樣就可以：
range("a1").numberformat = "[$-804]yyyy/m/d h:mm aaaa;@"
range("a1") = now
excel vba中的日期和星期怎麼加1
5樓：匿名使用者
sub test()
msgbox format(date + 1, "yyyy/mm/dd") '返回今天的日期加1
msgbox format(date + 1, "aaaa") '返回今天的星期加1
end sub
excel vba求**，把文字格式的日期時間資料轉換為日期時間格式
6樓：
不需要**
把b列資料複製到記事本
再把b列格式設定成 yyyy/m/d hh:mm:ss格式最後從記事本把資料考回來就可以了
如果在vba中直接使用的話，加一個datevalue轉換下就好了
excel vba中如何將日期轉換為數字進行計算？
7樓：復仇之牙
用datevalue試試
附件裡有示例
sub ff()
dim a, b, c
for i = 1 to 2
a = cells(i, 1)
b = cells(i, 2)
c = cells(i, 3)
if datevalue(c) - datevalue(a) > -1 and datevalue(c) - datevalue(b) >= 0 then
cells(i, 4) = "y"
end if
next i
end sub
excel裡把周別換成月份怎麼弄？
8樓：excel辦公實戰
根據一週7天來計算返回月份，需要len、left、month等函式綜合處理。
excel版本參考：2010
演示：20週轉為月份
1、a1單元格錄入20周；
2、b1錄入公式：=value(month(date(year(today()),1,1)+left(a1,len(a1)-1)*7))
回車3、檢視效果（20周為當年的5月份）
9樓：匿名使用者
9 20 在a1
b1=month(date(left(a1,find(" ",a1)-1),1,1)+7*replace(a1,1,find(" ",a1)," "))
10樓：
這個問題首先要確定幾個條件:
1、每週是以週日為起始還是以週一為起始；
2、周可能跨月，那麼確定月份是以起始日所在月為準，還是以週末所在月為準，或者是以多數天所在月份為準。
3、源資料的表示格式。你舉的例子並不很清楚實現方法可用公式或用vba。
實現的方法有很大的不同。
舉個簡單的例子：
每週以週一起始，以週一所在月為準確定月份，每年第一週歸入當年1月份（週一可能在上年12月），用公式實現；
設：a1中為四位完整年份（避免千年蟲），b1中為週數，在c1中輸入公式計算月份：
=if(b1>1,month(date(a1,1,1)-weekday(date(a1,1,1),1)+(b1-1)*7),1)
excel vba 怎麼把日期格式轉換成數值
11樓：我的王是金閃閃
=a1&text(b1,"e/m/d")
vba：
12樓：匿名使用者
為什麼要用vba呢？
太陽能如何轉化為電能？轉化過程是如何
太陽能電池發電原理 太陽能電池是一對光有響應並能將光能轉換成電力的器件。能產生光伏效應的材料有許多種，如 單晶矽，多晶矽，非晶矽，砷化鎵，硒銦銅等。它們的發電原理基本相同，現以晶體為例描述光發電過程。p型晶體矽經過摻雜磷可得n型矽，形成p n結。當光線照射太陽能電池表面時，一部分光子被矽材料吸收 光...
倉庫計算庫存週轉率方式,庫存週轉率如何計算
通常情況出庫和入庫數量應當不一樣,計算倉庫週轉率 存貨週轉率 版應當以倉 庫存貨權為依據,即 存貨週轉率 次數 是指一定時期內企業銷售成本 出庫 與存貨平均資金佔用額的比率,是衡量和評價企業購入存貨 投入生產 銷售收回等各環節管理效率的綜合性指標。其計算公式為 存貨週轉次數 銷貨成本 出庫 存貨平均...
如何用EXCEL VBA讀入固定格式的
參考下 sub readfile dim ddate as date dim scustomer as string dim sproduct as string dim dprice as double dim sfname as string dim ifnumber as integer fi...