Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
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
1912to1916
1912to1916
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Range Cells funktioniert nicht

Forumthread: Range Cells funktioniert nicht

Range Cells funktioniert nicht
01.01.2023 16:13:04
Giuseppe
Hallo Excel und VBA Freunde
Ich habe ein Makro geschrieben und ein Teil davon funktioniert nicht.
Was mach ich falsch?

Workbooks("Daten.xlsx").Worksheets("Test").Range(Cells(210, 2), Cells(226, 40)).Copy
Bitte um Hilfestellung, komm nicht mehr weiter.
Vielen Dank
Lg Giuseppe
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Range Cells funktioniert nicht
01.01.2023 16:17:17
ralf_b
jeweils vor cells auch das Worksheet referenzieren
AW: Range Cells funktioniert nicht
01.01.2023 16:34:33
Giuseppe
Hallo ralf_b
Vielen Dank für Deinen Tipp.
Nur leider verstehe ich ihn nicht :-(
PS:
Habe auf deine vergangene Hilfestellung geantwortet:
https://www.herber.de/forum/messages/1913187.html
Dafür bedanke ich mich auch ganz herzlich bei dir.
In Zwischenzeit bin ich etwas weiter gekommen...
Lg Giuseppe
Anzeige
AW: Range Cells funktioniert nicht
01.01.2023 16:34:17
onur 

With Workbooks("Daten.xlsx").Worksheets("Test")
.Range(.Cells(210, 2), .Cells(226, 40)).Copy
End With

AW: Range Cells funktioniert nicht
01.01.2023 16:51:06
Giuseppe
Hallo onur
Vielen Dank!
Nun funktioniert es :-)
lg Giuseppe
AW: Range Cells funktioniert nicht
01.01.2023 16:52:06
onur
Weisst du denn wenigstens, WARUM ?
Anzeige
AW: Range Cells funktioniert nicht
02.01.2023 12:55:23
Daniel
Hi
wenn vor Range, Cells, Rows und Columns kein Tabellenblatt angegeben ist, wird das gerade aktive Tabellenblatt (Code steht in einem allgemeinen Modul), oder das Tabellenblatt des Moduls (Code steht in einem Tabellenblattmodul) verwendet.
das gilt IMMER, egal wo das Range oder Cells steht, auch für die beiden Cells innerhalb der Range-Funktion.
Der Fehler kommt, wenn du der Range schon ein Tabellenblatt fest zuweist, und dann die beiden Cells, die die Range definieren sollen, auf einem anderen Blatt liegen.
man muss also Workbook und Worksheet auf jeden Fall vor den beiden Cells angeben. Vor der Range darf man es weglassen, denn dann übernimmt die Range das Tabellenblatt der beiden Cells (in diese Richtung geht es, umgekehrt aber nicht, aber auch das darf man nur in einem allgemeinen Modul machen, in einem Tabellellenblatt muss man vor der Range UND den beiden Cells das Tabellenblatt angeben)
Um das häufige hinschreiben von Workbook und Worksheet zu vermeinden, gibt es mehrere Wege.
Die WITH-Klammer wurde schon gezeigt, diese hat aber den Nachteil, dass sie nur einmal verwendet werden kann, dh hantiert man mit mehreren Bereichen gleichzeitig, kann man nur einen mit der WITH-Klammer verkürzen und muss den anderen ausschreiben.
der andere Weg ist, den Zellbereich über Resize zu definieren, dann braucht man das Tabellenblatt nur einmal.
diese Methode ist vorallem dann sinnvoll, wenn Anzahl Zeilen und Anzahl Spalten des Bereichs bekannt sind:

 Workbooks("Daten.xlsx").Worksheets("Test").Cells(210, 2).Resize(17, 39).Copy
Gruß Daniel
Anzeige
;

Forumthreads zu verwandten Themen

Sheets Range Cells
Christian

So nun habe ich mich auch mal in diesem Forum angemeldet. Ich komme einfach nicht weiter. Kann mir jemand erklären warum der folgende Code nicht funktioniert.
Do While Sheets("Tabelle1").Range(Cells(1, i), Cells(1, i + 20)) ""
Die Schleife soll solange laufen bis in einem Bereich sich...
06.03.2015 13:49:10
Thread-ID: 1413300
8 Beiträge
Range Cells
Erik

Hallo zusammen,
Habe dieses Macro geschrieben allerdings damt 2 Probleme:
Es soll nicht die ganze Zeile gelb markiert werden sondern nur Celle 1-12
und es kommt ein Fehler in Zeile Range(Cells(Target.Row, 14)).ClearContents
Warum dies ?
Vielen Dank
Gruß
Erik
Wi...
23.03.2016 10:29:37
Thread-ID: 1483707
9 Beiträge
aus Range Cells machen
Burak

Guten Morgen,
ich bin dabei einen Bereich als Datenreihe für Diagramme festzulegen.
In einer Schleife habe ich die Werte für jedes Diagramm in Spalten nebeneinander.
Also Werte für Dia1 is in Spalte Z, für Dia2 in AA, Dia3 in AB usw.
SeriesCollection(2).values = "='Linienauswer...
23.03.2018 10:51:22
Thread-ID: 1615955
4 Beiträge
Query Range Cells
Frebert
Hallo Profis,

ich stehe auf der Leitung und komme nicht weiter. Vielleich ist jemand so freundlich und hilft mir auf die Sprünge :-)

Ich habe ein Worksheet mit ca. 15 Query. Ich möchte nun von jedem dieser Query die Adresse der linke oberen Zelle (also wo das Query beginnt), oder bes...
03.09.2003 14:24:49
Thread-ID: 304193
3 Beiträge
Range Cells
Harald

Moin Forum,
steh grad voll auf dem Schlauch.
Ich habs mal auf das Wesentliche reduziert.
jancol = 4
Range(Cells(6, jancol), Cells(36, jancol)).Select
Er bringt mir den Laufzeitfehler 1004
Anwendungs- oder objektdefinierter Fehler.
Dabei will ich doch nur Range("D6:...
21.11.2005 10:27:06
Thread-ID: 698714
10 Beiträge
Range Cells Bezug funktioniert nicht meh
sisomyz
Hallo in die Forumsrunde,
nachdem ich heute den ganzen Vormittag damit verbracht habe eine Lösung für mein Problem zu finden, wende ich mich hier an das Forum, welches mir schon oft über das Archiv geholfen hat.
Ich habe die Problematik mit Range und Cells nicht verstanden... schon oft genut...
07.11.2022 11:25:01
Thread-ID: 1906104
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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