需要幫助，簡單的表代碼

-2

當前的問題：我需要得到的數據，如果（A：A142 = 1），同一行B將被粘貼到C.需要幫助，簡單的表代碼

感謝您的幫助了！

2017-09-02 Henri Pursiainen

我們可以用一個簡單的循環：

Sub Henri() 
    Dim A As Range, r As Range 
    Set A = Range("A1:A142") 

    For Each r In A 
     With r 
      If .Value = 1 Then .Offset(0, 1).Copy .Offset(0, 2) 
     End With 
    Next r 
End Sub

來源

2017-09-02 13:29:57

的問題沒有得到很好的解釋，但不會從C1粘貼此公式

= if(A1=1,B1,0)

到C142給你所需要的結果呢？

來源

2017-09-02 12:51:46 powiedz

認爲可能做的伎倆，但我-B柱上上有姓名和A柱的值更改betveen 1-5，我想impot你的公式= if（A1 = 1，B1,0），給我數字0而不是名字。那麼這個公式錯過了什麼？感謝您給予的所有幫助:) –

需要幫助，簡單的表代碼

回答

相關問題