VBA宏可檢查多個單元格（同一行）並將公式寫入空白單元格之一

Question

我正式將我的驕傲放在一邊，並尋求幫助。 我花了很多時間試圖提出一個VBA宏，但收效甚微。

快速概述：我使用的程序將2D打印尺寸導出到我構建的模板中。 不幸的是，它導出了（3）個不同的尺寸選項。 為了達到最終目的，在“打印尺寸”列（H列）中需要有一個值，在+ Tol和-Tol列（I和J列）中都需要有一個值。 因此，如果給定行中的所有（3）單元格中都有一個值（ 請參見第19行-下面的屏幕截圖 ），則無需執行任何操作。

在（3）種情況下不會發生上述情況：

• 第一個是導出尺寸范圍時（I和J列中的值，H列中的值都是空白）。 （ 請參見下面的第20行-屏幕截圖 ）因此，公式將必須為-H20 =（（I20 + J20）/ 2）。

• 第二種情況是當給出H / J列為空白的MAX TOL（I列）時。 （ 請參見下面的第32行-屏幕截圖 ）因此公式將需要為H32 =（I32 / 2）。 J32還需要輸入一個值“ 0”。

• 第三種情況是當給出H / I列為空白的MIN TOL（J列）時。 （ 請參見下面的第27行-屏幕截圖 ）因此，公式將必須為-H27 =（J27 / 2）。 I27還需要輸入一個值“ 0”。

模板屏幕截圖

抱歉，我尚未允許將圖像上傳到帖子，因此屏幕截圖模板已鏈接到上方。

在此先感謝您的幫助！