您好我正在嘗試使用 vba 插入一個新行(到 excel)并將陣列中的資料添加到其中。我能夠做到這一點,但陣列的長度小于一行中的單元格數
單行單元格數:12 陣列:9
最后 3 個單元格中有公式,當添加新行時會自動復制,但是我可以添加新資料的唯一方法是覆寫這些顯示為 #N/A
除其他外,該陣列由以下資料組成:
tempArray(j)=Array("=HYPERLINK([@Location]," & Chr(34) & files.ListColumns("Name").DataBodyRange(i) & Chr(34) & ")",...,...,...,...)
我知道我是否有可以取消的靜態不相關公式(非“@”),ListRows.Add這是我正在做的,但現在我需要相關公式。
我嘗試了各種方法,例如:
With data.ListRows.Add
'Set newRng = .Range.Range(.Range.Cells(1, 1), .Range.Cells(1, 9))
.Range.Range(.Range.Cells(1, 1), .Range.Cells(1, 9)).Value2 = tempArray(i)
.Range.Value2 = tempArray(i)
'data.Range(data.Cells(lr 1, 1), data.Cells(lr 1, UBound(tempArray(i)) 1)).Value = tempArray(i)
lr = lr 1
End With
我知道這個答案與類似的東西有關,但我想一口氣應用它,而不是一個一個地應用
uj5u.com熱心網友回復:
您可以根據 tempArray 的大小調整串列行的范圍:
Dim lr as ListRow 'I prefer to use a single variable for readability reasons
With data
Set lr = .ListRows.Add
lr.Range.Resize(, UBound(tempArray) 1).Value = tempArray
End With
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/486698.html
