Send data to another sheet automatically

[brunocordeiro]

I am trying to create a macro that send values to another sheet, i did it:

Sheets("MATRIZ DE POLIVALÊNCIA").Select
Columns("E:E").Select
Range("E4").Activate
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Range("E8").Select
ActiveCell.FormulaR1C1 = "='RICARDO'!R[-6]C[19]"
Range("E9").Select
Selection.FillDown
Range("E10").Select
Selection.FillDown

But, doing like that, it only works specifically with the 'RICARDO' tab, i want to do it for many other sheets.
Explaining the situation, i am creating a record of every employee in the company, this record contains their skills, from 0 to 3, i want to send these skills levels to a main table, 'MATRIZ DE POLIVALÊNCIA'.