Thema Datum  Von Nutzer Rating
Antwort
08.09.2021 13:25:59 Tristan
*****
Solved
Blau Nächste freie Zeile eines Spaltenbereichs
 08.09.2021 19:30:37 AlterDresdner
NotSolved
09.09.2021 10:33:36 Gast223
Solved
09.09.2021 12:44:51 AlterDresdner
****
NotSolved
09.09.2021 14:41:41 Gast50077
Solved
09.09.2021 19:20:45 Mase
NotSolved
09.09.2021 19:37:20 AlterDresdner
NotSolved
10.09.2021 15:18:37 Tristan
Solved
10.09.2021 15:31:49 Tristan Materna
Solved

Ansicht des Beitrags:
Von:
AlterDresdner		 Datum:
08.09.2021 19:30:37		 Views:
301		 Rating:
     
Antwort:
  Ja
Thema:
Nächste freie Zeile eines Spaltenbereichs

Hallo Tristan,

Sub finden()
Dim zeile As Long, spalte, found As Boolean
  With Sheets("Return")
    For spalte = 4 To 8
      zeile = .Cells(.Rows.Count, spalte).End(xlUp).Row
      If zeile = 1 And IsEmpty(.Cells(1, spalte)) Then
        .Activate
        .Cells(1, spalte).Select
        found = True
        Exit For
      End If
    Next spalte
    If Not found Then MsgBox "keine freie Spalte"
  End With
End Sub


Gruß der AlteDresdner

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
08.09.2021 13:25:59 Tristan
*****
Solved
Blau Nächste freie Zeile eines Spaltenbereichs
 08.09.2021 19:30:37 AlterDresdner
NotSolved
09.09.2021 10:33:36 Gast223
Solved
09.09.2021 12:44:51 AlterDresdner
****
NotSolved
09.09.2021 14:41:41 Gast50077
Solved
09.09.2021 19:20:45 Mase
NotSolved
09.09.2021 19:37:20 AlterDresdner
NotSolved
10.09.2021 15:18:37 Tristan
Solved
10.09.2021 15:31:49 Tristan Materna
Solved