国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 辦公 > Excel > 正文

Excel如何實現(xiàn)換行前一行變成后一行數(shù)字

2024-08-23 19:56:15
字體:
供稿:網(wǎng)友

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

  看圖吧。不是專業(yè)的說不清楚。就是比如說列到E,,行到50

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

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

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

Excel如何實現(xiàn)換行前一行變成后一行數(shù)字飛 CUOxin.COM

  寫了一段代碼,把這段代碼復制到你要實現(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

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


發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板: 芦山县| 鄂尔多斯市| 宜兰县| 武陟县| 汤原县| 江都市| 丁青县| 石台县| 柯坪县| 南部县| 邵东县| 青海省| 施秉县| 汉中市| 饶河县| 普兰店市| 通许县| 新沂市| 甘泉县| 兰州市| 香格里拉县| 遂昌县| 策勒县| 韶山市| 江都市| 远安县| 家居| 宾阳县| 佳木斯市| 沙雅县| 乌鲁木齐市| 白玉县| 高雄县| 崇州市| 靖州| 偃师市| 贵港市| 留坝县| 台东市| 长子县| 庆安县|