Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Nur sichtbare Zellen in anderes Arbeitsblatt kopieren

Gruppe

Kopieren

Problem

Im Bereich A1:B6 befinden sich ausgeblendete Zeilen und Spalten. Es sollen nur die sichtbaren Werte in ein zweites Tabellenblatt kopiert werden.

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub MinCopy()
   Range("A1").CurrentRegion _
      .SpecialCells(xlCellTypeVisible).Copy _
      Worksheets("Tabelle2").Range("A1")
End Sub