excel怎么让竖着的一列数据横着排,一排4个. 或者想办法帮我改一下我写的一个宏,这个宏虽然可以让竖着的一列数据4个一排横着排但是会出现第一行第四格空出一格的情况,有什么办法把程序
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/21 03:39:12
![excel怎么让竖着的一列数据横着排,一排4个. 或者想办法帮我改一下我写的一个宏,这个宏虽然可以让竖着的一列数据4个一排横着排但是会出现第一行第四格空出一格的情况,有什么办法把程序](/uploads/image/z/1116131-59-1.jpg?t=excel%E6%80%8E%E4%B9%88%E8%AE%A9%E7%AB%96%E7%9D%80%E7%9A%84%E4%B8%80%E5%88%97%E6%95%B0%E6%8D%AE%E6%A8%AA%E7%9D%80%E6%8E%92%2C%E4%B8%80%E6%8E%924%E4%B8%AA.++%E6%88%96%E8%80%85%E6%83%B3%E5%8A%9E%E6%B3%95%E5%B8%AE%E6%88%91%E6%94%B9%E4%B8%80%E4%B8%8B%E6%88%91%E5%86%99%E7%9A%84%E4%B8%80%E4%B8%AA%E5%AE%8F%2C%E8%BF%99%E4%B8%AA%E5%AE%8F%E8%99%BD%E7%84%B6%E5%8F%AF%E4%BB%A5%E8%AE%A9%E7%AB%96%E7%9D%80%E7%9A%84%E4%B8%80%E5%88%97%E6%95%B0%E6%8D%AE4%E4%B8%AA%E4%B8%80%E6%8E%92%E6%A8%AA%E7%9D%80%E6%8E%92%E4%BD%86%E6%98%AF%E4%BC%9A%E5%87%BA%E7%8E%B0%E7%AC%AC%E4%B8%80%E8%A1%8C%E7%AC%AC%E5%9B%9B%E6%A0%BC%E7%A9%BA%E5%87%BA%E4%B8%80%E6%A0%BC%E7%9A%84%E6%83%85%E5%86%B5%2C%E6%9C%89%E4%BB%80%E4%B9%88%E5%8A%9E%E6%B3%95%E6%8A%8A%E7%A8%8B%E5%BA%8F)
excel怎么让竖着的一列数据横着排,一排4个. 或者想办法帮我改一下我写的一个宏,这个宏虽然可以让竖着的一列数据4个一排横着排但是会出现第一行第四格空出一格的情况,有什么办法把程序
excel怎么让竖着的一列数据横着排,一排4个.
或者想办法帮我改一下我写的一个宏,这个宏虽然可以让竖着的一列数据4个一排横着排但是会出现第一行第四格空出一格的情况,有什么办法把程序修改一下吗.
Sub 输入数据()
Sheet1.Range("A1").Value = 100
For i = 1 To 100
t = "a" & i
Sheet1.Range(t).Value = i
Next i
End Sub
Sub 改变数据()
Dim i As Integer
Dim j As Integer
Dim b As String,t As String
j = 2
b = "b"
For i = 1 To 100
If i Mod 4 = 0 Then
j = j + 1
b = "b"
End If
t = "a" & i
b = Chr(Asc(b) + 1)
Sheet1.Range(b & j).Value = Sheet1.Range(t).Value
Next i
End Sub
excel怎么让竖着的一列数据横着排,一排4个. 或者想办法帮我改一下我写的一个宏,这个宏虽然可以让竖着的一列数据4个一排横着排但是会出现第一行第四格空出一格的情况,有什么办法把程序
用函数公式就能解决了
在C1单元格写入公式
=INDEX($A:$A,COLUMN(A1)+ROW(A1)*4-4)
或
=OFFSET($A$1,COLUMN(A1)+ROW(A1)*4-5,)
右拉填充至F1单元格,再下拉填充