excel怎么把空白格变回格子

1.Excel 表格中的空白格要用IF返回空白格怎么弄

EXCEL中空值用英文双引号""表示；

比如判断A1单元格是否为空值，用公式：=A1="";

如果为空值则返回空值，否则返回其它值，用条件公式：=IF(A1="","",A1*4)，指当A1为空时返回空，否则等于A1的4倍。

2.EXCEL 如何将空白格去除并自动从左至右,从上至下进行排列

运行此宏：

Sub Macro1()

'

' Macro1 Macro

' 宏由 cnmhdzc 录制，时间： 2012-6-7

'

'思路，将要操作的区域有效数据保存到数组，然后按顺序填充到指定区域

On Error GoTo errorlab

Dim i, j, m, vcnt As Integer

Dim ccnt, scnt As Integer

Dim temp()

ccnt = ActiveSheet.UsedRange.Columns.Count '获取已用区域的列数

scnt = ActiveSheet.UsedRange.Cells.Count '获取已用区域的单元格数

ReDim temp(scnt)

m = 0

For Each Ce In ActiveSheet.UsedRange.Cells

If Ce.Value2 "" And Not IsNull(Ce) Then

temp(m) = Ce.Value2 '将有效数据存到数组

m = m + 1

End If

Next Ce

vcnt = m '有效数据个数

Sheets.Add '添加工作表

ccnt = InputBox（"输入目标区域的列数"， ""， ccnt） '获取填充区域的列数

ccnt = Int(ccnt)

m = 0

For i = 1 To Int(vcnt / ccnt) + 1

For j = 1 To ccnt

If m >(vcnt - 1) Then Exit Sub '赋值完毕退出程序

Cells(i, j) = temp(m)

m = m + 1

Next j

Next i

errorlab:

MsgBox (Error)

End Sub