Wie die Anzeige der Zelle offset-Wert der aktiven Zelle

Ich versuche den Wert einer Zelle nach meiner ActiveCell-oder Target-Zelle mit einer Funktion. Die Zelle, die ich versuche, die Anzeige ist in das gleiche Arbeitsblatt.

Mein Ziel ist, erstellen Sie eine Kopfzeile in der Tabelle, wäre die Anzeige von Informationen gemäß der position der Aktiven Zelle.

Habe ich versucht, diesen code eingegeben und die Funktion =VendorName5() in die Zelle, wo ich will, der Wert angezeigt werden, aber es scheint etwas zu fehlen. Können Sie mir helfen ?


Function VendorName5() As String

Name = ActiveCell.Offset(0, -4)

       VendorName5 = Name

End Function

OK, gefunden:

"Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Wenn Ziel.Column = 8 Then
Range("C2") = Cells(Target.Reihe, 2)
Am Ende, Wenn

End Sub"

tks für die Hilfe

  • Ist dieser code in das Tabellenblatt-code-Modul? Außerdem, ich ' m vorausgesetzt, dies ist VBA, nicht VB.net.
  • Ja, es ist in das Modul. ja, es ist VBA
  • Ich glaube nicht, dass Sie verwenden können, ActiveCell während einer UDF als Teil einer Tabellenfunktion. Was ist dein Ziel hier? Wenn Sie wollen einfach nur wissen, den Wert der Zelle 4 Spalten nach Links dann könnten Sie, zum Beispiel, setzen =A1 in Zelle E1
  • Dies funktioniert für mich, wenn ich den code in einem normalen Modul, aber das funktioniert nicht, wenn ich es in das Arbeitsblatt ein code-Modul. Excel 2010.
  • Auch wenn Sie wirklich in der Tat, dass es eine dynamische Funktion baseon die ActiveCell diese sollten in Ordnung sein mit der Worksheet_Change () Veranstaltung.
  • Ich wirklich brauchen, um zu erstellen Sie eine dynamische Funktion basiert auf ActiveCell. Ich habe noch nie verwendet Worksheet_Change() noch können Sie einige Tipps geben ?

Schreibe einen Kommentar