粘贴到Excel后自动调整行高

粘贴到Excel后自动调整行高,excel,row,vba,Excel,Row,Vba,我使用MS Excel 2007制作账单和报价单。我经常需要重复使用以前的报价 复制报价单并将其粘贴到新位置后,需要为每行重新调整行高 有什么解决办法吗?我不完全确定这是否就是你想要的。但是你试过这样的东西吗 Private Sub Worksheet_Change(ByVal Target As Range) ' Here you enter a matrix with the cells you want to trigger a Autofit ' If you just wa

我使用MS Excel 2007制作账单和报价单。我经常需要重复使用以前的报价

复制报价单并将其粘贴到新位置后,需要为每行重新调整行高


有什么解决办法吗?

我不完全确定这是否就是你想要的。但是你试过这样的东西吗

Private Sub Worksheet_Change(ByVal Target As Range)
   ' Here you enter a matrix with the cells you want to trigger a Autofit
   ' If you just want one column to do it, take Range("A1:A200") 
    Range("A1:C11").EntireRow.AutoFit
End Sub
此代码在每次更改choosen单元格中的值时自动拟合行大小

当你不提供太多信息时,很难想出一个好的解决方案

请点击此处: 如果我的代码帮不了你


致以最诚挚的问候

您尝试过什么吗?我建议您首先使用
.EntireRow.AutoFit
粘贴公式和值。