sichtbare Zellen auf andere Tabelle
04.02.2022 22:37:46
Icefish232
ich möchte gerne nur eingeblendete Zellen auf ein anderes Tabellenblatt übertragen.
Folgendes habe ich im Forum gefunden:
Sub MinCopy()
Range("A1").CurrentRegion _
.SpecialCells(xlCellTypeVisible).Copy _
Worksheets("Tabelle2").Range("A1")
End Sub
Sub NursichtbareBriefeGkopieren()
Range("G1:GP28").Copy
Worksheets("Tabelle40").Range("G29").PasteSpecial Paste:=xlPasteAll, SkipBlanks:=False
End Sub
Die optimale Lösung wäre im übrigen, auf dem Ziel-Tabellenblatt einen Button einzufügen, der es mir erlaubt von drei (!) anderen Tabellenblättern (möglichst inkl. Zeilenhöhen, Formatierungen etc.) also ein echtes Abbild der Tabellen, aber lediglich die eingeblendeten/sichtbaren Zellen zu kopieren. Also eigentlich genau den umgekehrten Fall, sich Daten zu "ziehen", als "hinzuverschicken".
Da ich hier Anfänger bin danke ich für jede Idee und Hilfe!