Thema Datum  Von Nutzer Rating
Antwort
Rot letzte Zeile finden
10.02.2019 10:09:01 Simon
NotSolved
10.02.2019 10:38:54 Werner
NotSolved
10.02.2019 14:57:13 Simon
NotSolved
10.02.2019 20:16:54 Werner
Solved
11.02.2019 07:36:21 Simon
NotSolved

Ansicht des Beitrags:
Von:
Simon
Datum:
10.02.2019 10:09:01
Views:
48
Rating: Antwort:
  Ja
Thema:
letzte Zeile finden

Hallo,

möchte gerne die letzte freie Zeile in Spalte B finden. Zum suchen soll er aber erst nach Zeile 4 anfangen, das ist aktuell noch mein Problem.

Hier mein aktueller Code:

Private Sub CommandButton1_Click()

'letzte freie Zeile
Dim last As Integer
Worksheets("PsMittel").Activate
last = ActiveSheet.Cells(Rows.Count, 2).End(x1Up).Row + 1

'TextBox1 einfügen
Cells(last, 2).Value = TextBox1

End Sub

Mfg Simon


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • 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
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot letzte Zeile finden
10.02.2019 10:09:01 Simon
NotSolved
10.02.2019 10:38:54 Werner
NotSolved
10.02.2019 14:57:13 Simon
NotSolved
10.02.2019 20:16:54 Werner
Solved
11.02.2019 07:36:21 Simon
NotSolved