需要Excel宏代碼符合我的要求

-10

我有3列excel。
我想執行下面的場景。
我想要一個宏按鈕，可以根據第一列像查找值賦值給第3列：
需要Excel宏代碼符合我的要求

當我按一下按鈕，就應該向「價值（顧客沒有。）「
在輸入數值後，應該在輸入數值後請求」數值（金額）「
，應在第一列找到」數值（客戶號）「，並指定」數值）「相應地在第三列中，這個動作重複發生多個值。

我的數據：

 
Customer No. | Customer Name | Amount 
_____________|________________|__________ 
     1  | Ramesh  | 
     2  | Kumar   | 
     3  | Dinesh  | 
     4  | Praveen  | 
     5  | Anand   |

我用下面的代碼上的按鈕來插入數據，但它無法讀取客戶編號它只讀取的行數

Sub Rectangle2() 
    iText = InputBox("Enter Amount") 
    iRow = InputBox("Enter Number") 

    Cells(iRow, 3).Value = iText 
End Sub

來源

2016-01-08 Jeela

歡迎來到StackOverFlow。這個網站不是真正的「給我這個代碼」，但更多的是「幫我找到我的問題」。你想實現的是相當簡單的。嘗試將一些代碼放在一起併發布在您的問題中。這也可以防止倒票 –

Sub Rectangle2() 
    Dim f As Range 

    iText = InputBox("Enter Amount") 
    iRow = InputBox("Enter Number") 

    Set f = Activesheet.Columns(1).find(What:=iRow, LookIn:=xlValues, LookAt:=xlWhole) 
    If Not f Is Nothing then 
     f.offset(0, 2).Value = iText 
    End If 
End Sub

來源

2016-01-08 18:22:07

非常感謝 – Jeela

需要Excel宏代碼符合我的要求

回答

相關問題