Как уже говорили другие в комментариях, задача определения «слов, которые не имеют смысла», действительно требует от вас определить, что на самом деле означает «нет смысла» для вашего контекста.
В буквальном смысле ваш вопрос, возможно, вы захотите взглянуть на функцию CheckSpelling()
, которая возвращает False
, если слово не существует в текущем или указанном словаре. Вы бы вызвали функцию, как показано ниже:
Dim items() As String
Dim i As Long
items = Split("The quick brown fox ran over the lazy dog https//kidsnursuery.com/ghyds/", " ")
For i = 0 To UBound(items)
If Not Application.CheckSpelling(items(i)) Then
items(i) = vbNullString
End If
Next
Debug.Print Join(items, " ")
Если Вы делаете это к нескольким полям или делаете его довольно часто, то, возможно, плагин является ответом.
Вот начало плагина jQuery, который форматирует значение поля к двум десятичным разрядам.
Это инициировано onchange событием поля. Можно хотеть что-то другое.
<script type="text/javascript">
// mini jQuery plugin that formats to two decimal places
(function($) {
$.fn.currencyFormat = function() {
this.each( function( i ) {
$(this).change( function( e ){
if( isNaN( parseFloat( this.value ) ) ) return;
this.value = parseFloat(this.value).toFixed(2);
});
});
return this; //for chaining
}
})( jQuery );
// apply the currencyFormat behaviour to elements with 'currency' as their class
$( function() {
$('.currency').currencyFormat();
});
</script>
<input type="text" name="one" class="currency"><br>
<input type="text" name="two" class="currency">
Возможно, что-то вроде этого, где Вы могли выбрать больше чем один элемент, если Вы хотели бы?
$("#number").each(function(){
$(this).val(parseFloat($(this).val()).toFixed(2));
});