vba:functions:index
Differences
This shows you the differences between two versions of the page.
| Both sides previous revision Previous revision Next revision | Previous revision Next revision Both sides next revision | ||
|
vba:functions:index [02.06.2014 09:57:30] yaslaw [getActiveWinUser()] |
vba:functions:index [29.04.2015 12:21:27] yaslaw |
||
|---|---|---|---|
| Line 1: | Line 1: | ||
| + | ~~NOTOC~~ | ||
| + | ~~DISCUSSION:off~~ | ||
| + | ~~NOCACHE~~ | ||
| + | <const>ns=%NAMESPACE%</const> | ||
| ======Functions====== | ======Functions====== | ||
| {{:vba:functions:functions.bas|}} | {{:vba:functions:functions.bas|}} | ||
| Line 18: | Line 22: | ||
| ===== Funktionen mit eigener Seite ===== | ===== Funktionen mit eigener Seite ===== | ||
| {{pagequery> | {{pagequery> | ||
| - | @vba:functions: *; | + | ^vba:functions:(?!index)[^:]+(?::index)?$; |
| - | filter=id:vba:functions:[^:]+(?::index|)$,^id:vba:functions:index; | + | fullregex; |
| - | sort=ns,title; | + | sort=ns:asc,title:asc; |
| display={title}; | display={title}; | ||
| - | snippet=plain,all,w30; | + | snippet=plain,999999,l1; |
| bullet=square; | bullet=square; | ||
| fontsize=100%; | fontsize=100%; | ||
| Line 28: | Line 32: | ||
| hidejump; | hidejump; | ||
| }} | }} | ||
| + | |||
| + | |||
| + | |||
| Line 50: | Line 57: | ||
| ====replaceA()==== | ====replaceA()==== | ||
| Mehrere Replace auf einmal ausführen | Mehrere Replace auf einmal ausführen | ||
| - | <code vb truncDate.bas> | + | <code vb replacea.bas> |
| '/** | '/** | ||
| ' * Copyright mpl by ERB software | http://wiki.yaslaw.info | ' * Copyright mpl by ERB software | http://wiki.yaslaw.info | ||
| Line 237: | Line 244: | ||
| '/** | '/** | ||
| ' * Copyright mpl by ERB software | http://wiki.yaslaw.info | ' * Copyright mpl by ERB software | http://wiki.yaslaw.info | ||
| - | ' * | + | ' * |
| ' * Gibt den Grössten aus einer unbestimmten Menge von Werten zurück | ' * Gibt den Grössten aus einer unbestimmten Menge von Werten zurück | ||
| ' * @param Keine Objekte | ' * @param Keine Objekte | ||
| Line 243: | Line 250: | ||
| ' * @example greatest("Hallo Welt", 42, "Mister-X") -> Mister-X | ' * @example greatest("Hallo Welt", 42, "Mister-X") -> Mister-X | ||
| '*/ | '*/ | ||
| - | Public Function greatest(ParamArray items() As Variant) As Variant | + | Public Function greatest(ParamArray iItems() As Variant) As Variant |
| - | Dim item As Variant | + | greatest = iItems(UBound(iItems)) |
| - | For Each item In items | + | Dim item As Variant: For Each item In iItems |
| - | If item > greatest Then greatest = item | + | If Nz(item) > Nz(greatest) Then greatest = item |
| - | Next item | + | Next item |
| End Function | End Function | ||
| </code> | </code> | ||
| Line 260: | Line 267: | ||
| ' * @example least("Hallo Welt", 42, "Mister-X") -> 42 | ' * @example least("Hallo Welt", 42, "Mister-X") -> 42 | ||
| '*/ | '*/ | ||
| - | Public Function least(ParamArray items() As Variant) As Variant | + | Public Function least(ParamArray iItems() As Variant) As Variant |
| - | Dim item As Variant | + | least = iItems(LBound(iItems)) |
| - | least = items(LBound(items)) | + | Dim item As Variant: For Each item In iItems |
| - | For Each item In items | + | If Nz(item) < Nz(least) Then least = item |
| - | If item < least Then least = item | + | Next item |
| - | Next item | + | |
| End Function | End Function | ||
| </code> | </code> | ||
vba/functions/index.txt · Last modified: 29.06.2016 10:56:17 by yaslaw
Page Tools
Except where otherwise noted, content on this wiki is licensed under the following license: GNU Free Documentation License 1.3
