1 Frage zu Blatt1

Um dieses Szenario in Excel mit VBA umzusetzen, kannst du ein Makro schreiben, das immer von dem aktiven Blatt aus gestartet wird. Das Makro kopiert dann die gewünschten Daten aus „Blatt1“ und fügt sie ab Zelle B18 in das aktuell aktive Blatt ein (außer, wenn das aktive Blatt „Blatt1“ selbst ist). Hier ein Beispielcode: ```vba Sub DatenVonBlatt1Kopieren() Dim quellBlatt As Worksheet Dim zielBlatt As Worksheet Dim kopierBereich As Range Set quellBlatt = ThisWorkbook.Sheets("Blatt1") Set zielBlatt = ActiveSheet ' Sicherstellen, dass nicht in Blatt1 eingefügt wird If zielBlatt.Name = quellBlatt.Name Then MsgBox "Das Makro darf nicht in Blatt1 ausgeführt werden.", vbExclamation Exit Sub End If ' Bereich festlegen, z.B. A1:D10 in Blatt1 Set kopierBereich = quellBlatt.Range("A1:D10") ' Kopieren und ab B18 einfügen kopierBereich.Copy zielBlatt.Range("B18") End Sub ``` **Hinweise:** - Passe `Range("A1:D10")` an den Bereich an, den du aus „Blatt1“ kopieren möchtest. - Das Makro prüft, ob du dich nicht auf „Blatt1“ befindest, um Fehler zu vermeiden. - Das Makro kann von jedem Blatt (außer „Blatt1“) aus gestartet werden. **So fügst du das Makro ein:** 1. Drücke `ALT + F11`, um den VBA-Editor zu öffnen. 2. Wähle „Einfügen“ > „Modul“. 3. Füge den Code ein und speichere. Weitere Infos zu VBA-Makros findest du z.B. bei [Microsoft](https://support.microsoft.com/de-de/office/erstellen-eines-makros-in-excel-50c9e553-490a-4370-940a-e402a317bce0).