Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 14:27:08
Excel - Zellen verketten anhand anderer Spalte
23.04.2024 14:23:45
Gehe zu Tabellenblatt
23.04.2024 14:07:03
Alternative Summewenn für Verlinkung closed Workbook
23.04.2024 13:44:37
Datum in Excelformel anzeigen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
760to764
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
760to764
760to764
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

letzte gefüllte zelle in zeile?

letzte gefüllte zelle in zeile?
12.05.2006 09:54:52
selo
hallo ich habe da wieder mal ein problem
und bräuchte eure hilfe
ich habe hier einen teil eines codes
Range("E16:M16").Select
Selection.Cut
ich möchte hier jedoch nicht bis m16 selektieren sondern bis zur letzten gefüllten zelle in der zeile 16
info:ich weiß nicht ob das wichtig ist aber vor der zelle e16 sind noch leere zeilen vorhanden.

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: letzte gefüllte zelle in zeile?
12.05.2006 10:04:51
Bertram
Hi selo,
so sollte es gehen, wenn nach E16 keine Leerzellen mehr kommen.
range(cells(16,5),cells(16,5).End(xlToRight)).Select
Gruß
Bertram
AW: letzte gefüllte zelle in zeile?
12.05.2006 10:05:41
WernerB.
Hallo selo,
mein Vorschlag zur ermittlung der letzten Zelle mit Inhalt in Zeile 16 (auf "Select" kannst Du in diesem fall auch verzichten):
Dim laC As Integer
laC = Cells(16, Columns.Count).End(xlToLeft).Column
Range("E" & laC & ":M" & laC).Cut
Viel Erfolg wünscht
WernerB.
P.S.: Dieses Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter !
AW: letzte gefüllte zelle in zeile?
12.05.2006 10:05:59
UweD
Hallo
so z.B.

Sub test()
Dim Zeile&, LC%
Zeile = 16
LC = ActiveSheet.Cells(Zeile, 256).End(xlToLeft).Column
Range(Cells(Zeile, 5), Cells(Zeile, LC)).Cut
End Sub

auf select kann in den meisten Fällen verzichtet werden..
Gruß UweD
(Rückmeldung wäre schön)
Anzeige
danke euch allen alle klappen perfekt
12.05.2006 10:20:38
selo
mfg
selo

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige