Verwenden der Funktion Chr() zum Erstellen von Zeichen
Die Funktion Chr() in VBA generiert Zeichen, die ASCI codes entsprechen. ASCII Codes sind Zahlen, die Zeichen in Computersystemen darstellen. Der Code 65 gibt z. B. den Buchstaben A an, während der Code 66 den Buchstaben B angibt usw.
Sie können die Funktion Chr() nutzen, um Makros zu erstellen, die Zellen mit Zeichen füllen, die aus ASCII-Codes generiert wurden, entweder zufällig oder spezifisch.
Beispiel: Füllen eines Zellbereichs mit zufälligen Zeichen mit der Funktion chr()
Sub Fill_Cells_With_Random_Characters()
Dim i As Integer, j As Integer
Dim asciiCode As Integer
For i = 1 To 5
For j = 1 To 5
asciiCode = Int(26 * Rnd) + 65
Cells(i, j).Value = Chr(asciiCode)
Next j
Next i
With Range(“A1:E5”)
.Font.Bold = True
.Interior.Color = RGB(255, 228, 196)
End With
End Sub
Erklärung des Codes:
- Dim asciiCode As Integer: Deklariert eine Variable zum Speichern von ASCII-Code.
- Int(26 * Rnd) + 65: Generiert eine Zufallszahl zwischen 65 und 90. Der 65 Code ist in ASCII A, und der 90 Code ist Z.
- Rnd generiert eine Zufallszahl zwischen 0 und 1.
- 26 * Rnd generiert eine Zahl zwischen 0 und 25 und fügt dann 65 hinzu, um den ASCII-Code zwischen 65(A) und 90(Z) zu erhalten.
- Cells(i, j).Value =Chr(asciiCode): Füllt eine Zelle mit Zeichen, die von Chr() basierend auf ASCII-Code generiert wurden.
- With Range(“A1:E5”): Formatiert einen Zellbereich von A1:E5 mit fettem Text und einem pfirsichfarbenen Hintergrund (RGB(255, 228, 196)).
Schlussfolgerung
Durch die Verwendung von Excel VBA 365 können Sie Ihre Arbeitseffizienz in Excel verbessern. Das Erlernen der Erstellung und Bearbeitung von macro wird in der modernen Arbeitswelt, in der Automatisierung der Schlüssel zum Erfolg ist, eine unschätzbare Fähigkeit sein.