Кодирование в VBA: Написать функцию вставляющую подстроку в строку с заданной позиции

@Medellin · Регистрация: 03.11.2022

Author24 — интернет-сервис помощи студентам

Доброй ночи друзья, помогите написать код в VBA в module через function

Написать функцию вставляющую подстроку в строку с заданной позицией. Проверить, не выходит ли заданная позиция за пределы строки.

Заранее благодарю

@АЕ · 09.12.2022, 09:00

Сообщение от Medellin

1.Написать функцию вставляющую подстроку в строку с заданной позицией. Проверить, не выходит ли заданная позиция за пределы строки.

Переделайте подпрограмму в функцию из предыдущего вашего вопроса. Останется только проверку позиции добавить.

@Alex77755 · 09.12.2022, 09:39

Сначала хотел помочь.
Даже функцию написал
Но вижу ТС ничего сам не хочет делать и нарушает правила
1 пост= 1 вопрос
Покажи свои попытки
Перепиши функцию - копипаст не прокатит

Visual Basic

Functiоn Vstаvkа(strоkа, pоdstrjkа, pоsiziyа)
    If pоsiziyа > Len(strоkа) Then MsgBоx "Позиция не вписывается в строку!", vbCriticаl, "Ошибка": Exit Functiоn
    Vstаvkа = Left(strоkа, pоsiziyа - 1) & pоdstrjkа & Mid(strоkа, pоsiziyа)
End Functiоn

Добавлено через 1 минуту

Visual Basic

1
2
3

Sub test()
    Debug.Print Vstаvkа("Каша", "к", 4)
End Sub

Кашка

Кодирование в VBA: Написать функцию вставляющую подстроку в строку с заданной позиции

Решение

Решение

@Medellin 0 / 0 / 0 Регистрация: 03.11.2022 Сообщений: 11
		1
	Кодирование в VBA: Написать функцию вставляющую подстроку в строку с заданной позиции 09.12.2022, 00:17. Показов 611. Ответов 2 Метки vba excel макрос (Все метки) Доброй ночи друзья, помогите написать код в VBA в module через function Написать функцию вставляющую подстроку в строку с заданной позицией. Проверить, не выходит ли заданная позиция за пределы строки. Заранее благодарю 0

@АЕ ᴁ® 3813 / 2148 / 453 Регистрация: 13.12.2016 Сообщений: 7,360 Записей в блоге: 5
	09.12.2022, 09:00	2
	Сообщение было отмечено Medellin как решение Решение Сообщение от Medellin 1.Написать функцию вставляющую подстроку в строку с заданной позицией. Проверить, не выходит ли заданная позиция за пределы строки. Переделайте подпрограмму в функцию из предыдущего вашего вопроса. Останется только проверку позиции добавить. 1

	09.12.2022, 09:39