我有以下..
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
执行后,有问题的行的高度从最初的 15 修改为 11.25,显然是所选字体的最小值。
我怎样才能防止这种情况?