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 115 25.11.2016, 22:18
Letzter Beitrag: schauan
  Summenprodukt aber nur in den letzten 5 Jahren marie 6 254 05.11.2016, 13:45
Letzter Beitrag: schauan
  Wenn-Formel aber wie? MeKeMo 0 95 25.10.2016, 11:17
Letzter Beitrag: MeKeMo
  Userform mit Buttons aufrufen und beenden Rabe 5 390 02.08.2016, 08:56
Letzter Beitrag: Rabe
  Explorer via VBA aufrufen Telematix 8 514 22.07.2016, 07:37
Letzter Beitrag: Telematix
  Makro mit PW, aber trotzdem Abfrage KS20 4 304 15.07.2016, 06:58
Letzter Beitrag: KS20
  Fehleranzeige bei Verknüpfungen, aber Status ok Denise 2 445 08.07.2016, 09:20
Letzter Beitrag: Denise
  Daten sortieren aber wie? Berry 3 300 21.05.2016, 10:55
Letzter Beitrag: Berry
  Feldeigenschaften = Summe, aber dauerhaft ! axel18 1 208 09.04.2016, 17:14
Letzter Beitrag: Peter
Photo Zählewenn aber keine Doppelten Wolfgang_Virnich 3 438 28.11.2015, 11:40
Letzter Beitrag: Wolfgang_Virnich

Gehe zu:


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