Microsoft Excel

Herbers Excel/VBA-Archiv

Reihenfolge aktive Zellen

Betrifft: Reihenfolge aktive Zellen von: Johannes
Geschrieben am: 28.08.2004 21:51:23

Hallo Spezialisten,

ich habe folgendes Problem:

Die aktive Zelle soll bei A2 starten, nach Eingabe und [Enter] soll B2 aktiv sein
nach Eingabe und [Enter] soll A3 aktiv sein usw.

also:
A2 -> B2 dann
A3 -> B3 dann
A4 .....

bis A200 - B 200

Kann mir jemand dabei helfen ?
Danke für Eure Mühe schon jetzt.

Gruß
Johannes

  


Betrifft: AW: Reihenfolge aktive Zellen von: ransi
Geschrieben am: 28.08.2004 21:56:21

hallo

stell doch mal die scrollarea auf a2:b200.
die seiliche mausbewegung kriegst du mit:
optionen-bearbeiten-markierung nach... rechts

ransi


  


Betrifft: AW: Reihenfolge aktive Zellen von: nighty
Geschrieben am: 28.08.2004 22:13:26

hi johannes :)

wie gewuenscht :)

gruss nighty

einzufuegen alt f11(vbeditor)/projektexplorer/DeineTabelle

das makro reagiert auf zellenwechsel

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim rgBereich As Range
Dim zaehler1 As Range
Set rgBereich = Worksheets("Tabelle1").Range("A2:B200")
For Each zaehler1 In rgBereich
If zaehler1 = "" Then
zaehler1.Select
Exit For
End If
Next zaehler1
End Sub



  


Betrifft: AW: Reihenfolge aktive Zellen von: nighty
Geschrieben am: 28.08.2004 22:18:26

hi johannes :)

korrigiert :)

gruss nighty

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Dim rgBereich As Range
Dim zaehler1 As Range
Set rgBereich = Worksheets("Tabelle1").Range("A2:B200")
For Each zaehler1 In rgBereich
If zaehler1 = "" Then
zaehler1.Select
Exit For
End If
Next zaehler1
Application.EnableEvents = True
End Sub



  


Betrifft: AW: Reihenfolge aktive Zellen_ Danke super von: Johannes
Geschrieben am: 28.08.2004 22:20:04

.


 

Beiträge aus den Excel-Beispielen zum Thema "Reihenfolge aktive Zellen"