Da ist ein Makro hinterlegt. Öffnet den Visual Basic Editor innerhalb von Excel und schau in dem Arbeitsblatt Tabele1 nach dort ist das Makro im "change"-Event hinterlegt
17.12.2019, 20:08 (Dieser Beitrag wurde zuletzt bearbeitet: 17.12.2019, 20:08 von JereMaia.)
Schau Dir das Bild an:
Da siehst Du wo der Code (blau markierter Text im Bild) steht und das dieser Code im "Change"-Ereignis von der Tabelle "Tabelle1" liegt.
1. Du musst den Code also zunächst einmal genau in das selbe Ereignis desjenigen Tabellenblattes kopieren in welchem der Code sein soll.
2. Wenn Du andere Zellen mit diesem Makro bearbeiten möchtest dann musst Du versuchen den Code zu verstehen:
In der Zeile
If (Target.Column = 1) Then 'Spalte A
steht die 1 für die Spalte. Wenn Du das ganze Makro also in einer anderen Spalte haben möchtest, dann musst Du die 1 mit einer anderen Spaltennummer ersetzen. 2 Wäre z.b: die Spalte B, 3 = Spalte C, usw...
3. Dort wo
Case 1:
bzw
Case 2:
steht werden die Zeilennummern abgefragt. Willst Du andere Zeilen als Nummer 1 und 2 haben, musst Du hier diese durch andere aufeinander folgende Zahlen z.B. 3 und 4 ersetzen. Allerdings ist der restliche Code so aufgebaut, das nur aufeinander folgende Zeilennummern funktionieren!
17.12.2019, 20:20 (Dieser Beitrag wurde zuletzt bearbeitet: 17.12.2019, 20:28 von JereMaia.)
Ich habe Dir hier mal zum genaueren Verständnis die Schritte aufgezeigt was ich genau meine:
Ich gehe davon aus, dass Du den Visual Basic Editor in Deiner Excelmappe gefunden und geöffnet hast. Für die folgende Erklärung habe ich eine weitere Tabelle (Tabelle2) in meine Beispielmappe eingefügt. Wenn Du das Makro auch in dieser neuen Tabelle laufen lassen möchte muss Du folgendes tun:
1. Oben auf der linken Seite einen Doppelklick auf "Tabelle2(Tabelle2). Dann öffnet sich ein weiteres Codefenster für die Tabelle2 auf der rechten Seite. Siehe dazu das Bild VBE001.png
2. Dann muss in diesem neuen Codefenster oben in der Dropdownliste das "Worksheet"-Objekt ausgewählt werden. Siehe dazu folgendes Bild VBE002.png:
3. Dann musst Du in diesem Fenster auch noch das richtige Ereignis auf der rechten Seite über die rechte DropDownListe heraussuchen. Das wäre hier in unserem Falle das "Change"-Ereignis. Siehe dazu folgendes Bild VBE003.png:
4. Nun musst du den Code (der blau markierten Text in meiner letzten Erklärung) zwischen dem nun neu generierten "Private Sub Worksheet_Change(ByVal Target As Range)" und "End Sub" kopieren. Siehe dazu das Bild VBE003.png:
5. Jetzt musst Du nur noch die Nummern im Code des neuen Tabellenblattes abändern. So wie ich es zuvor Dir erklärt habe.
