首先，选中需要调整的行。

方法一：右键左边方框区域，选择”行高：

然后设置“行高”，点“确定”即可。

方法二：左键选中圆框区域的横线，一直按住左键，上下移动到合适的高度，松开鼠标，选中区域的所有行高都会一起变化。

改变列宽的方式也是一样，先选中需要调整的列，然后通过设定固定列宽值，或者拖动列宽线，来改变列宽。

（本文内容由百度知道网友ervinfang贡献）

Excel中可以通过分别设置单元格列宽和行高为同一个数值的方式将格子调成一样大小的。

软件版本：Office2007

方法如下：

1.调整列宽大小：先选择A列，然后同时按下Ctrl+Shift+向右箭头，将全部列都选中，点击右键，选择“列宽”：

2.输入列宽数值（系统默认为8.38），点击确定：

3.这样所有单元格的宽度就变成一致了。

调整行的方法基本一致：先选择第一行，按下Ctrl+Shift+向下箭头键，点击右键，选择“行高”，输入行高数值即可。

（本文内容由百度知道网友鱼木混猪贡献）

操作方法如下：

1.如图，将单元格区域复制，并粘贴到另外的区域，很明显，粘贴后并没有所有的格式复制过来。特别是行高列宽。要重新调整很麻烦。

2.其在粘贴选项里选择保持“保留源列宽”就可以了。

3.第二种方法是选择性粘贴的方法，

点鼠标右键→“选择性粘贴”命令，在对话框中选择“列宽”。

4.整行复制可以保留行高，整列复制可以保留列宽，都要保留就只有整表复制。

所以大家如何要同时保持行高和宽的话，要同是选择区域所在的行和列。

（本文内容由百度知道网友lvrqing贡献）

分享 Excel 批量图片导入功能，使单元格高度和宽度适应图片。

Excel 批量图片导入功能，很多插件有这个功能，大部分插件的导入功能都是使图片适应单元格的大小，

但是这点可能跟很多人的实际需求不一样，因此我单独写了一个图片导入功能，使单元格适应图片的大小。

代码缺点，需要手工替换代码中的 .png 图片格式为你 自己需要导入的 图片文件格式.

附上代码：

Sub 导入图片()

Dim wenjian_geshu

Dim lujin

Dim tupian_name

Dim zonghe_bi

Dim hanggao

Dim tishi_kuozhangming

tishi_kuozhangming = MsgBox(vbCrLf & "请确认是否需要 修改 程序代码的 文件扩展名 ？ " & vbCrLf & vbCrLf _

& "点击 “确定” 退出程序，并修改程序扩展名；" & vbCrLf & vbCrLf _

& "点击 “取消” 继续导入图片。" & vbCrLf & vbCrLf _

, vbOKCancel)

If tishi_kuozhangming = vbOK Then Exit Sub

wenjian_geshu = 0

lujin = InputBox("请输入图片文件夹路径，可以贴入路径")

If lujin = "" Then Exit Sub

tupian_name = Dir(lujin & "*.png", vbNormal)

'.png 格式可以更改为其他格式，用于显示其他格式的图片，

'.png 可以替换为 .* 任意文件格式，但是为了避免 ActiveSheet.Shapes.AddPicture(lujin & "" & ActiveSheet.Cells(wenjian_geshu, 1).Text & ".png", _ 程序出错，暂时不替换

'但是可以新建不同的工作簿，再导入不同格式的图片后，将表格合并为一张表格。

'不可以在同一工作簿的不同表格中重复执行 代码，即使将 新建分页表 的 名称改为 Sheet1 也不可以，因为本人水平有限不会修改测试了。希望能有大神优化下代码。

Do

If tupian_name = "" Then '输出图片名称 到 第 1 列

Exit Do

End If

wenjian_geshu = wenjian_geshu + 1

ActiveSheet.Cells(wenjian_geshu, 1).Select '方便查看执行到哪一行了

ActiveSheet.Cells(wenjian_geshu, 1) = tupian_name '输出图片名称

Rows(wenjian_geshu).RowHeight = 409 '设置行高为 Excel 的最大值 409

Columns(5).ColumnWidth = 255 '设置列宽为 Excel 的最大值 255

Dim tupian

Set tupian = ActiveSheet.Pictures.Insert(lujin & "" & ActiveSheet.Cells(wenjian_geshu, 1).Text)

With tupian

.ShapeRange.LockAspectRatio = msoTrue '锁定纵横比

.Placement = xlMoveAndSize '图片大小和位置随单元格的大小和位置而改变。

.Top = ActiveSheet.Cells(wenjian_geshu, 5).Top + 4

.Left = ActiveSheet.Cells(wenjian_geshu, 5).Left + 4 '两行代码设置图片左上角位置，对其单元格，距离单元格边距为 4

zonghe_bi = .Width / .Height '取得图片的 长宽比，以便后续图片的实际高度超过行高的时候，重新设置图片宽度，以保持图片缩小后的长宽比例

Cells(wenjian_geshu, 2) = Int(.Height) + 1

hanggao = Cells(wenjian_geshu, 2) + 3

If hanggao > 409 Then '不超过 409 则就使用上一行代码图片的默认长度

.Height = 403 '超过 EXCEL 最大行高 409，则设置图片 高度为 403，并根据图片纵横比 重新设置图片的长度

.Width = zonghe_bi * .Height ' 根据图片综合比 重新设置图片的长度

Else '不超过 409 则就使用上一行代码图片的默认长度

Rows(wenjian_geshu).RowHeight = hanggao + 6

End If

Cells(wenjian_geshu, 6) = .Width '图片后面的第一列即表格的第六列存储

If wenjian_geshu > 1 Then

If Cells(wenjian_geshu, 6) < Cells(wenjian_geshu - 1, 6) Then Cells(wenjian_geshu, 6) = Cells(wenjian_geshu - 1, 6)

End If

'取得列宽最大值，以便循环结束后设置最大列宽

Cells(wenjian_geshu, 1) = Left(Cells(wenjian_geshu, 1), Len(Cells(wenjian_geshu, 1)) - 4) '重新输出图片名称，去掉扩展名。

Cells(wenjian_geshu, 7) = .Height '在执行 Delete 语句 删除 链接图片之前取得修改后的图片 宽 和 高的数据

Cells(wenjian_geshu, 8) = .Width

.Delete 'Pictures.Insert只能插入图片链接，不能将图片与表格一起保存，

'故 删除图片链接，改用 Shapes.AddPicture 导入图片，使图片与表格同时保存，以上全部代码用来设置行高和列宽，及 设置 取得 图片的 宽 和 高 ，使其适应单元格的 高 和 宽

'.png 格式可以更改为其他格式，用于显示其他格式的图片，

ActiveSheet.Shapes.AddPicture(lujin & "" & ActiveSheet.Cells(wenjian_geshu, 1).Text & ".png", _

False, _

True, _

ActiveSheet.Cells(wenjian_geshu, 5).Left + 4, _

ActiveSheet.Cells(wenjian_geshu, 5).Top + 4, _

Cells(wenjian_geshu, 8), _

Cells(wenjian_geshu, 7)).Select '在第五列导入图片

Selection.ShapeRange.LockAspectRatio = msoTrue '锁定纵横比

Selection.Placement = xlMoveAndSize '图片大小和位置随单元格的大小和位置而改变。

End With

tupian_name = Dir '再次调用 dir 执行下面的图片的循环操作，不可以有参数，

'此句为整个代码断 最重要的语句，虽然我看不懂，但是直接用吧，有用就好了，知其然而不知其所以然好了。

Loop

Columns("E:E").Select

Selection.ColumnWidth = Int(Cells(wenjian_geshu, 6) / 5.9) '设置列宽为最大图片的列宽，5.9 为图片宽度 与 Excel 表格的宽度比

Columns("A:A").Select

Columns("A:A").EntireColumn.AutoFit

Columns(6).Select

Selection.Delete Shift:=xlToLeft '设置完第 5 列的列宽后，删除存储最大列宽值的 第 6 列

Columns("F:XFD").Select

Selection.ColumnWidth = 8.11

Columns("B:D").Select

Selection.Delete Shift:=xlToLeft

Columns("C:D").Select

Selection.Delete Shift:=xlToLeft

Range("A1").Select

'可以通过删除和插入列 的代码，调整图片名称列 和 图片实际位置列 最终所在的位置列

ActiveSheet.UsedRange.Select '添加边框

Selection.Borders(xlDiagonalDown).LineStyle = xlNone

Selection.Borders(xlDiagonalUp).LineStyle = xlNone

