Beispieldaten generieren

[d'r Bastler]

Die angefügte Datei enthält in Makro, mit dem man leicht (auch größere Mengen) Beispieldaten in den Variablentypen: Text(mit Ziffern und Sonderzeichen), Integer, rationale Zahlen, Datum und Währungszeichen erzeugen kann.

[d'r Bastler]

und das folgende Makro, wandelt Formeln in Werte um ...

Code: Alles auswählen

Sub Formula2Value() 'wandelt per Formel produzierte Testdaten in Werte um
Dim i As Integer, r As Integer
r = ActiveSheet.UsedRange.Rows.Count

For i = 2 To r
    ActiveSheet.Cells(i, 1).Value = ActiveSheet.Cells(i, 1).Value
Next i
    
End Sub

[theos]

klingt umständlich und langsam wenn das Blatt voll Formeln ist
Mach das immer mit Kopieren/Einfügen(Werte) und vorher den benutzten Bereich markieren.
Das zeichnest du einmal auf und gut ist.

[d'r Bastler]

Moin Theo,

... hat aber den Vorteil, dass Du z.B. falsch erkannte Formate recht einfach vermeiden kannst. Besonders das Format Datum drängelt sich gerne mal bei einfachen Eingaben, wie z.B. 6/9 vor. Gewünscht ist 6 von 9 und XL macht daraus den 6. September ... Auch mit Text kann man da so seine Erfahrungen machen.

Schöne Grüße