Office: Offset in Array

Hallo ,

ich versuch mich gerade an Arrays.
Ist leider absolutes Neuland für mich und bin gerade ein bisschen am üben.

Ich bekomme in folgendem Code in der Spalte mit Offset eine Fehlermeldung.

Code:

Ist es in Arrays nicht möglich mit Offset zuarbeiten ?

Danke

:)

 

Hallo,

ein Array ist kein Objekt und hat deshalb keine Methoden oder Eigenschaften.
Siehe auch:
https://docs.microsoft.com/de-de/dot...atures/arrays/

Gruß Ulrich

 

laut Deinem Code soll nur Spalte A bearbneitet werden.

Bitte berücksichtige das Themen die Erledigt sind als Erledigt markiert werden können. Also mache es unten links mit Klick auf den Schalter "als erledigt setzen", falls Problem gelöst.
Der Zustand des Beitrages wird dann in der Übersicht angezeigt und man braucht sich diese Beiträge nicht mehr ansehen.





Meine Homepage Homeseite - Hajo's Excelseiten

 

Vielen Dank

 

Hallo ,

könnt ihr mir helfen meinen Fehler zu finden ?

Code:

Ich versuche in der Array von unten nach oben Zellen zu püfen.
Wenn arr(z, 2) leer und arr(z, 1) gleich arr(z, 1) = arr(z + 1, 1) also der Wert darüber übereinstimmt dann trage mir in arr(z, 2) = "xy" ein.

Wie vorher schon geschrieben taste ich mich gerade in Arrays ran und habe noch sehr viel lern bedarf.

Vielen Dank

Solitec

 

Zu Deiner Datei kann ich nichts schreiben, was wohl daran liegt das ich nicht auf fremde Rechner schaue. Ich baue keine Datei nach.

Sollte die Datei verlinkt werden?

Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Muster*, Test*, Mappe*, Beispiel*, Fehler*, Kalender*, UserForm* usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.

Bilder lade ich mir nicht runter, da Excel damit nichts anfangen kann.

Hochgeladene Bilder können zwar als solche in Excel importiert werden, sind jedoch bei der Lösung von Problemen nicht sehr hilfreich, da man die eigentlichen Daten nicht ohne große und zeitraubende Umwege direkt in die Tabelle übertragen kann.

Bilder statt Datei | Excel ist sexy!

Es sollte ein aussagekräftiger Name sein.

Das ist nur meine Meinung zu dem Thema.

Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten
http://www.ms-office-forum.de/forum/...d.php?t=322895
ändern.

Das ist nur meine Meinung zu dem Thema.

 

Hallo
anbei mein Versuch in einer Datei.

Danke

 

wie gewünscht wird in Zeile 16 und 7 eingetragen.
Ich hätte den Code geändert.
Code:

 

Danke Hajo.

eine Frage noch das ich das auch verstehe.

Ich prüfe hier doch ob der Wert leer ist:

If arr(z, 2) = "" Then

Warum musste

LetzteZeile = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row

noch in
LetzteZeile = IIf(IsEmpty......

geändert werden ?

Danke

 

Dein code gibt irgendwas mit 80 raus.
Ja Du prüfst das, aber danach ist noch ein Vergleich.

 

Ah , ok

Vielen Dank

 

Weil Hajo befürchtet, dass in Zeile 1048576 etwas stehen könnte.
Ist ja formal korrekt, widerspricht aber durchaus der Realität.
Denn was nutzt es, wenn die Prüfung 1048576 ergibt?
Spätestens beim Offset(1, 0) raucht das Makro ab.
Mal davon abgesehen, dass es bescheiden (also gar nicht) referenziert wurde.

Ist ungefähr wie bei Donald:
der ließ bisher auch grob 40mal prüfen, ob die Wahl gefälscht wurde.

 

Vielen Dank für dein Feedback

Ich habe keinen Ahnung von Arrays und versuche mich da gerade reinzudenken
es zu verstehen und umzusetzen.

wie würde es denn referenziert richtig aussehen?

Desweitern habe ich noch eine Frage.

Wie kann ich das Makro anwenden wenn das Arbeitsblatt nicht aktiviert ist ?

Habe es schon mit With.....End With bzw

Code:

so versucht.

Ich habe da keine Aufgabenstellung hinter versuche es nur zu verstehen.

Ich danke euch
Solitec

 

Mal eine korrekte Referenzierung:
Code:

(macht die Zelle rot)

Heißt, von der Color-Eigenschaft der Interior-Eigenschaft eines Range-Objekts hangele ich mich in der Hierarchie nach "oben".
Oberhalb eines Objektes kann es nur übergeordnete Objekte geben.
Der kleinste gemeinsame Nenner ist folglich das untergeordnete Objekt mit seinen Eigenschaften und Methoden.

Range("A1").Interior.Color = RGB(255, 0, 0)
wäre so ein kgN
Gilt aber nur für das aktive Blatt!

Jetzt kannst Du Dich hochhangeln, solange es noch Sinn macht.
Das Ganze nennt sich objektorientierte Programmiersprache.

Und wieder mal der kgN für Dein Beispiel
(beachte die referenzierenden Punkte auf das übergeordnete Objekt im With-Statement)
Code:

Und der Kuddelmuddel mit Range() und Cells() sollte nach Möglichkeit auch verhindert werden.

 

Vielen vielen Dank.

Jetzt überarbeite ich erst mal ein paar Sachen von mir.

Habt mir echt weiter geholfen....