VBA L oop вдоль ряда

Question

Возможно ли l oop вдоль строки?

У меня есть строка заголовка дат, я хочу l oop через эти даты, и если одна из дат раньше, чем сегодняшняя дата Я хочу, чтобы действие скопировало содержимое ячеек ниже и вставило значения, чтобы переопределить формулы в этом столбце.

Я уже делал цикл по столбцу, но я действительно изо всех сил стараюсь делать это по ряду. любая помощь или руководство будет принята с благодарностью.

Заранее спасибо:)

Answer 1

Существует три метода проверки ячеек в диапазоне

1 Если вы знаете размер, который вы можете использовать для каждого

   Dim r as range
   For each r in Range("A1:F1")
       'r is assigned to each cell in range above in turn
   Next r

(или если пользователь выделяет диапазон до того, как вы можно использовать свойство Selection)

  For each r in Selection

2 или Вы можете l oop, используя For For и Cells

    Dim x as long
    For x = 1 to 6
     If Cells(1,x) = "Some Value" Then
     End If
    Next x

3 Если вы не знаете конец и просто хотите go до следующей пустой ячейки, затем используйте Do L oop

   Dim r as Range
   Set r = Range("A1")
   Do
      'something
       Set r = r.Offset(0,1)  'move pointer right
    Loop Until r = ""

Надеюсь, это поможет