0
Ich baue eine Tabelle in einem VBA-SkriptAuto-fit Datenreihe aber nicht auto-fit Spaltenkopf
ActiveSheet.ListObjects.Add(xlSrcRange, Range("A1:A" & numRows & ":Z1:Z" & numRows), , xlYes).Name = "Table1"
verwenden und es Auto passt die Spalten.
Gibt es Weg, um die Spalten automatisch passen nur auf die Zeilendaten und nicht die Spalten, so möglicherweise die Spalten Header abgeschnitten werden könnte?
Sie können wahrscheinlich nicht beeinflussen, wie diese Methode automatisch funktioniert. Unmittelbar danach könntest du 'Range (" A2: A "& numRows &": Z2: Z "& numRows) .Columns.Autofit' machen, das nur basierend auf den Tabelleneinträgen automatisch passt (bemerke, wie ich bei Zeile 2 anfange schneiden Sie die Header ab). – Mikegrann
Versuchen Sie es mit ActiveSheet.ListObjects ("Table1"). DataBodyRange.Columns.AutoFit –
@ CS Danke !! – casper