31 Aufrufe
Gefragt in Tabellenkalkulation von

Guten Tag,

Habe ein Problem mit Excel Makro hoffe mir kann jemand helfen,

  1. ich möchte aus meiner Tabelle “Hauptformular“ ab Zelle A8, B8, C8, D8, E8, F8,  und H8 bis H1507 alle Zellen wo ab J8 bis J1507 eine 1 enthalten ist in eine andere Tabelle “1 Baustelle“ kopieren.
  2. möchte ich mit einem Makro wenn in meinem “Hauptformular“ Zelle “J“ ein “x“ befindet die Zelle A bis einschließlich i (in Zelle E befindet sich eine geschützte Formel) die ganze Zeile kopieren und eine Zeile darunter nur die Werte (keine neue Zeile) einfügen, das “x“ soll nachher in der jeweiligen Zelle gelöscht werden.

Besten Dank im Voraus.

4 Antworten

0 Punkte
Beantwortet von m-o Profi (14.3k Punkte)

Hallo Jannick,

hast du schon einen Code?

Und kannst du dein Problem bitte so beschreiben, dass jemand, der deine Tabelle nicht kennt und keine Ahnung hat, was du eigentlich willst, weiß, was das Makro tun soll.

Ich verstehe im Moment jedenfalls nur, dass du bei deinem 1. Problem alle Zellen mit einer 1 in eine andere Tabelle kopieren willst. Aber dann würde da ja nur die Ziffer 1 in der Zieltabelle drin stehen.

Und bei deinem zweiten Problem lese ich zwar, dass eine Bereich kopiert werden soll, aber nicht wohin. Und was bedeutet in diesem Zusammenhang "keine neue Zeile".

Und wenn du eine Beispieltabelle zur Verfügung stellen könntest, wäre das auch schon. Eine Anleitung, wie du eine Excel-Datei hier ins Forum einstellen kannst, findest du hier:

Gruß

M.O.

0 Punkte
Beantwortet von

Guten Tag,

habe jetzt ein Testdatei hochgeladen zum besseren Verständnis.http://supportnet.de/forum/?qa=blob&qa_blobid=15046193764851772689

0 Punkte
Beantwortet von m-o Profi (14.3k Punkte)

Hallo Jannick,

hier die überarbeitete Datei: Download.

Das Makro zum Übertragen der Daten in die Baustellenblätter musst per Hand oder über eine Schaltfläche starten.

Das Makro zum kopieren der Zeile startet, wenn du ein x in die Spalte J einträgst. Sollten in der nächsten Zeile bereits Daten vorhanden sein, so werden sie ohne Hinweis einfach überschrieben.

Schau mal, ob das so für dich passt.

Gruß

M.O.

0 Punkte
Beantwortet von

Vielen Dank ein guter Anfang

1. ich möchte aus meiner Tabelle “Hauptformular“ ab Zelle A8, B8, C8, D8, E8, F8,  und H8 bis  H1507 alle        Zellen wo ab J8 bis J1507 eine 1 enthalten ist in eine andere Tabelle “1 Baustelle“ kopieren.

Können sie mir bitte so einrichten sobald in Spalte J8:J2000 eine 1 eingetragen wird sollen die Daten in die Tabelle "1 Baustelle" schon ersichtlich sein, beim Öffnen der Datei soll sie schon aktualisiert sein. 

Wäre es auch möglich bei der Schaltfläche "Seitenende" in der Spalte G5 zur letzten sichtbar beschriebene Zeile springe wenn auch eine Formel enthalten ist.

2. möchte ich mit einem Makro wenn in meinem “Hauptformular“ Zelle “J“ ein “x“ befindet die Zelle A bis einschließlich i (in Zelle E befindet sich eine geschützte Formel) die ganze Zeile kopieren und eine Zeile darunter nur die Werte (keine neue Zeile) einfügen, das “x“ soll nachher in der jeweiligen Zelle gelöscht werden.

Sobald ich J8:J2000 von Hand etwas löschen möchte kommt eine Fehlermeldung.
If LCase(Target.Value) = "x" Then ich möchte auch manchmal eine Zahl eintragen nur für interne zwecke.
Möchte mich nochmal Bedanken für die große Mühe.
...