Wenn ich die untenstehende Prozedur mit "call DupliziereZeichen(p,5)" aufrufe, erhalte ich immer die Fehlermeldung:
Fehler beim kompilieren!
Argumenttyp ByRef unverträglich
----------------------------------------------
Hier die Prozedur:
----------------------------------------------
Sub DupliziereZeichen(Zeichen As String, Anzahl As Long)
'Variablen definieren
Dim Zähler As Long, Zeichenkette As String
'Zeichenkette mit der gewünschten Anzahl von Zeichen erstellen
For Zähler = 1 To Anzahl
Zeichenkette = Zeichenkette & Zeichen
Next
'Zeichenkette im Testfenster ausgeben
Debug.Print Zeichenkette
End Sub
Wie Ihr seht, bin ich ganz am Anfang von VBA und hoffe daher auf eure Hilfe.
Obwohl ich "Zeichen As String" für das Argument angegeben habe, akzeptiert excel nur Zahlen als Argument. Diese Prozedur hat auch schon mal richtig funktioniert. Jetzt geht es auf einmal nicht mehr.
Ich hoffe auf Hilfe...