Wert in Zelle überschreiben
13.12.2004 13:28:36
Christian
ich habe folgende Abfrage, die das Ergebis immer in bestimmte Zellen ausgibt.
sql_statement_1 = "SELECT COUNT(DISTINCT cl_id) " & _
...
'Ergebnis einfügen
With ActiveSheet.QueryTables.Add(Connection:=connstring, Destination:=ActiveSheet.Range("N9"), Sql:=sql_statement_1)
.FieldNames = False
.BackgroundQuery = False
.Refresh
End With
Wenn ich die Abfrage nun erneut ausführe, wird immer eine neue Spalte eingefügt, die Werte in den Zellen sollen aber einfach überschrieben werden.
Kann mir jemand helfen?
Gruss
Christian