Board logo

標題: [發問] replace 語法 [打印本頁]

作者: t8899    時間: 2014-7-6 09:34     標題: replace 語法

無此語法 ?? ==> Cells(3, i).Formula.Replace
改成
Sub macro1()
Dim i As Integer, K
For i = 3 To 5 Step 1
Set K = Cells(3, i).Formula
K.Replace "*", "=if(a1="""",""""," & Cells(3, i) & ")" '型態不符合
Next
End Sub




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)