2017-08-02 15 views
3

美好的一天,我想我的公式跟隨目標小區

我想這個代碼跟隨靶細胞(G20),即使我行之前插入一個多行20

=LEFT(G20,3)&TEXT(COUNTIF(G20:G20,LEFT(G20,1)&"*"),"000") 

謝謝,

是否也可以設置單元D20的INDRECT代碼?

Private Sub CommandButton1_Click() 
Dim x As String, rcell As Range, y As String, z As Long 

x = "RFP" & Format(Now, "mmddyyhhmmss") 
y = Left(x, 10) 
z = Right(x, 2) 

For Each rcell In Range("D20:D" & Range("D" & Rows.Count).End(3).Row) 
If Cells(rcell.Row, 1) = "" Then Cells(rcell.Row, 1) = y & z 
z = z + 1 
Next rcell 

End Sub 
+0

你是什麼意思 「跟着靶細胞」?你想讓目標永遠是G20嗎? – RealCheeseLord

回答

1

如果你總是希望公式甚至超過插入行後指Cell G20,使用INDIRECT功能

=LEFT(INDIRECT("G20"),3)&TEXT(COUNTIF(INDIRECT("G20:G20"),LEFT(INDIRECT("G20"),1)&"*"),"000") 

注:INDIRECT是一種揮發性功能。詳情請參閱this

0

試試這個

=LEFT($G$20,3)&TEXT(COUNTIF($G$20:$G$20,LEFT($G$20,1)&"*"),"000") 
+0

也可以使用VBA代碼使用INDRECT代碼嗎? – N323100

相關問題