1 кубик - равен 1г
Мы запомним синий цвет
Вот такое вот количество
Диаграмма и условное форматирование является полезным инструментом для визуализации числовых данных.
Sub aaa()
s = InputBox("Введите текст")
s = Replace(s, "к", "", , , vbTextCompare)
MsgBox s
End Sub
<u>Если нужна отдельная процедура для замены:</u>
Sub ReplKk(s As String)
s = Replace(s, "к", "", , , vbTextCompare)
End Sub
Sub Test()
Dim s As String
s = InputBox("Введите текст")
ReplKk s
MsgBox s
End Sub
Синтез — процесс соединения или объединения ранее разрозненных вещей или понятий в целое или набор.