version=1.0.0 vdate=01.10.2014 fname=udf_pad.bas ns=%NAMESPACE% fpath=/vba/functions ====== [VBA] lPad(), rPad() ====== //Das Gegenteil von Trim. lPad und rPad erweitern Strings auf eine bestimmte Länge. Diese Version schneidet zu lange Strings auch ab.// ==Version %%version%% - %%vdate%%== {{%%fname%%|Download %%fname%% (V-%%version%%)}} ===== Beispiele ===== > Für die Ausgabe der Resultate verwendete ich die Funktion [[:vba:functions:print_r:]]. d lpad("ab", 4) 'ab ' d lpad("Zürich", 4) 'Züri' d rpad("Bern", 6, "_") '__Bern' d rpad(123, 6, 0) '000123' ===== Code =====