VBA Excel調整行高

-4

我在Excel中創建報表，我希望VBA根據列K中的值格式化行高。例如，如果單元格K17 = 11.25，我希望行17爲11.25。單元k18 = 21.75，所以第18行= 21.75。VBA Excel調整行高

我需要vba來改變17-400的每一行。

這應該是相對簡單的，但我似乎無法拿出正確的編碼。

來源

2015-11-16 Randa

請張貼代碼*您是來與*，使我們可以幫助你得到你所需要的。 –

看看循環，記錄下自己做的事情，然後看看代碼。你需要做的是循環的東西，你可以宏觀記錄，然後decifer，這是如何我們很多人瞭解:)這裏沒有真正的問題來回答 –

我可以用宏記錄循環，但我手動輸入高度值這沒有幫助。我不能做的是獲得代碼來查看K列中的動態單元格。是的，你是正確的，我需要循環幫助。 – Randa

由於這是一個簡單的一個，我繼續爲您提供了答案：

Sub RowHeight() 

Dim ws as Worksheet 
Set ws = Sheets("mySheet") 'replace with your sheet name 

Dim rCell as Range 
For each rCell in ws.Range("K17:K400") 

    rCell.EntireRow.RowHeight = rCell.Value 

Next 

End Sub

來源

2015-11-16 20:32:41

VBA Excel調整行高

回答

相關問題