With Selection.Borders(xlEdgeLeft)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

With Selection.Borders(xlEdgeTop)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

With Selection.Borders(xlEdgeBottom)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

With Selection.Borders(xlEdgeRight)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

With Selection.Borders(xlInsideVertical)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

With Selection.Borders(xlInsideHorizontal)

.LineStyle = xlContinuous

.ColorIndex = 0

.TintAndShade = 0

.Weight = xlThin

End With

MsgBox ("图片导入完成！")

Range("A1").Select

End Sub

程序执行完成以后，A列放置的数据为自己命名的图片名称，B列放置的为图片。

Excel 批量图片导入功能，使单元格高度和宽度适应图片

行高列宽是Excel最基础内容，但在实际工作中，有很多小伙伴对于行高和列宽的设置还是有些懵懂，所以本期帮主主要与大家讲讲如何设置Excel的行高和列宽。

1、行高的单位像素怎么更改为厘米？

在设置表格时，要求设置单位是厘米，但默认情况下以像素为单位的，该怎么更改呢？

首先点击表格页面的右下角的页面布局（或者选择视图——页面布局），然后再拉动表格的大小就是以厘米为单位。

具体操作如下：

2、复制表格时，如何使表格的行高和宽度不变？

这里方法有两种：

第一种：直接复制工作表

右击表格标签，选择移动或复制，之后进入相应的对话框，选择需要复制的位置，最后记得勾选【建立副本】即可。

具体操作如下：

注意：这种方法适用与复制整张表格内容。

第二种：复制部分表格

针对这种方法，我们可以直接选择整行内容，之后点击选择性粘贴中的【保留源列宽】即可。

具体操作如下：

3、行高如何自动调整？

怎么样让表格自动调整行高或者列宽呢？方法比较简单。

方法一：直选中行或者列，然后双击表格边框即可。（注意：想要调整行高则选择行，调整列宽则选中列。）

具体操作如下：

方法二：选中区域单元格，之后点击【开始】——【单元格】——【格式】——【自动调整列宽】或者【自动调整行高】

具体操作如下：

4、如何精确调整固定行高或列宽？

选择需要调整的行或列，之后右击选择行高或列宽即可。

具体操作如下：

以上就是有关行高列宽的设置方法，希望对大家有所帮助，若有什么问题，欢迎在下方留言。

行高是：Ctrl+H列宽是：Ctrl+W

设置行高和列宽的方法：

1.打开excel

2.在任意一个单元各种，点击鼠标左键，选择任意一个单元格

3.选中单元格后，按Ctrl+A，这时候整个表格已经被选中了

4.把鼠标移到左侧行数线处，当鼠标出现平行线的时候，拖动行线，把行高拉到想要的高度，然后松开鼠标，这时可以看见整个表格的行高已经变成我们想要的高度了

5.跟第四步相同的方法，把列宽也拉倒我们想要的宽度后，松开鼠标。这样就很方便快捷的批量的设置了行高和列宽。

6.点击表格左上侧的保存按钮，这样就可以保存更改后的表格了。

（本文内容由百度知道网友绿衣人敲门贡献）

由于Excel在创建表格时，系统默认表格的行高和列宽为固定值，当我们使用表格的时候，经常会碰到表格内文字过多显示不全或者过少空白太多，为了更美观的展示表格信息，这是我们就需要调整行高和列宽到合适的尺寸了。如果全部手动调整，还是比较麻烦的，今天小编和大家一起学习快速调整行高和列宽的方法。

一、快速调整到合适的行高和列宽

由于操作原理相同，以调整列宽为例：如果B列过宽，那么我们将鼠标移动到B、C列之间的分割线上，此时鼠标变为左右双向箭头显示，按住鼠标左键进行拖拽，此时鼠标旁边会出现被调整单元格的列宽信息，调整宽度到合适的要求后，松开鼠标即可完成。

如果需要快速适应，自动调整列宽，则当鼠标变为左右双向箭头时，双击鼠标左键即可完成系统的自适应调整。也可以，选中列，切换到【开始】选项卡，在【单元格】组中，点击【格式】的下三角按钮，在弹出的快捷菜单中，点击【自动调整列宽】即可。

如需多列进行调整，选中多列后（例如：A-D），在任意列的分割线上（例如：B-C），鼠标变为左右双向箭头即可拖动，表格的多列就同时进行了调整，同时其余选中列都变为B列的列宽。

二、精确调整固定行高和列宽

由于操作原理相同，以调整列宽为例：选中需要调整的列，单击鼠标右键，在弹出的快捷菜单中，点击【列宽】选项，此时弹出【列宽】对话框，在对话框中可以输入列宽的值，例如：20，点击【确定】按钮，回到表格即可看到调整效果。

欢迎关注，以上。

excel是我们办公要用到的办公软件，一般我们新建的excel表格行高和列宽都是比较小的，所以大部分的情况我们是要调整excel的行高列宽的，那么今天我就教大家excel怎么统一调整行高吧。

excel怎么统一调整行高

目前我设置excel统一行高的方法有两种，效果都是将excel表格里选定的行的行高统一成一样的高度，其实方法很简单，大家按下面我的操作步骤就可以学会了，当然了我这边也做了一张行高不统一的表来做操作案例。

第一种方法是我们首先鼠标移动到需要调整行高的左侧行数字上，然后点击鼠标左键往下拉选中所有的需要统一行高的行。

然后点击鼠标右键就可以看到行高的设置选项，点击行高就会弹出行高的设置页面，然后我们可以将行高设置成统一的高度了，一般使用20效果比较好，这里就填20了。

确定后excel统一调整行高就做好了，这种是针对部分行高做调整的。

当然了我们也可以通过鼠标左键选择excel表格左上角的全选单元格，然后再右键设置行高，这样我们就可以让所有的行都设置统一的行高了。

其实统一全部行高，我们还可以这么做，就是鼠标左键选择excel表格左上角的全选单元格选定表格所有行列后，鼠标移动到第一个行的下方，出现拖动按钮鼠标左键按住往下拉，放开后会拉开的高度会应用到所有的行高中。

霸气走火就是我，我就是百度经验作者：ixlxt7Xzsl7，百度经验首发原创内容分享。

选中需要打印的区域，选择：页面布局--打印区域--设置打印区域；

选择：页面布局--打开页面设置；

选择：页面，调整缩放比例，或者“调整为1页宽1页高”；

选择：页边距，调整四个方向的页边距，或者选择：居中方式，勾选“水平居中”、“垂直居中”；

以上操作，需要适当调整行高、列宽，并点击打印预览，查看打印效果，确保行高列宽选择适当，布局称体。

（本文内容由百度知道网友505548375贡献）

在使用Excel时，有时需要将单元格宽度和高度的单位设置成厘米，例如在用Excel排版制作档案盒、文件夹等的标签时。但在调整Excel单元格宽度和高度时，默认是以磅和像素为单位的。这里以Excel2007为例介绍一下如何将Excel单元格高度和宽度的单位设置成厘米，供大家参考。

●先点击Excel2007的Office按钮菜单中的“Excel选项”按钮，打开Excel选项对话框。（注：其他版本的Excel打开Excel选项对话框的方式可能不同，例如Excel2010应点击“文件”菜单中的“选项”。）

●点击打开Excel选项对话框中的“高级”选项卡。

●打开“高级”选项卡后，Excel2007中需将右侧的滑块拖至下图所示的位置。

●此时在高级选项卡中的“显示”处可以看见“标尺单位”下拉框，点击该下拉框。

●点击后会弹出下拉菜单，在下拉菜单中点击“厘米”选项。

●设置好后点击下方的“确定”按钮确认。（注：到这里可能还不能使用厘米单位，还应继续看下一步。）

●虽然设置好了以厘米为单位，但如果Excel当前的视图方式仍为默认的普通视图，则列宽和行高仍然会是以磅和像素为单位。要想使用设置好的厘米单位，需要点击Excel下方图示的“页面布局”按钮，将视图方式转换为“页面布局”视图。

●在“页面布局”视图中调整列宽或者行高，就会发现显示的单位是厘米了。

●如果觉得拖动鼠标更改行高和列宽不容易进行精确的设置，可以手动输入行高和列宽的具体数值，方法是：在行号或者列标上点击鼠标右键，再用鼠标左键点击弹出菜单中的“列宽”或者“行高”。

●点击后就会弹出“列宽”或者“行高”的设置对话框，其中的单位就是之前设置的厘米（cm），在“cm”前输入想要设置的数值，再点击“确定”按钮即可。