Thema Datum  Von Nutzer Rating
Antwort
04.12.2015 11:34:24 Martin
NotSolved
Blau letzte Zeile aktivieren und mit Daten füllen
 04.12.2015 21:39:50 Gast7625
*****
Solved
07.12.2015 09:24:47 Martin
NotSolved

Ansicht des Beitrags:
Von:
Gast7625		 Datum:
04.12.2015 21:39:50		 Views:
887		 Rating:
     
Antwort:
 Nein
Thema:
letzte Zeile aktivieren und mit Daten füllen

Hallo Martin! Also du willst die letzte Zeile von Spalte A und B haben. ICh würde das so machen.

Sub letztezeileaoderb()
Dim i As Long
Dim letztezeile As Integer
Dim zwischenwert As Integer

zwischenwert = 0
letztezeile = 0
For i = 1 To 2 ' von Spalte A bis R
    zwischenwert = ActiveSheet.Cells(Rows.Count, i).End(xlUp).Row
    If letztezeile < zwischenwert Then letztezeile = zwischenwert
Next i

'letztezeile ist dann die letzte Zeile die beschrieben ist. Einfügen also ab letztezeile +1

End Sub

 

LetzteZeile ist da die zuletzt beschriebene Zeile. Man könnte das auch mit usedrange machen aber das zählt auch Formatierungen.

Gruß

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
04.12.2015 11:34:24 Martin
NotSolved
Blau letzte Zeile aktivieren und mit Daten füllen
 04.12.2015 21:39:50 Gast7625
*****
Solved
07.12.2015 09:24:47 Martin
NotSolved