Das Clever-Excel-Forum.de - Treffen
findet vom 15. - 17. September 2017 in Thüringen / Region Großer Inselsberg statt. Hotelbuchung ab sofort möglich.


Codefragment aufrufen, aber wie
#1
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.
to top
#2
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.
Gruß Ralf

?mage

Die deutsche Rechtschreibung ist Freeware, d.h. du kannst sie kostenlos nutzen.
Allerdings ist sie nicht Open Source, deswegen darfst du sie nicht verändern oder in veränderter Form veröffentlichen.
to top
#3
Hallo Ralf,

habe ich jetzt gemacht, aber leider passiert da nichts.
to top
#4
Hallo,

In Modul der Tabelle
Gruß Atilla

Excel 2007
to top
#5
Hallo Atilla,

funktioniert. Danke.
to top
#6
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
Gruß Ralf

?mage

Die deutsche Rechtschreibung ist Freeware, d.h. du kannst sie kostenlos nutzen.
Allerdings ist sie nicht Open Source, deswegen darfst du sie nicht verändern oder in veränderter Form veröffentlichen.
to top
#7
Hi Ralf,

den Teil hinter dem "oder" hat der TE wahrscheinlich überlesen, so wie ich.
Gruß Atilla

Excel 2007
to top
#8
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
   \\\|///      Hoffe, geholfen zu haben.
   ( ô ô )      Grüße, André aus G in T  
 ooO-(_)-Ooo    (Excel 97-2016)
to top


Möglicherweise verwandte Themen...
Thema Verfasser Antworten Ansichten Letzter Beitrag
  MsgBox 1 Minute nach Dateiöffnung aufrufen nixdaacher 2 66 25.11.2016, 22:18
Letzter Beitrag: schauan
  Wenn-Formel aber wie? MeKeMo 0 64 25.10.2016, 11:17
Letzter Beitrag: MeKeMo
  Userform mit Buttons aufrufen und beenden Rabe 5 327 02.08.2016, 08:56
Letzter Beitrag: Rabe
  Explorer via VBA aufrufen Telematix 8 454 22.07.2016, 07:37
Letzter Beitrag: Telematix
  Daten sortieren aber wie? Berry 3 274 21.05.2016, 10:55
Letzter Beitrag: Berry
  VBA-Funktion aus Personl.xls aufrufen sharky51 4 1.080 12.10.2015, 16:21
Letzter Beitrag: RPP63
  Aufrufen TextBox1_KeyDown Prozedur aus einer anderen Prozedur heraus Nonexperta 6 1.413 05.12.2014, 14:24
Letzter Beitrag: schauan
  Sub in mehrere Dateie aufrufen! cysu11 27 4.413 23.07.2014, 09:59
Letzter Beitrag: cysu11
  Makro mehrfach aufrufen mit Namensübergabe Rabe 12 2.927 17.05.2014, 14:13
Letzter Beitrag: Kuwer
  Bereichsfestlegung als Variable aufrufen Rabe 7 1.689 17.05.2014, 09:09
Letzter Beitrag: Rabe

Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste