nach Listenende zumAnfang



Excel-Version: 2000
nach unten

Betrifft: nach Listenende zumAnfang
von: Uwe Der GPZ 900
Geschrieben am: 11.04.2002 - 21:05:27

Hallo Profis
habe eine liste mit 60 Spalten, mit 50 Zeilen,das Ganze ca.90 x untereiander,mit je 8 Zeilen dazwischen.>> Gesamtlänge + Breite kann variieren.<<
Suche makro,welches bei dateiöffnung aktiv wird, und:
bin ich bei A60'Zelle angekommen,soll automatisch Rücksprung
auf zB Zelle B3 erfolgen.Dann wieder manuell bis zB.B60 +
zurück auf B4,50 Zeilen oft.Dann 8Zeilen überspringen und im 2ten
50er Block weiter,möglichst mit Open End.
Hab fast keine Ahnung von Visual Basic
Tausend Dank im Voraus Gruss Uwe



nach oben   nach unten

Re: nach Listenende zumAnfang
von: UDF
Geschrieben am: 12.04.2002 - 07:32:29

Hallo Uwe,

schalte über Alt + F11 in den VBA-Editor.

Dort das entsprechende Blatt doppelklicken und in folgenden Code eingeben:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   Select Case Target.Address(False, False)
      Case "B64"
         Range("C1").Select
      Case "C64"
         Range("D1").Select
   End Select
End Sub

Die Zellbereiche, welche dann angesprungen werden sollen kannst Du dann anpassen.

Gruss
Markus

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Zellwerteingaben in Abhängigkeit eines Zellwertes"