例如:在工作表A中的A1单元等于工作表B中的B1单元格内容,我想让工作表A中的A2单元格自动等于工作表B中的B2单元格内容。即使工作表A中的A1指向工作表C中的C1,工作表A2的内容也会自动指向工作表C的C2,求高人指点!
çäºåä¸ä¸ªåå æ ¼æåçä¸ä¸ä¸ªåå æ ¼ï¼å¯ä»¥ç¨INDIRECTå½æ°æ¥å®ç°ã
示ä¾æ°æ®ï¼
å¼ç¨ä¸ï¼
å¦ä¸å¾æ示ï¼B1åå æ ¼çå ¬å¼ä¸º=INDIRECT(A1)ï¼è¿æ¯è¯¥å½æ°çé´æ¥å¼ç¨æ¹æ³ï¼A1çå¼æ¯D1ï¼æ以è¿åD1åå æ ¼çå¼9æ12æ¥ã
å¼ç¨äºï¼
å¦ä¸å¾æ示ï¼C1åå æ ¼çå ¬å¼ä¸º=INDIRECT("A1")ï¼å 为å äºåå¼å·ï¼æ以è¿ä¸ªç¨æ³ä¸ºç´æ¥å¼ç¨A1åå æ ¼çå¼ï¼æ以è¿åD1ã
A1的内容我可以手动,但是A2、A3。。。。下面的全部要自动,手拉也要省掉,太麻烦,如果要手拉的话,我就不用问了
追答在工作表的代码里添加这个VBA代码
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Integer
If Target.Address = "$A$1" Then
For i = 2 To [a65536].End(xlUp).Row
Cells(i, 1).Formula = Application.WorksheetFunction.Substitute(Cells(1, 1).Formula, "1", i)
Next i
End If
End Sub
我要的是全部联动,应该可以实现的,坐等高人
追答那没办法,你还系慢等吧=。=''!