erst löschen dann einfügen
30.09.2005 13:12:01
lexika
kann mir vielleicht jemand sagen wie man erst eine Tabelle in einem bestimmten bereich löscht bevor man die neue einfügt?
Füge mit folgendem code die tabelle ein
With Worksheets("Sensor 1").QueryTables.Add(Connection:= _
"TEXT;D:\excel\Neu\1\" & NeuesteDatei _
, Destination:=Range("A12"))
.Name = "Sensor_1"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.RefreshStyle = xlOverwriteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = False
.RefreshPeriod = 0
.TextFilePromptOnRefresh = False
.TextFilePlatform = xlWindows
.TextFileStartRow = 1
.TextFileParseType = xlDelimited
.TextFileTextQualifier = xlTextQualifierDoubleQuote
.TextFileConsecutiveDelimiter = False
.TextFileTabDelimiter = True
.TextFileSemicolonDelimiter = True
.TextFileCommaDelimiter = False
.TextFileSpaceDelimiter = False
.TextFileColumnDataTypes = Array(1, 1, 1, 1)
.Refresh BackgroundQuery:=False
End With
da ich aber vorher nicht weiß ob die neue tabelle genauso lang wie die alte ist würde ich sie gerne löschen.
Danke