Microsoft Excel

Herbers Excel/VBA-Archiv

reihenfolge eines range-objektes ändern



Excel-Version: 8.0 (Office 97)

Betrifft: reihenfolge eines range-objektes ändern
von: rainer
Geschrieben am: 28.05.2002 - 15:25:29

Hallo! Ich habe z.B eine Range von a1 bis e9. in einer for-each schleife durchlaufe ich diese range. standardmäßig läuft excel zuerst innerhalb einer zeile also a1, b1, c1 usw.
ich möchte aber die reihenfolge in a1, a2, a3,...ändern
geht das?
danke rainer

  

Re: reihenfolge eines range-objektes ändern
von: GraFri
Geschrieben am: 28.05.2002 - 15:45:17

Hallo


Option Explicit

Sub Bereich_Spaltenweise_durchlaufen()
Dim Bereich
Dim Zelle
Dim n       As Byte

For n = 1 To 5  'für Spalte A bis E
Set Bereich = Sheets(1).Range(Cells(1, n), Cells(9, n))
    For Each Zelle In Bereich
    'Irgendein Code
    Zelle.Select
    Next
Next n

End Sub

mfg, GraFri


  

Re: reihenfolge eines range-objektes ändern
von: Martin Beck
Geschrieben am: 28.05.2002 - 16:36:28

Hallo Rainer,

m.E. am einfachsten so:


Sub Doppelschleife()
For i = 1 To 5
    For j = 1 To 9
        Cells(j, i) = i * j 'oder irgendeine Code
    Next j
Next i
End Sub

Gruß
Martin Beck

 

Beiträge aus den Excel-Beispielen zum Thema "reihenfolge eines range-objektes ändern"