Sub RandomizeColumn()
Dim row As Integer
Dim originalValue As Variant
Dim randomFactor As Variant
Dim column As Integer
column = 5 'randomize the values of the 5th column
For row = 2 To 10000 'begin with the 2nd row an end with the 10000th row
originalValue = Cells(row, column).Value
randomFactor = (WorksheetFunction.RandBetween(-9, 9) * 0.01) + 1
Cells(row, column) = randomFactor * originalValue
Next row
End Sub
Thunderbird kann Termine nicht bestätigen
Fehlermeldung bei Erhalt eines Einladungstermins:
Kein Kalender mit Schreibrechten für Einladungen eingerichtet, bitte die Kalendereigenschaften überprüfen
Falls selten: Gehe in den entsprechenden Webmailer – diese sollten die Funktionalität bieten, Termine zu bestätigen.
Screenshot von gesamten Webseite erstellen (Scrollen)
Ausprobiert und für gut befunden: In Chrome kann man die Extension GoFullPage installieren, freigeben und an die Extension Bar anpinnen.
Anschließend findet sich in der Extension Bar ein Fotoapparat-Icon – ein Klick nimmt die aktuelle Webseite scrollend auf.
Anschließend kann man dieses als .pdf speichern – in der Defaulteinstellung bekommt die Datei als Namen die URL plus den Timestamp zum Zeitpunkt der Screenshoterstellung.