Den vil ikke vælge Row

IF.OFFSET(i, 0) = SVAR THEN RW = .OFFSET(i, 0).Row

Hej Kabbak

Jeg har skrevet forkert i mit spørgsmål, så her er noget af koden

For i = 1 To 6
            If .Offset(i, 0) = SVAR Then
        Found = True
        Exit For
          End If
          Next
         
            End With
      If Found = True Then
      MsgBox SVAR & " Er Stadigt god”"
  Else
    ActiveCell.Offset(0, -3).Value = Date
    MsgBox SVAR & "Lånt A”"
    Rows(ActiveCell).Select  '  HVORDAN FÅR JEG DEN TIL AT VÆLGE ROW, på den celle den pejer ?
    Selection.Cut(HER SKULLE JEG GERNE SLETTE RÆKKEN ?

ActiveCell.EntireRow.Cut var hvad jeg skulle skrive

Jeg forstår ikke koden,
Else
    ActiveCell.Offset(0, -3).Value = Date
her skriver du en dato 3 kolonner til venstre for aktive celle

Rows(ActiveCell.row).Select 

her vælges rækken med den aktive celle, den samme række som du lige har skrevet dato i

Selection.Cut
klipper rækken, hvis den skal slettes er det

Selection.Delete


Men hvorfor slette en række du lige har skrevet i ????

Hey'

Forstår dig godt, da det er kun udklip af siden som jeg har skrevet ned.

Det hele forgår på 2 forskellige Ark, så der hvor jeg klipper det ud er for at sætte det ind på en anden ark, og linien skal slettes fra første Ark

Håber det giver lidt mening

For i = 1 To 6
            If .Offset(i, 0) = SVAR Then
        Found = True
        Exit For
          End If
          Next
       
            End With
      If Found = True Then
      MsgBox SVAR & " Er Stadigt god”"
  Else
    ActiveCell.Offset(0, -3).Value = Date
    MsgBox SVAR & "Lånt A”"
    Rows(ActiveCell.row).Select  ' vælger rækken

  Selection.Cut(HER SKULLE JEG GERNE SLETTE RÆKKEN ?

den sidste sletter ikke rækken, men tømmer den for indhold, den kan kun fjernes med Delete

Svar tak :-)

Kabbak, svar tak :-)

et svar ;-))