Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 10:27:00
Zusammenführen / Synchronisieren von zwei Dateien
15.10.2025 09:51:49
Wenns mit Zahl und Buchstaben
15.10.2025 08:22:15
Privat Sub ObjExcel_Sheet Change....deaktivieren
14.10.2025 19:08:54
Verbindung von Excel mit maps
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
756to760
756to760
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Cells in Range

Forumthread: Cells in Range

Cells in Range
24.04.2006 15:24:04
Paul
Es geht primär darum das ich ein Makro schreiben will welches mit Hilfe von Range und Cells die Datenreihen festlegt.
Dazu würde ich gerne wissen wie man folgenden Codeschnipsel umschreiben muss damit er auch mit Hilfe von Cells funktioniert:
ActiveSheet.Range("A1:A10,C1:C10,... usw").select
Einen einzelnen Bereich bekomme ich noch über Cells hin. Wenn ich aber einen weiteren Bereich dazufügen will, bekomme ich immer eine Fehlermeldung.
Danke schonmal für die Hilfe!
Gruß
Paul
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Cells in Range
24.04.2006 15:30:24
Arthur
Hallo Paul.
ActiveSheet.Range(Cells(3, 5).Address).Select
Gruß
Art
AW: Cells in Range
24.04.2006 15:39:20
Paul
Hallo Art,
nein ganz so meine ich es nicht, Dein Code würde mir ja nur die Zelle "E3" markieren.
Ich möchte aber z.B. A1-A10 und C1-C10 und E1-E10 markiert haben.
Dabei intressiert mich insbesondere wie ich die 3x2 Cells Methoden zusemmen verknüpfe.
Gruß
Paul
Anzeige
AW: Cells in Range, Iterative Lösung
24.04.2006 15:48:13
Arthur
Hallo Paul.
Einfach weiterdenken. So wie der Range angegeben wird (Makro aufzeichnen) auch die Angabe in Cells machen. Lediglich das A1 durch Cells(...).Address ersetzen.
ActiveSheet.Range( _
Cells(1, 1).Address & ":" & Cells(10, 1).Address & "," _
& Cells(1, 3).Address & ":" & Cells(10, 3).Address & "," _
& Cells(1, 5).Address & ":" & Cells(10, 5).Address _
).Select
Was du mit 3x2 Cells Methode meinst, ist mir allerdings nicht klar.
-Art
Anzeige
AW: Cells in Range, Iterative Lösung
24.04.2006 15:57:26
Paul
Hallo Art,
hast Du das auch ausprobiert?
ActiveSheet.Range(Cells(1, 1) & ":" & Cells(1, 10) & "," & Cells(3, 1) & ":" & _
Cells(3, 10)).Select
z.B. geht nicht da bekommt man auch die Fehlermeldung 1004.
Und genau da liegt mein Dilemma :(
Gruß
Paul
Anzeige
AW: Cells in Range
24.04.2006 15:51:39
WernerB.
Hallo Paul,
versuche es mal so:
Union(Range(Cells(1, 1), Cells(10, 1)), _
Range(Cells(1, 3), Cells(10, 3)), _
Range(Cells(1, 5), Cells(10, 5))).Select
Viel Erfolg wünscht
WernerB.
P.S.: Dieses Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter !
AW: Cells in Range
24.04.2006 15:45:39
harry
hi,
hoffe ich hab dich richtig verstanden:
Set r1 = ActiveSheet.Range(ActiveSheet.Cells(1, 1), ActiveSheet.Cells(10, 1))
Set r2 = ActiveSheet.Range(ActiveSheet.Cells(1, 3), ActiveSheet.Cells(10, 3))
Set myMultiAreaRange = Union(r1, r2)
myMultiAreaRange.Select
liebe grüße,
harry
Anzeige
AW: Cells in Range
24.04.2006 16:11:31
Paul
Hallo nochmal zusammen,
danke erstmal an die bisherigen Vorschläge. Leider nützen mir die nicht viel, da ich diese Markierten Bereiche benötige um Datenbereiche für ein Diagramm festzulegen. Und dabei kann man leider die Union-Methode nicht verwenden da das ganze ca so aussehen muss:
ActiveChart.SetSourceData Source:=Sheets(1).Range("F101:Q101,F107:Q107"),PlotBy:=xlRows
Ich brauche den Range("F101:Q101,F107:Q107") so umgeschrieben das er mit der Cells-Eigenschaft funktioniert.
Danke für die Hilfe!
Gruß
Paul
Anzeige
AW: Cells in Range
24.04.2006 21:21:47
Franz
Hallo Paul,
so sollte es eigentlich funktionieren. Ich habe den String der Übersicht wegen einer Variablen zugeordnet.
Sub Test()
Dim Daten As String
With ThisWorkbook.Sheets(1)
Daten = .Cells(101, 6).Address & ":" & .Cells(101, 22).Address & "," & .Cells(107, 6).Address & ":" & .Cells(107, 22).Address
End With
ActiveChart.SetSourceData Source:=Sheets(1).Range(Daten), PlotBy:=xlRows
End Sub

Gruß
Franz
Anzeige
;

Forumthreads zu verwandten Themen

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
Range mit Cells
Johannes

Hallo,
hat mir jemand einen Tipp warum folgende Zeile nicht funktioniert?
Dim i As Integer
Application.ScreenUpdating = False
With ActiveSheet
For i = 1000 To 2 Step -1
If .Cells(i, 1).Value <> "" Then Range(Cells(2, 54), Cells(2, 72)).Copy
Range(Cells(i, 54),...
02.06.2009 22:23:54
Thread-ID: 1078714
5 Beiträge
Definieren von variabler Range
variabler

Hallo zusammen,
ich habe eine Frage zum definieren einer variabler Range in einem Sheet.
Ich habe eine Datei mit drei verschiedenen Sheets.
Das erste Sheet ist für diese Betrachtung irrelevant, nur das zweite und das dritte.
Das zweite Sheet besteht aus verschiedenen Kennzahlen...
04.12.2009 06:47:54
Thread-ID: 1121742
3 Beiträge
Range Bezüge in VBA von fix auf relativ umstellen
fix

Hallo Herber Fans,
ich ermittle einen Range:
Set rgGPTMember_Source = Intersect(rgGPTMemberAugmentation.Rows(1).Find("GPT Member", LookIn:=xlValues, LookAt:=xlWhole).EntireColumn, rgGPTMemberAugmentation)
Dessen Adresse lautet dann: $G$5:$G$34
Dieser Range wird nun in eine Namen...
07.01.2010 21:06:12
Thread-ID: 1128031
7 Beiträge
Anzeige
Range in Array füllen, Problem bei Cells.Count = 1
Andreas

Hallo VBA Freunde,
ich habe es heute zum ersten mal angewandt, ein Array nicht mit einer Schleife, sondern gleich als einen Block zu füllen. Dank Renee konnte ich auch den Fehler beheben, daß ich mein Array nur eindimensional eingerichtet hatte.
Also für Ranges mit mehr als 1 Zelle funk...
22.02.2010 16:33:21
Thread-ID: 1140417
7 Beiträge
Anzeige
VBA range definieren
Benjamin

Guten Tag an alle,
ich habe ein Problem, bei dem ich zur Zeit kläglich scheitere.
Ich möchte eine Formel nach unten ausfüllen und zwar genau so oft, wie ich in einer Spalte Werte habe.
Also, wenn ich Z.b. in Spalte H1:H4 werte habe, soll die formeln auch von z.B. A1:C4 kopiert werde...
25.02.2010 14:42:10
Thread-ID: 1141514
5 Beiträge
VBA Formel in Range einfügen
Frank

Hallo zusammen,
mit...
Range(Cells(20, s)).AutoFill Destination:=Range(Cells(ezp, s), Cells(lzp, s)), Type:=xlFillDefault
versuche ich eine Formel (die in cells(20,s) steht) in eine Range zu kopieren...
Leider Fehlermeldung: "Die Methode 'Rang' für das Objekt "_Global" ist fehl...
09.12.2011 11:21:09
Thread-ID: 1241366
13 Beiträge
Text in Range während Eingabe per VBA analysieren?
Max

Hallo zusammen,
ist es möglich während der Texteingabe in einem normalen Rangefeld, den Input zu erfassen und ggf. mit Makros zu reagieren?
Ich weiß, daß ich dies früher über eine Form bzw. Objekt möglich war, kann aber auch hierzu nichts mehr finden. Kann ich für meinen normale Rangefe...
21.03.2012 13:49:05
Thread-ID: 1255910
4 Beiträge
Verketten von Zellen per VBA aber nicht in Range..
Zellen

Also,
ich hab mir gerade im Archiv so allerlei angeschaut, und das ist auch alles ganz toll, aber leider nur bedingt was ich suche.
Ich benötige eine VBA Function die nur verkettet wenn die Zelle gefüllt ist, und dann ein _ Trennzeichen setzt. Soweit so gut da gibts schon ein Dutzend...
09.09.2012 19:50:54
Thread-ID: 1277932
6 Beiträge
Anzeige
VBA Range definieren
Jack

Hallo liebe Exelaner
ich hab mal wieder eine kleine Frage, bei der ich einen denkanstoß benötige
Ich habe eine Tabelle
In Spalte A sind in unterschiedlichen Abständen Werte
zb. A2 = 100 und A40 = 150 und A42 = 60
In Spalte B sind in ANDEREN Abständen Werte
zb. B5= 3...
05.10.2012 18:27:07
Thread-ID: 1280712
9 Beiträge
Range mit Cells befüllen?
Maximilian

Hallo, wie kann ich denn in eine Variable vom Typ Range mit einzelen Zellen (Cells) bestücken?
Dim X As Range 'dann soll X geleert werden, da sie in einer Schleife ist 'dann soll z.B. Cells(1,1) in die Range aufgenommen werden
12.01.2013 14:11:39
Thread-ID: 1293975
4 Beiträge
For Each rCell In Worksheets("_HISTORY").Range("_H
Peter

Guten Abend
Weshalb läuft mein Code nicht, wenn ich
den Range wie folgt anspreche:
For Each rCell In Worksheets("_History").Range("_HIST")
...
Next
Wenn ich "In Wroksheets" weglasse, funktioniert es.
Der Worksheet-Name ist richtig geschrieben, wie die Abfrage im Dire...
09.12.2013 22:29:02
Thread-ID: 1341925
4 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