von little fingers » Sa, 30.05.2020 12:36
Hallo mikeleb!
Dein Beispiel würde bedingen, dass ich immer noch die Tabelle1 über die Spalte F sortieren muss,
dann manuell Zeilen lösche und hinterher die Hilfsspalte wieder einrichten muss.
Geht es nicht, dass Tabelle1 Spalte F , mit Tabelle2, K sowieso verglichen wird und
dann automatisch in Tabelle1, Spalte F der doppelte Eintrag in der ZELLE geleert wird?
Und dass ich danach mit diesem Makro:
Code: Alles auswählen
Sub leereKDloeschen
' Alle Zeilen löschen, do in Zeile C keine Stellplätze definiert sind!!
' nur einmal in der Woche Leerzeilen löschen!!! (Sonntag)
oDoc = ThisComponent
oSheets = oDoc.Sheets
oSheet = oSheets.getbyName("Tabelle1")
oRows = oSheet.getRows
Goto Start
Start:
for i = 150 to 2 step -1 ' zählt rückwärts , wegen INDEX
oCell = oSheet.getCellByPosition(5,i)
if oCell.Value = 0 Then
oRows.removeByIndex(i,1)
End if
Next i
End Sub
dann diese Zeilen löschen kann??
Vielen Dank, Schon einmal für die tolle Arbeit, die Ihr hier leistet, um solchen NullFormelVersteher, wie ich einer bin, zu helfen!
Gruss Ingo
Hallo mikeleb!
Dein Beispiel würde bedingen, dass ich immer noch die Tabelle1 über die Spalte F sortieren muss,
dann manuell Zeilen lösche und hinterher die Hilfsspalte wieder einrichten muss.
Geht es nicht, dass Tabelle1 Spalte F , mit Tabelle2, K sowieso verglichen wird und
dann automatisch in Tabelle1, Spalte F der doppelte Eintrag in der ZELLE geleert wird?
Und dass ich danach mit diesem Makro:
[code]Sub leereKDloeschen
' Alle Zeilen löschen, do in Zeile C keine Stellplätze definiert sind!!
' nur einmal in der Woche Leerzeilen löschen!!! (Sonntag)
oDoc = ThisComponent
oSheets = oDoc.Sheets
oSheet = oSheets.getbyName("Tabelle1")
oRows = oSheet.getRows
Goto Start
Start:
for i = 150 to 2 step -1 ' zählt rückwärts , wegen INDEX
oCell = oSheet.getCellByPosition(5,i)
if oCell.Value = 0 Then
oRows.removeByIndex(i,1)
End if
Next i
End Sub[/code]
dann diese Zeilen löschen kann??
Vielen Dank, Schon einmal für die tolle Arbeit, die Ihr hier leistet, um solchen NullFormelVersteher, wie ich einer bin, zu helfen!
Gruss Ingo