Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Blatt 2 macht, was Blatt macht

Forumthread: Blatt 2 macht, was Blatt macht

Blatt 2 macht, was Blatt macht
08.05.2009 15:36:03
tco99

Hallo zusammen,
ich habe folgende Situation, in der ich Hilfe brauche.
Ich habe eine Datei mit zwei identischen Blättern. Nur die Texte sind in einem Blatt deutsch und in dem anderen Blatt englisch. Im ersten Blatt kann per Schaltfläche eine neue Zeile an der Stelle eingefügt werden, an der grad der Cursor steht. Ebenso kann mittels zweiter Schaltfläche die Zeile gelöscht werden, in der sich der Cursor befindet. Das funktioniert auch super.
Jetzt müsste es aber so sein, dass, wenn im Blatt 1 eine Zeile eingefügt oder gelöscht wird, das gleiche auch im Blatt 2 erfolgt. Wenn also im Blatt 1 z.B. in der Zeile 12 der Cursor steht und per Schaltfläche eine neue Zeile eingefügt wird, auch im Blatt 2 in der Zeile 12 eine neue Zeile eingefügt werden. Das Löschen müsste dann genauso funktionieren.
Was besonders toll wäre: wenn man neue Zeilen im Blatt 2 einfügt oder löscht, dass das dann auch im Blatt 1 erfolgt.
Ich habe dazu eine Beispielmappe gemacht:
https://www.herber.de/bbs/user/61691.xls
Weiß jemand eine Lösung?
Gruß
Erdogan
PS: Feedback ist selbstverständlich.
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blatt 2 macht, was Blatt macht
08.05.2009 15:45:39
Chris
Servus,
die Makros so:

Private Sub CommandButton2_Click()
Rows(ActiveCell.Row).Insert Shift:=xlDown
Sheets("Blatt 2").Rows(ActiveCell.Row).Insert Shift:=xlDown
End Sub



Private Sub CommandButton3_Click()
Selection.EntireRow.Delete
Sheets("Blatt 2").Rows(ActiveCell.Row).EntireRow.Delete
End Sub


wenn du das für Blatt 2 auch willst, dann musst du die Makros ins Tabellenmodul von Blatt 2 einfügen und im makro blatt2 durch blatt 1 ersetzen und ei ner Schaltfläche zuordnen.
Gruß
Chris

Anzeige
AW: Blatt 2 macht, was Blatt macht
08.05.2009 15:54:15
tco99
Hallo Chris,
es funktioniert super, auch die Lösung, bei der das zweite Blatt Zeilen eingefügt oder gelöscht bekommt.
Ich danke dir sehr herzlich für die schnelle Hilfe!
Viele Grüße
Erdogan
;

Beliebteste Forumthreads (12 Monate)

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