Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler

iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
01.07.2024 21:46:52
Krümmel
Hallo Zusammen,
ich habe ein kleines Problem mit der Zeile iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 . Mein Makro soll von Tabellenblatt 1 durch Doppelklick die jeweilige Zeile des Doppelklicks in die 2. Tabelle ab Spalte B2 abwärts kopieren. Nach dem Erstellen des Makros wurde auch beim ersten Doppelklick genau das gemacht, aber bei 2. kommt direkt die Meldung : Anwendungs oder Objektdefinierter Fehler. Was habe ich vergessen oder übersehen? Bin leider noch nicht ganz so gut mit dem erstellen von Makros, aber probiere halt viel (lernzwang).
Mein Makro sieht wie folgt aus:
Userbild


wäre für hilfe echt dankbar :-)
Anzeige
AW: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
01.07.2024 22:00:58
Onur
Und warum postest du Bildchen statt den Code?
AW: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
01.07.2024 22:43:18
Krümmel
Sry, dachte das ist egal ob Bild mir Code oder Code selbst.

Bei der Überschrift bin leider im Kopf etwas abgelenkt gewesen, aber im Screenshot steht bis auf das beim up/down die richtige Zahl.

Vielen Dank für die schnellen Antworten
AW: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
01.07.2024 22:46:33
Onur
"Sry, dachte das ist egal ob Bild mir Code oder Code selbst. " - Jetzt, wo du es besser weisst, warum hast du den Code immer nocht nicht gepostet ???
Und was ist mit meinen Leerzeichen vor "."?
Anzeige
AW: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
01.07.2024 22:03:54
Onur
Warum ist da ein Leerzeichen vor jedem "." ?
AW: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
01.07.2024 23:04:46
Oppawinni
Das sieht manchmal nur nach Leerzeichen aus.
Da sind aber z.B. keine
Userbild
Bei ist aber die 1 vom l leichter zu unterscheiden, oder?
AW: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
01.07.2024 23:07:17
Onur
Weiss man ja nicht, weil er den Sch...-Code immer noch nicht als Text gepostet hat.
Ich glaube, er amüsiert sich köstlich über uns.
Anzeige
AW: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
01.07.2024 23:19:21
Oppawinni
Der hat sich mal heimlich bei Piet bedankt. Also hat mein Hinweis auf das XL wohl noch nicht gereicht.
Aber das Thema ist wohl erledigt.
AW: iRow = .Cells(Rows.Count, 50).End(xlDown).Row
01.07.2024 22:17:16
Oppawinni
Du hast doch nicht etwa den Fehler, den du im Betreff schon hast und .End(x1Up).Row geschrieben.
mit
iRow = .Cells(.Rows.Count, 2).End(xlUp).Row + 1
könnte das funktionieren

Anzeige
AW: iRow = .Cells(Rows.Count, 50).End(xlDown).Row
01.07.2024 22:39:23
Onur
Wie im Kunstunterricht: Bilder interpretieren (Was wollte uns der Maler sagen ?) .
AW: iRow = .Cells(Rows.Count, 50).End(xlDown).Row
01.07.2024 22:43:11
Oppawinni
Man möchte fast denken, dass das bewusst so gemacht ist,
damit man den offensichtlichen Fehler bloß nicht gleich erkennt.
Wenn der Betreff nicht dahin gedeutet hätte, wär ich nicht auf die Idee gekommen.
AW: iRow = .Cells(Rows.Count, 50).End(xlDown).Row
01.07.2024 22:44:20
Onur
Der Betreff muss nicht unbedingt aus dem Code kommen - hab ich auch schon gehabt.
Anzeige
AW: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
01.07.2024 22:36:36
Piet
Hallo

ich weise mal höflich auf einen Widerspruch hin. Du musst selbst herausfinden was hier richtig ist?
Du schreibst von Codefehler bei : - iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1
Im Code selbst steht aber: - iRow = .Cells(Rows.Count, 2).End(x1Up).Row + 1
Das ist einmal Spalte 2, bei xlDown aber Spalte 50! - Was ist hier richtig??

Den anderen Fehler hat Oppawinni dir schon erklärt:
Ob End(xlUp) oder End(xlDown), es gehört IMMER (xl und nicht (x1 dahin!

mfg Piet
Anzeige
AW: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
01.07.2024 23:20:05
Piet
Hallo ihr beiden

@Onur - hat das " " im gelb markierten Code gesehen, es steht vor End(xlUp). D.h. Unterbrechung im Code!
Ich nehme an der Frager hat seine Fehler erkannt und korrigiert, bei mir wurde der Danke Button gedrückt.
Das Danke gehört dann auch euch beiden, denn von euch kamen ja zwei konkrete Fehler Hinweise!

mfg Piet
Anzeige
AW: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
01.07.2024 23:21:46
Onur
Danke, Piet.
Nur armselig, dass ER sich nicht gemeldet hat....
AW: iRow = .Cells(Rows.Count, 50).End(x1down).Row + 1 fehler
02.07.2024 00:03:06
Oppawinni
Oder... Nomen est Omen.
Krümmel hat sich verkrümelt.
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

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