QueryTables.Add改變行高

我有以下..QueryTables.Add改變行高

With ActiveSheet.QueryTables.Add(Connection:="URL;" & qurlname, Destination:=DataSheet.Range(Cells(row_stock + iMax, 29), Cells(row_stock + 199, 29))) 
    .BackgroundQuery = True 
    .TablesOnlyFromHTML = False 
    .Refresh BackgroundQuery:=False 
    .SaveData = True 
End With

excution後，有問題的行具有從修改自己的身高什麼最初15至11.25看樣子最低所選字體。

我該如何預防？

來源

2012-08-14 Mike D

這是否發生在多個工作簿中？什麼版本的Excel？我想知道是否有默認模板，但只適用於一個工作簿。 – 2012-08-14 21:02:17

@doug：非常老練，太便宜買新的。我如何知道是否有「默認模板」？ – 2012-08-14 21:08:49

如果它很古老，那麼我不認爲這是問題。不確定，但認爲它只適用於2007年以後。在這些版本中，您會在功能區中看到不同的模板。我仍然好奇，如果它發生在所有的工作簿或只有一個。但我懷疑我正在吠叫正確的樹:) – 2012-08-14 21:12:24

我不知道爲什麼查詢表會改變行高或如何防止它，但我確實設法改變事情，以便查詢表結果被放置在不同的工作表中。將該表格中的單元格複製到主表格中，使行高保持不變。

來源

2012-08-15 14:39:49

QueryTables.Add改變行高

回答

相關問題