Announcement

Collapse
No announcement yet.

Schleife zum Zellen markieren

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Schleife zum Zellen markieren

    Hallo zusammen,
    beschäftige mich erst seit kurzen zwecks eines kleinem Projektes mit VBA! habe eine Schleife gebaut, die mir immer wieder eine neue Zeile markieren soll und in der nach einer Abfrage die Farbe ändern soll oder auch nicht. Mein Problem ist, dass ich es nicht schaffe die gewünschte zeile zu markieren! Hier mein Quelltext
    Code:
    Dim i As Integer
    For i = 10 To 25
     
        If Range("C" & i).Value = "A" Then
     
            Range("B"&i : "G"&i).Select  'wäre mein Vorschlag, klappt aber nicht!
          ' Range("B10:G10").Select
            Selection.Interior.ColorIndex = 46
     
        End If
        
    Next i
    Hoffe es kann mir jemand sagen wie ich meinen Fehler beheben kann so dass genau die zeile i immer von Bi bis Gi markiert ist!
    Danke

  • #2
    Hallo

    mit

    Range("B" & i & ":G" & i).Select

    funktioniert es.
    Immer freundlich
    und
    die MS-Hilfe ist sogar nützlich!

    Comment


    • #3
      Hallo Dominik86

      bei solchen Sachen ist es einfacher den Z1S1 Bezug zu nehmen:
      Dim i As Integer
      For i = 10 To 25

      If cells(i,3).Value = "A" Then
      Range(Cells(i, 3), Cells(i, 7)).Select 'wäre mein Vorschlag, klappt aber nicht!
      Selection.Interior.ColorIndex = 46
      End If

      Next i

      gruß
      Olaf

      Comment

      Working...
      X