Thema Datum  Von Nutzer Rating
Antwort
Rot letzer Eintrag eines Bereiches finden
 19.09.2016 16:29:23 Roger
Solved
19.09.2016 18:22:07 Werner
Solved

Ansicht des Beitrags:
Von:
Roger		 Datum:
19.09.2016 16:29:23		 Views:
1258		 Rating:
     
Antwort:
 Nein
Thema:
letzer Eintrag eines Bereiches finden
Hallo allerseits, ich müsste einen Bereich per Userform abfüllen und sollte den letzten Eintrag eines Worksheets("Db").Range("Projektleiter") finden. Auf dem Worksheet sind noch andere Bereiche definiert ... Im Moment habe ich den Code: ********************************************************************************* Private Sub BtnNewPL_Click() If TxBIDNew = "" Then MsgBox "bitte setzten Sie eine ID (Unique) für den neuen Mitarbeiter ein." End If ' ::::::::::::::::::::::::: ' HIER KOMMT PROGRAMMIERUNG FÜR DIE ÜBERNAHME DES NEUEN PL ' ::::::::::::::::::::::::: Dim ws As Worksheet Set ws = Worksheets("DB") ' sucht jeweils die erste Zeile die leer ist Dim newRow As Long newRow = Application.WorksheetFunction.CountA(ws.Range("Projektleiter")) + 1 ' Füllt die 3 Inhalte des Userforms ab ws.Cells(newRow, 1).Value = FrmNewPL.TxBNameNew.Value ws.Cells(newRow, 2).Value = FrmNewPL.TxBIDNew.Value End Sub ********************************************************************************* Damit findet er stets die Zeile 19 anstelle der im Moment freien Zelle C08. Kann mir jemand helfen?

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
Rot letzer Eintrag eines Bereiches finden
 19.09.2016 16:29:23 Roger
Solved
19.09.2016 18:22:07 Werner
Solved