VBA_如何簡化此程式碼。謝謝! - Excel程式區

[發問] VBA_如何簡化此程式碼。謝謝!

1^# 跳轉到 »

發表於 2015-11-25 11:30 | 顯示全部帖子

Dim Arr,i%
Arr = Array("一", "二", "三", "四", "五", "人事", "會計", "業務")
For i = 0 To UBound(Arr)
　　[A:A].Replace i + 1, Arr(i) & "課", Lookat:=xlWhole
Next

靜思自在 : 【蒙蔽的自由】人常在什麼都可以自由自在的時候，卻被這種隨心所欲的自由蒙蔽，虛擲時光而毫無覺知。