Excel sheet1 A1 cell of 01, how to realize the sheet2 of A1 cell A1 to sheet1, sheet3 of A1 A2 cells for sheet1, increasing and then go down

CodePudding user response:

Use the formula in sheet2 of A1=sheet1! A1
Use the formula in sheet3 of A1=sheet2! A1
Then according to your needs, use the mouse to drag the cell, the formula of filling into other cells,

CodePudding user response:

Using the following written in ThisWorkbook VAB code, can realize the function you want to achieve, if you want to have been automatically assign values to the sheet10 A1, is the constant Nub assignment of 8, if you want to expand the role to the sheet number of pages, then assign constant accordingly a correct value,
Private Const Nub As Integer=8
Private Sub Workbook_Open ()
Dim As Integer I
For I=0 To Nub
Sheet1. Cells (1, 1). The Value="https://bbs.csdn.net/topics/01"
Sheets (2 + I) Cells (1, 1)=Sheet1. Cells (1, 1 + I)
Next
End Sub
Hope can help to you,