VBA Excel to cut and paste information in a from one worksheet to another

  • That doesn't answer my question. What determines the cells to move.

    information that is in sheet AKT (B1)

    sheet SATİSH (B:B)

    sheet ALİSH (B:B)

    sheet Bank (J:J)


    redo or completely change the code in the AKT

    x = Application.WorksheetFunction.CountIf(sh2.Columns("B:B"), sh.Range("B1"))=0

  • Quote

    I don't know English well and I have to talk to you through the Google translator. don't be angry if I don't always understand you

    That's not a problem


    So you want to split the data to individual sheets?

  • The data in the columns in each sheet do not seem to match

    Yes do not match. So you need code something like this. x = Application.WorksheetFunction.CountIf(sh2.Columns("B:B"), sh.Range("B1"))=0

    in this file there is a VBA cod that collects information from 2 sheets (ALİSH/SATİSH) I need to add another sheet Bank.

  • I'm not sure if this is correct


  • Does this work?