Office: Beschleunigen von VBA Excel Schleife

xlph · 1. Oktober 2014

Hallo,

einfach vorher kopieren:

Code:

Sub ZufallDatumKopieren()

Tabelle1.Calculate

With Tabelle1.Range("A1:A81")
.Copy
Tabelle2.Range("G5").PasteSpecial xlPasteValues
With Tabelle2.Range("G5").Resize(.Rows.Count)
' Werte mit sich selber überschreiben um aus
' Leerzeichen-Zellen Empty-Zellen zu erhalten
.Value = .Value
End With
End With

Application.CutCopyMode = False

Call BalkenZeichnen
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

pippsen · 1. Oktober 2014

Die Farben und Formatierungen werden aber so noch nicht mit kopiert, oder?

xlph · 2. Oktober 2014

Hallo,

stimmt das muss auch so heißen:

Code:

Sub ZufallDatumKopieren()

Tabelle1.Calculate

With Tabelle1.Range("A1:A81")
.Copy Tabelle2.Range("G5")
With Tabelle2.Range("G5").Resize(.Rows.Count)
' Werte mit sich selber überschreiben um aus
' Leerzeichen-Zellen Empty-Zellen zu erhalten
.Value = .Value
End With
End With

Application.CutCopyMode = False

Call BalkenZeichnen
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Office: Beschleunigen von VBA Excel Schleife

Beschleunigen von VBA Excel Schleife

Beschleunigen von VBA Excel Schleife

Beschleunigen von VBA Excel Schleife - Similar Threads - Beschleunigen VBA Excel

Suchfunktion beschleunigen

Word beschleunigen bei großen Dokumenten

Beschleunigung von Arrayformeln

Beschleunigen des ROI mit Business Intelligence

Ladezeiten Webbrowsersteuerelement beschleunigen.

Beschleunigung einer Abfrage

Ativitätensuche in Kontakt beschleunigen