Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
292to296
292to296
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Excel-Makro

Forumthread: Excel-Makro

Excel-Makro
12.08.2003 14:23:44
Richard
Hallo!
Kann mir bitte jemand weiterhelfen? Ich habe eine Excel-Tabelle, bei welcher jede neu eingetragene Zelle eine fortlaufende Nummer erhält. Welche VBA-Anweisung muss ich in einem Excel-Makro benutzen, um die Zeile mit der höchsten Nummer zu markieren?
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel-Makro
12.08.2003 14:33:44
sergiesam
Hi,
auch wenn du noch kein VBA kennst (lt. Level), hoffe ich, du kommst mit dem Code klar.

Sub NeueNummer()
Range("A1").Activate
Dim nr As Long
'ermittle höchste nummer
nr = Application.WorksheetFunction.Max(Range(Range("A1"), Range("A1").End(xlDown)))
Select Case nr
Case 0
'Erste Zeile
Range("A1") = 1
Case 1
'zweite Zeile
Range("A2") = 2
Case Else
'x-te Zeile
'Zur letzten Zeile + 1 springen
Range("A1").End(xlDown).Offset(1, 0).Activate
'Nr+1 eintragen
ActiveCell = nr + 1
End Select
'Springe zu Zelle daneben, um die Eingabe fortzusetzen
ActiveCell.Offset(0, 1).Activate
End Sub

Damits leichter wird, habe ich es in einer Beispielmappe eingebaut.
Viel Spaß,
Sam
https://www.herber.de/bbs/user/542.xls

Anzeige
AW: Excel-Makro
12.08.2003 14:35:02
RAnton
Hallo Richard,
schau dir doch mal den Beitrag an, vielleicht hilft er weiter.
Maxwert im Tabellenbereich - Thomas 10.08.2003 22:35:47
Gruß
RAnton

;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige