Excel VBA For statement

我想爲下面的代碼創建一個循環。我需要循環做的唯一事情就是轉到下一列（這將是F列）。行將保持不變。有什麼建議麼？Excel VBA For statement

xlSheet.Range("e23") = (Me.overrings) 
xlSheet.Range("e33") = (Me.overingTax) 
xlSheet.Range("e27") = (Me.Sampling) 
xlSheet.Range("e28") = (Me.Waste) 
xlSheet.Range("e29") = (Me.Promo) 
xlSheet.Range("e42") = (Me.Online) 
xlSheet.Range("e34") = (Me.freebieTax) 
xlSheet.Range("e49") = (Me.totalDepo) 
xlSheet.Range("e38") = (Me.CreditCards)

來源

2011-11-23 user1061123

For x= 5 to 6 
With xlSheet.columns(x) 
    .cells(23).value=Me.overrings 
    'etc 
End with 
Next x

來源

2011-11-23 04:48:36

是有可能使這種功能我可以根據我的if語句將for語句從（對於x = 5到5）更改爲（For x = 6到6）到（For x = 7到7）。 – user1061123

只需使用變量而不是5和6.或更新您的問題更多的上下文。 –

如果你真的想在相鄰單元格的值相同，您可以修改現有的代碼是這樣（無需環路）：

xlSheet.Range("e23:f23") = (Me.overrings)

來源

2011-11-23 05:15:47

Excel VBA For statement

回答

相關問題