Thema Datum  Von Nutzer Rating
Antwort
17.10.2016 14:10:17 Sabrina
NotSolved
Blau Löschen ab bestimmter Zeile
 17.10.2016 14:50:34 Uwe
*****
Solved
17.10.2016 14:51:45 Crazy Tom
NotSolved
17.10.2016 15:04:37 Uwe
NotSolved
17.10.2016 15:21:55 Crazy Tom
*****
Solved
17.10.2016 15:35:30 Sabrina
Solved

Ansicht des Beitrags:
Von:
Uwe		 Datum:
17.10.2016 14:50:34		 Views:
706		 Rating:
     
Antwort:
 Nein
Thema:
Löschen ab bestimmter Zeile

Hallo Sabrina,

so sollte es gehen:

Sub Makro1()


    Dim zeile As Long
    Dim Sheetname As String
    zeile = 21
    Sheetname = "Tabelle2"
    ActiveWorkbook.Sheets(Sheetname).Rows(zeile & ":" & Sheets(Sheetname).Rows.Count).Delete Shift:=xlUp
    
End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
17.10.2016 14:10:17 Sabrina
NotSolved
Blau Löschen ab bestimmter Zeile
 17.10.2016 14:50:34 Uwe
*****
Solved
17.10.2016 14:51:45 Crazy Tom
NotSolved
17.10.2016 15:04:37 Uwe
NotSolved
17.10.2016 15:21:55 Crazy Tom
*****
Solved
17.10.2016 15:35:30 Sabrina
Solved