Nummer in Zieldatei schon vorhanden?
19.07.2003 18:16:43
Franz W.
mit folgendem Code von Hajo übertrage ich Daten von einer Datei in eine andere, wobei es sich bei ActiveCell um eine Nummer handelt (Der Button sitzt im aktiven Blatt der Datei "DatenKunden.xls"):
Sub Uebertragen()
Dim LoLetzte As Long
Windows("DatenKunden.xls").Activate
With Workbooks("RechnungenEH.xls").Worksheets("Offene")
LoLetzte = .UsedRange.SpecialCells(xlCellTypeLastCell).Row + 1
.Cells(LoLetzte, 1) = ActiveCell
.Cells(LoLetzte, 2) = ...
.Cells(LoLetzte, 3) = ...
End With
End Sub
Die Ursprungsdaten können sich ändern und sollen nun in die Zieldatei aktualisiert übertragen werden, ALSO DEN ALTEN EINTRAG ÜBERSCHREIBEN, KEINE NEUE ZEILE EINFÜGEN. Wie kann ich also abfragen, ob es die Nummer, die in der ActiveCell steht, in der Spalte A der Zieldatei schon mal gibt und in welcher Zeile, um diese Zeile dann überschreiben zu können? Ich weiß nicht so recht, wie ich anfangen soll...
Vielen Dank im Voraus
Grüße
Franz