Excel中有沒有辦法編輯另一個工作表中的選定行？

Question

我在掙扎，想知道是否有任何簡單的方法來引用當前/活動行的單元格。

即 - 我有2片，一個具有大量的信息上，並且所述第二我要上表顯示從電流/活動行信息1.

排5在表1中選擇。然後所以說如果您轉到工作表2，則第5行中的所有信息都將顯示在工作表2上。然後，如果您選擇第1工作表中的第8行，工作表2上的信息將被更新爲僅顯示工作表1中第8行的信息。

當你回到表1

是否有可能一個簡單的公式我可以添加到她的細胞

您在表2所做的任何更改都將反映et 2？也許沿着線的東西：

cell A1 on sheet 2 have =sheet1(active_row.colum1) 

and then cell A2 on sheet 2 have =sheet1(active_row.colum2) 

等，等

我已經成功地得到它使用宏樣的工作，但唯一的問題是，當我改變Sheet 2上的信息，它不會更新工作表1上的信息。如果有一種方法可以將此功能添加到我的代碼中，那將非常棒。

這是我到目前爲止的代碼：

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
Dim myList 
If Target.Address <> Target.EntireRow.Address Then Exit Sub 
If Target.Rows.Count > 1 Then Exit Sub 
myList = [{"B1","B2","B3","B4","B5","B6","B7","B8","B9","B10","B11","B12","B13","B14","B15"}] '<- adjust to your need 
With Target.EntireRow 
    For i = 1 To UBound(myList) 
     Sheets("sheet2").Range(myList(i)).Value = .Cells(i).Value 
    Next 
End With 
End Sub 

有什麼建議？ :)

Answer 1

是的，你可以做到這一點，但這有點複雜。

你想在表1中選擇的一行中顯示Sheet 2上，然後都能夠編輯第2頁自動更新表1.

你必須做的是，你是如何使用選擇事件，並將該行復制到工作表2中。然後，您必須使用工作表1上的激活事件將該行復制回工作表1.請注意以下代碼假定工作表1在單元格中沒有工作表函數（公式）你仍然可以這樣做，但是你必須保留這些公式並替換它們。

表1個代碼：

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 

If Target.Address <> Target.EntireRow.Address Then Exit Sub 
If Target.Rows.Count > 1 Then Exit Sub 

Target.EntireRow.Copy 
Sheets("Sheet2").Activate 
Sheets("Sheet2").Range("A1") = Target.Row 
Sheets("Sheet2").Rows(2).PasteSpecial (xlPasteValues) 

End Sub 

表2編號：

Private Sub Worksheet_Deactivate() 

If Sheets("Sheet2").Range("A1") > 0 Then 
    Sheets("Sheet2").Rows(2).Copy 
    Sheets("Sheet1").Activate 
    ActiveSheet.Rows(Sheets("Sheet2").Range("A1")).EntireRow.PasteSpecial (xlPasteValues) 
    Sheets("Sheet2").UsedRange.ClearContents 
End If 

End Sub 

Answer 2

簡短的回答是不，Excel沒有以這種方式工作：

你不能用一個公式做到這一點。沒有功能可與活動工作表或其他工作表上的活動單元一起使用。此外，Excel計算引擎無法識別在更改選擇或在工作表之間移動時需要重新計算。