Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 21:13:13
Kalenderwochen addieren
25.04.2024 21:06:05
Duplikate entfernen
25.04.2024 18:41:19
vba Zeilen duplizieren ab aktiver Zeile bis letzte Zeile
25.04.2024 18:22:55
Zeilen mit bestimmtem Datum in andere Mappe übertragen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1112to1116
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
1112to1116
1112to1116
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Referenzieren in named Range

Referenzieren in named Range
Chris
Hallo,
wie kann ich richtig in named Ranges einen Bereich auswählen? Ich habe einen Bereich, der einen bestimmten Namen trägt z.B. "Daten". wie kann ich nun auf bestimmte Zellen in diesen Bereich zugreifen mit Z1S1 Adressierung?
Momentan mache ich es z.B. so:
worksheets(1).Range("Daten").Range(Cells(1,1),Cells(1,5)).copy
Das funktioniert jedoch nur wenn das Worksheets(1) zuvor aktiviert wurde. Weiß jemand eine ander Möglichkeit?

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Referenzieren in named Range
03.11.2009 10:31:42
Luschi
Hallo Chris,
versuch es mal so:
ThisWorkbook.Names("Daten").RefersToRange.Resize(1, 5).Copy
Gruß von Luschi
aus klein-Paris
Referenzieren in named Range
03.11.2009 13:26:48
Erich
Hi Chris,
dass
worksheets(1).Range("Daten").Range(Cells(1,1),Cells(1,5)).copy
bei nicht aktivem worksheets(1) nicht funzt, ist doch klar:
Cells(1,1) und Cells(1,5) gehören - wenn der Code in einem normalen Modul steht -
zum gerade aktiven Blatt.
Wenn du einen Bereich in einem anderen Blatt anspprechen willst, dann musst du vollständig referenzieren:
worksheets(1).Range("Daten").Range(worksheets(1).Cells(1,1),worksheets(1).Cells(1,5)).copy
würde wohl funktionieren, abgekürzt schriebe man besser
with worksheets(1)
   .Range("Daten").Range(.Cells(1,1),.Cells(1,5)).copy
end with
Einfacher ist auch:
worksheets(1).Range("Daten").resize(5)
oder
worksheets(1).Range("Daten").resize(5, 1)
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort
Anzeige
Korrektur
03.11.2009 13:37:36
Erich
Hi Chris,
da habe ich Zeilen/Spalten vertauscht. Die letzten Zeilen sollten besser so sein:
Einfacher ist auch:
worksheets(1).Range("Daten").resize(, 5)
oder
worksheets(1).Range("Daten").resize(1, 5)
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

300 Forumthreads zu ähnlichen Themen

Einzigartige Werte in Array identifizieren
Sebastian

Hallo Experten,
ich habe eine Frage, die vermutlich recht leicht zu lösen sein sollte:
Ich habe eine sehr lange Liste, in der in Spalte A Produktnummern stehen, viele kommen auch mehrfach vor. Ich möchte gerne daraus in einem neuen Tabellenblatt eine Liste erstellen, in der jede verschi...
10.08.2008 21:30:00
Thread-ID: 1000688
2 Beiträge
Anzeige
Formel über VBA in Range.
Tom

Hi,
ich Versuch eine Summenformel
=SUMME(A3:A29)
verzweifelt über VBA dynamisch einzutragen.
Die Summe muss von A bis J eingetragen werden. Jedesmal mit dem entpsrechenden Buchstaben nicht immer mit A.
Hab das so versucht:
For k = 2 To 10 'Range(Cells(k, 29), Cells(...
13.08.2008 11:41:00
Thread-ID: 1001455
4 Beiträge
If...Then... bei verschiedenen Bedingungen?
Vic

Hallo zusammen
Ich habe folgendes Problem und weiss nicht, wie ich das über mein Marko gelöst bekomme:
In der Spalte "H" habe ich diverse Werte (zwischen 0 und X) und in der Spalte "K" ebenfalls. Nun möchte ich, dass es in der Spalte "L" eine "0" ausgibt, wenn "H" den Wert Null hat und...
13.08.2008 15:00:00
Thread-ID: 1001553
5 Beiträge
Anzeige
Schriftgröße Zelle automatisch an Inhalt anpassen
Peter

Hallo Leute!
Folgende Situation: ich habe in einer Arbeitsmappe auf mehreren Tabellenblättern zu oberst das gleiche Design. Unter anderem steht auf jedem Blatt oben in einer Zelle die gleiche Information. Aus Gründen der Einfachheit muss man diese Information nur einmal auf dem ersten Tabel...
21.08.2008 15:04:06
Thread-ID: 1003519
4 Beiträge
Wert finden und nicht Ziffer
baronf


Habe ein Problem,
in der Spalte C soll nach Zahlen gesucht werden (Variable MZ)
Wenn MZ den Wert 1 bekommt, wird dür MZ ein wahrer Wert ausgegeben, wenn die Zahl auftriit.
Das heisst, dass nach der Ziffer und nicht nach der Zahl gesucht wird!
Wie kann ich die Formel ändern,...
28.08.2008 16:05:00
Thread-ID: 1005503
2 Beiträge
Wert finden und nicht Ziffer
baronf


Habe ein Problem,
in der Spalte C soll nach Zahlen gesucht werden (Variable MZ)
Wenn MZ den Wert 1 bekommt, wird dür MZ ein wahrer Wert ausgegeben, wenn die Zahl auftriit.
Das heisst, dass nach der Ziffer und nicht nach der Zahl gesucht wird!
Wie kann ich die Formel ändern,...
28.08.2008 16:06:00
Thread-ID: 1005504
4 Beiträge
Knifflig - Zeilen einfügen
Frederic

Guten Morgen liebes Forum,
ich hab da ein kleines kniffeliges Problem, hoffe, ihr könnt mir evtl. weiterhelfen:
Ich exportiere Daten per Makro in eine neue leere Mappe (Mappe1.xls).
Vorab: Die Spaltenzuordnung ist immer identisch!
Jetzt möchte ich statt manuell wie bisher, die R...
29.08.2008 07:29:19
Thread-ID: 1005628
10 Beiträge
Range bis zu einer bstimmten Zeile kopieren
Joachim

Hi,
ich habe eine Sub, um Daten eines Ranges von einem Tabellenblatt zu einem andren Tabellenblatt zu kopieren:
Sub Kopieren() Dim intS As Integer Sheets("Daten einlesen").Range("C2:H150").Copy With Sheets("Übersicht") intS = .Cells(4, Columns.Count).End(xlToLeft).Column .Cells(5, in...
19.09.2008 20:57:12
Thread-ID: 1011139
5 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
2
3
4
4
3
1
3
9
4
3
9
7
5
1
6
3
6
13
2
3
3
6
20
1