怎么编写一个宏程序 实现在一个EXCEL中的两个工作表 sheet1和sheet2 使输入的某一行依次写入到其他表格（excel怎么用宏设置一个按钮）

第一个工作表名称： ThisWorkbook.Sheets(1).Name第一个工作表第一行第三列的值： ThisWorkbook.Sheets(1).Cells(1, 3)遍历工作表：For i = 1 To ThisWorkbook.Sheets.CountMsgBox "第一个工作表名称：" & ThisWorkbook.Sheets(i).NameNext i至于新建工作表：Set NewSheet = ThisWorkbook.Sheets.AddNewSheet.Cells(1, 1) = "这是一个新建的工作表"具体求平均值的话就要看你求哪些的了