Как удалить текст между запятыми в Excel?

Это функция, реализованная через макрос.
Для большего понимания я выложил табличку - в ней всё: и макрос и примеры использования.
Вы табличку по ссылке скачали?

Как удалить текст между запятыми в Excel?

Вам формулой (длиннее), или VBA (проще и короче) тоже подойдёт?

Как в Excel найти кол-во ячеек, которые содержат определённое значение?

Приятно, когда уйдёшь на работу, а вопросы сами решаются :-)

ВПР, выдаёт #Н/Д как исправить?

Простой способ без скрипта:

В пустой столбец, например "I", формулой копируем столбец, соответствующий Вашему выбору через "Выберите функцию":
Ячейка I3: "=ИНДЕКС(C3:H3;$I$1)" и копируем её до "I21".
В I1 содержится номер выбранного столбца ("пол" - 1, "должность" - 2 ...).

И, окончательная формула:
=ИНДЕКС(B3:B21;ПОИСКПОЗ(K3;I3:I21;0))

ВПР, выдаёт #Н/Д как исправить?

ПОИСКПОЗ ищет только по одному столбцу.
Возвращает индекс этого элемента в столбце.

Если нужно искать по столбцу, меняющемуся из лист-бокса, то в этом случае проще написать скрипт.

Upd: С формулами может быть и можно, но сложно выйдет - велика вероятность ошибки.
Ну или я чего-то не знаю. Такое тоже может быть :-)

Как слуховой аппарат подключить bluetooth на пк, как аудио?

Вот это ответ!
Честно говоря, никогда не сталкивался с BT Low Energy. Спасибо, буду знать.
И да, я пробовал Phonak Marvel M90-R с аккумуляторами.

Как в экселе удалить значения в ячейках с одинаковыми значениями?

Почему?

Как слуховой аппарат подключить bluetooth на пк, как аудио?

Извините за задержку, наконец-то добрался до слуховых аппаратов.

Может проблема в том, что Ваши слуховые аппараты всё ещё сопряжены с Mac?

Менеджер устройств показывает мне следующие релевантные устройства:

Для всех них, кроме R-Phonak Hörgerät драйвер устройства имеет версию:

R-Phonak Hörgerät драйвер устройства имеет версию:


Посмотрите, какие устройства установил Ваш Win10.
Может помочь следующее:

Выключите слуховые аппараты.
Удалите драйвера устройств с помощью менеджера устройств.
Удалите слуховые аппараты из списка BT-устройств.
Включите их снова и подсоедините к Bluetooth.
Драйвера установятся автоматически.

Если звука до сих пор нет - пришлите пожалуйста скриншоты из менеджера устройств.

Как слуховой аппарат подключить bluetooth на пк, как аудио?

Про "другой Блютус громкоговоритель", Юрец: подойдёт что-нибудь, что передаёт звук по BT: hands-free, BT-колонки. Просто проверить, можете ли передавать в Win10 звук по BT. У соседей/друзей займите на время.

Хотел Вам сделать на работе скрины из диспетчера устройств (слуховые аппараты у меня тоже на работе), да запамятовал. Завтра постараюсь.

Как слуховой аппарат подключить bluetooth на пк, как аудио?

А другой Блютус громкоговоритель подключить можете?

Если с iPhone-ом соединились, то скорее всего проблема с драйверами.
Подключал на днях слуховой аппарат по Блютус - определилось 2 устройсва: стерео и хэндс-фри.
"Стерео" нормально проигрывало музыку.

Как установить прозрачный фон в textbox powerpoint? если нельзя из окна свойств то можно ли как то в VBA?

Вы правы, ActiveX работает нормально только на UserForms.

Как установить прозрачный фон в textbox powerpoint? если нельзя из окна свойств то можно ли как то в VBA?

Вот Вам показ. При нажатии на кнопку вызывается "UserForm1":

Private Sub CommandButton1_Click()
    UserForm1.Show
End Sub

Как видите TextBox1 имеет прозрачный фон:

Все остальные свойства TextBox1 как описано выше.

Вопрос по Макросу в exel. Как сделать так, чтобы макрос протягивал до первой пустой ячейки?

Как минимум
Range("V5:AE5" & a).FillDown : AE5 замените на AE
Range("U5:AK5" & a).Select : AK5 замените на AK

Как скачать все фото по ссылкам с csv?

Ах, у Вас и Эксель 64-битный...
Используйте "Public Declare PtrSafe Function" вместо "Public Declare Function".
Может быть прийдётся изменить тип возращаемой функции с "As Long" на "As LongPtr", но тут я не уверен.

Как скачать все фото по ссылкам с csv?

Функцию DownloadToFile забыли скопировать. И API-Call URLDownloadToFile.
Скопируйте всё из моего ответа в VBA и используйте содержимое "Start" (ну или Ваш "test").

Как скачать все фото по ссылкам с csv?

Ловите ("D:\test.csv" - csv со ссылками"D:\" - директория, куда складывать файлы):

Sub Start()
    Dim linenumber&, arrayOfUrls$(), line$, source$, i&, destination$, tmpArray$()
    
    Open "D:\test.csv" For Input As #1 ' Open file for input
    Do While Not EOF(1) ' Loop until end of file
        linenumber = linenumber + 1
        Line Input #1, line
        arrayOfUrls = Split(line, ",")

        For i = 0 To UBound(arrayOfUrls)
            source = Trim(arrayOfUrls(i))
            tmpArray = Split(source, "/")
            Call DownloadToFile(source, "D:\" & tmpArray(UBound(tmpArray)))
        Next
    Loop
    Close #1
End Sub

Как передать данные в ячейке в ячейку другого формата?

Автор хотел 27,35 :-)

Как передать данные в ячейке в ячейку другого формата?

По Вашей первой формуле выходит 3,35.