Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Wiederholen von Zeichen inVBA

Wiederholen von Zeichen inVBA
22.11.2005 09:59:03
Zeichen
Guten Tag allerseits,
in meiner Tabelle habe ich in mehreren Zeilen folgende Formel:
=Wiederholen("g";a1/100)
(Mit Schriftart Webdings erhalte ich horizontale Balken)
wie gehe ich vor wenn ich das ganze per Makro machen will. Ich möchte nicht das der Formel in der Zelle erscheint.
Anders ausgedrückt: Ich brauche eine Code um ein Zeichen x-mal hintereinander zu schreiben.
Vielen Dank im Voraus. Murat K.
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wiederholen von Zeichen inVBA
22.11.2005 10:01:19
Zeichen
Hallo,
? string(55,"*")
*******************************************************
Gruss- Micha
PS: Rückmeldung wäre nett.
AW: Wiederholen von Zeichen inVBA
22.11.2005 10:12:50
Zeichen
Hallo Micha
Prima, es funktioniert. Danke für die schnelle Antwort.
Gruss Murat K.
Danke für Deine Rückmeldung! owT
22.11.2005 10:28:24
MichaV
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Zeichen in VBA wiederholen: So geht's


Schritt-für-Schritt-Anleitung

Um ein Zeichen in VBA mehrmals zu wiederholen, kannst Du eine einfache Funktion erstellen. Hier ist ein Beispiel, wie Du das umsetzen kannst:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Klicke im Menü auf Einfügen und wähle Modul.
  3. Füge den folgenden Code in das Modul ein:
Function ZeichenWiederholen(ByVal Zeichen As String, ByVal Anzahl As Integer) As String
    Dim i As Integer
    Dim Ergebnis As String

    Ergebnis = ""
    For i = 1 To Anzahl
        Ergebnis = Ergebnis & Zeichen
    Next i

    ZeichenWiederholen = Ergebnis
End Function
  1. Schließe den VBA-Editor und gehe zurück zu Deiner Excel-Tabelle.
  2. Du kannst jetzt die Funktion =ZeichenWiederholen("g", A1/100) in eine Zelle eingeben, um das Zeichen "g" entsprechend der Anzahl in Zelle A1 zu wiederholen.

Häufige Fehler und Lösungen

Fehler 1: Funktion zeigt #NAME? an.
Lösung: Stelle sicher, dass Du die Funktion im richtigen Modul gespeichert hast und dass Du den Namen der Funktion korrekt eingegeben hast.

Fehler 2: Die Ausgabe ist nicht wie erwartet.
Lösung: Überprüfe, ob der Wert in Zelle A1 korrekt und größer als 0 ist. Wenn der Wert 0 oder negativ ist, wird kein Zeichen wiederholt.


Alternative Methoden

Falls Du keine VBA-Programmierung verwenden möchtest, kannst Du auch eine Kombination von Excel-Formeln nutzen:

  • Verwende die Formel =WIEDERHOLEN("g", A1/100), um das Zeichen ohne Makro zu wiederholen.
  • Beachte, dass diese Methode nur in Zellen sichtbar ist und die Formel selbst anzeigt.

Praktische Beispiele

  1. Horizontale Balken erstellen:
    Wenn Du die Schriftart auf "Webdings" änderst und die Formel =WIEDERHOLEN("g", A1/100) verwendest, erscheinen horizontale Balken in der Zelle.

  2. Zeichen für Tabellen:
    Du kannst auch die Funktion =ZeichenWiederholen("*", 10) verwenden, um eine Zeile aus Sternchen zu erstellen, die Deine Aston Villa Tabelle dekoriert.


Tipps für Profis

  • Du kannst die Funktion erweitern, um auch andere Datentypen zu akzeptieren, z.B. Zahlen oder spezielle Zeichen.
  • Nutze den Excel Shortcut Befehl wiederholen (Strg + Y), um die zuletzt durchgeführten Aktionen schnell zu wiederholen, ohne die Funktion mehrfach eingeben zu müssen.

FAQ: Häufige Fragen

1. Kann ich die Funktion auch für andere Zeichen verwenden?
Ja, Du kannst jedes beliebige Zeichen als Argument in die Funktion ZeichenWiederholen übergeben.

2. Funktioniert das in allen Excel-Versionen?
Die VBA-Funktion sollte in den meisten modernen Excel-Versionen (ab Excel 2007) funktionieren. Achte darauf, dass Du die Makros aktiviert hast.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige