Gruppe
Allgemein
Bereich
Kopieren
Thema
Wert in alle Arbeitsblätter eintragen
Problem
Wie kann ich über VBA Werte in einer Zeile in die nachfolgenden Arbeitsblättern eintragen lassen?
Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: basMain
Sub AlleBlaetter()
Dim arr As Variant
arr = Array("Tabelle1", "Tabelle2", "Tabelle3")
Worksheets(arr).FillAcrossSheets Rows(1)
End Sub