2016-09-29 73 views
-3

我的專欄看起來像這些爲列G:VBA腳本的if-else

G列
完成
完成
在進步
未啓動
完成

我需要一個If-Else腳本將所有Complete值轉換爲「Y」,否則轉換爲「N」。
有人可以幫助我嗎?

+0

從這裏開始:http://msdn.microsoft.com/en-us/library/office/jj692812(v=office.15).aspx和specificaly中,[如果...那麼...否則](https://msdn.microsoft.com/en-us/library/office/gg251599.aspx )文件。 –

+0

你能否澄清你的問題? – Animesh

+0

歡迎來到Stack Overflow。你想要一個腳本或公式?因爲這可以通過像= = If(G1 =「Complete」;「Y」;「N」)這樣的公式來解決,例如將H粘貼到單獨的列中,然後拖動到表格的末尾。如果你想要一個代碼,告訴我們你已經擁有了什麼,然後我們可以幫你解決問題 –

回答

0

你需要學習VBA腳本的三個基本元素。

  1. 迴路參數 - 取(開始>結束)
  2. 行動(善有善報環內)
  3. 迭代(你如何移動到循環的下一條記錄,避免無限循環)

    Sub MarkComplete() 
    
    'Select first cell 
    Range("G2").Select 
    
    'Loop until no more values 
    While ActiveCell.Value <> "" 
    
        'Print appropriate value 
        If ActiveCell.Value = "Complete" Then 
    
         ActiveCell.Value = "Y" 
    
        Else 
    
         ActiveCell.Value = "N" 
    
        End If 
    
        'Move to next cell 
        ActiveCell.Offset(1, 0).Select 
    
    Wend 
    
    End Sub