Gruppe
Allgemein
Problem
Im Bereich A1:B6 befinden sich ausgeblendete Zeilen und Spalten. Es sollen nur die sichtbaren Werte in ein zweites Tabellenblatt kopiert werden.
StandardModule: basMain
Sub MinCopy()
Range("A1").CurrentRegion _
.SpecialCells(xlCellTypeVisible).Copy _
Worksheets("Tabelle2").Range("A1")
End Sub