Advertisement
StoneHaos

excel_macro

Oct 8th, 2021
1,398
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Sub Ìàêðîñ1()
  2.     For Index = 3 To 50
  3.     Cells.Replace What:=Cells(Index, "P").Value, Replacement:=Cells(Index, "O").Value
  4.     Next
  5. End Sub
  6.  
  7.  
  8.  
  9.  
  10.  
Advertisement
RAW Paste Data Copied
Advertisement