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
, nichtVB.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 derWorksheet_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 ?
Du musst angemeldet sein, um einen Kommentar abzugeben.
Dies ist VBA nicht VB.NET
Versuchen
.Value
der ZelleWarum nicht die
Offset
Funktion:In Zelle A1:
=OFFSET(A1,0,4,1,1)
Oder verweisen Sie auf die Zelle direkt:
=E1
etc.
Dies scheint übertrieben, eine UDF benutzen um etwas zu tun, dass die Arbeitsblatt-Funktionen, die normalerweise ermöglichen, bereits.