excel如何實(shí)現(xiàn)換行。前一行變成后一行的數(shù)字?

　　看圖吧。不是專(zhuān)業(yè)的說(shuō)不清楚。就是比如說(shuō)列到E，，行到50

　　每次給A1給輸入數(shù)字。b1就變成A1的,,,c1就變成b1...e1就變成c1。。到e1結(jié)束。。。

　　反正只要給A1輸入。。后面的就變成前面一行的數(shù)字..

　　問(wèn)題補(bǔ)充：每次給A1給輸入數(shù)字。B1就變成A1的,,,C1就變成B1...E1就變成C1。。。A2變成E1的數(shù)字。只要前面A1有輸入。就往后推。只要5列。。能輸入5列就行..行幾多都行。

　　寫(xiě)了一段代碼，把這段代碼復(fù)制到你要實(shí)現(xiàn)功能的表里：

　　Private Sub Worksheet_SelectionChange(ByVal Target As Range)

　　Dim i As Integer

　　For i = 3 To Range("a2").Value

　　If Range("a" & i).Value <> "" Then

　　Range("A" & i).Insert Shift:=xlToRight

　　End If

　　Next

　　End Sub

　　該代碼從第三行開(kāi)始實(shí)現(xiàn)該功能，你可以在A2單元格里面輸入你要實(shí)現(xiàn)該功能的最后一行行數(shù)，如10，參見(jiàn)下圖