Bank reconciliation/matching negative with positive amount using VBA

Hello Pepe
Thank you for your sugestion. I have edited it based on your sugestion.

Hi !

Question : why in Bank Book column E values are in text format instead of numbers, bad import ?! Can be a mess …

Hello Marc
It was imported from email attachment. I know it would be a problem and I don't know how to fix it. Could you help me convert it to number format?

• So it's a very bad import ‼ Text could be transformed to numbers with a child level workaround
  but the better is to revise the import code !
  
  
• Your first attachment has errors in result …
  
  
• Explain what is new in the last attachment, why this newer version ?

• Thank for your feedback. I have edited it to the number format and attached it in the last attachment
• I have edited it
• As I mention above, because I have edited it to the number format

• Your last attachment result layout does not match with the new layout of Bank Book worksheet, still the initial …
  
  
• Still errors in your result !
  
  
• Anyway according to your last attachment a demonstration as a beginner starter :

PHP Code: 

Sub Demo()
             Dim Rw As Range, Rf As Range
    With Sheet2.UsedRange.Columns
           .Item("Q:T").Offset(1).Clear
            Application.ScreenUpdating = False
        For Each Rw In Sheet1.UsedRange.Rows("2:" & Sheet1.UsedRange.Rows.Count)
            If Rw.Cells(5).Value2 Then
                Set Rf = .Item(11).Find(-Rw.Cells(5).Value2, , xlFormulas, xlWhole)
                If Not Rf Is Nothing Then Rw.Range("A1,C1,E1:F1").Copy Rf(1, 7)
            End If
        Next
    End With
            Set Rf = Nothing
            Application.ScreenUpdating = True
End Sub 


Do you like it ? So thanks to click on bottom left star icon « ★ Add Reputation » !

Thank you Marc. It work well

Hi, can you share with me with your final version of the file including code? thank you