Ein schönen guten Tag,
ich habe in der Excel Hilfe folgenden VBA Code gefunden:
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With ActiveWindow
.ScrollRow = Target.Row
.ScrollColumn = Target.Column
End With
End Sub
Leider bin ich recht unkundig und weiß nicht, wie der zusätliche Code aussehen
müßte um das oben genannte Fragement aufrufen zu können. Da bräuchte ich mal
Hilfe. Danke.
Hi,
(18.11.2014, 14:44)Nonexperta schrieb: [ -> ]Leider bin ich recht unkundig und weiß nicht, wie der zusätliche Code aussehen müßte um das oben genannte Fragement aufrufen zu können. Da bräuchte ich mal
Hilfe. Danke.
da muß es keinen zusätzlichen Code geben. Du mußt nur ganz einfach diesen Code in das Code-Modul von "DieseArbeitsmappe" einfügen (für alle Blätter) oder direkt nur in das, auf dem es wirken soll.
Wenn Du dann in diesem Arbeitsblatt eine andere Zelle auswählst, müßte der Code starten und durchlaufen.
Denn da steht "Worksheet" und "SelectionChange", das bedeutet: wenn in dem entsprechenden
Worksheet die
Auswahl einer Zelle ge
ändert wird, wird das Makro ausgeführt.
Hallo Ralf,
habe ich jetzt gemacht, aber leider passiert da nichts.
Hallo,
In Modul der Tabelle
Hallo Atilla,
funktioniert. Danke.
Hi,
(18.11.2014, 15:16)atilla schrieb: [ -> ]In Modul der Tabelle
hatte ich ja geschrieben:
Zitat:direkt nur in das, auf dem es wirken soll
Hi Ralf,
den Teil hinter dem "oder" hat der TE wahrscheinlich überlesen, so wie ich.
Hallöchen,
wenn es in Deiner Exceldatei unter DieseArbeitsmappe und damit auf allen Blättern wirken soll, dann mit diesem Sub
Code:
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
With ActiveWindow
.ScrollRow = Target.Row
.ScrollColumn = Target.Column
End With
End Sub