1樓：已非故
dim i as integer
dim a, b, c as string
for i = 1 to 18
a = split(cells(i, 1).value, ".")(0)
b = split(cells(i, 1).value, ".")(1)
c = split(cells(i, 1).value, ".")(2)
cells(i, 3).value = a & "/" & b & "/" & c
cells(i, 3).numberformatlocal = "yyyy/m/d;@"
next
希望能幫到你,for i=1 to 18中的18只是個隨便的數字，你可以自己改成你說需要的行總數
2樓：匿名使用者
假設e列為你要替換的列。試試下面兩句話
columns("e").replace what:=".", replacement:="/", lookat:=xlpart
columns("e").numberformatlocal = "yyyy/mm/dd"
3樓：匿名使用者
vb的replace()函式，可以指定替換字串中的字元。
在vba中怎樣在單元格中引用su？mi
excel中引用單元格的方法 工具 wps中的excel 在單元格中輸入等號，然後用左鍵選中有資料的單元格，這樣就點就叫做引用了單元格 a1，相對引用，隨著下拉複製公式而變化 a 1，絕對引用，不會隨著下拉複製公式而變化 行列固定。a 1，行絕對引用，列相對引用 行固定。a1，行相對引用，列絕對引用...
請問如何使用vba刪除某一列單元格的中包含某特定字元所在的行
點你想刪的那一行滑鼠右鍵就可以看到刪除 sub macro1 a inputbox 請輸入 需要bai刪du除包含的zhi 某特定字元 輸入框dao v j trim inputbox 請輸入需要選擇的列號專 輸入框 1 for k j to j for i 1 to 65535 sheets 1 ...
excel中怎麼將第一列單元格後的單元格移到每一行的下方
1 首先，我們開啟乙個含有 的excel文件，我們選中 中的一列，然後將滑鼠放在邊緣處，當出現十字帶有箭頭的符號時，我們就可以朝著邊上去拉伸了，不要松左鍵去拉伸 2 之後我們就鬆掉滑鼠左鍵，這樣我們就可以看到此時被我們移動一列了 3 移動一行的話，我們選中一行，然後將滑鼠放在邊緣處，當出現十字箭頭符...