Код запроса для VB.NET форма VBA

---

Дорогой господин / Mam

у меня есть код в excel (VISUAL BASIC FOR APPLICATION ), я много пытался преобразовать этот код в visual basic.net но я потерпел неудачу , и каждый раз я получал ошибку

поэтому я прошу Вас предоставить мне код в vb.net для кода vba


Если Не ActiveWorkbook.Тогда Многопользовательское Редактирование
Приложение.DisplayAlerts = False
ActiveWorkbook.SaveAs ActiveWorkbook.Имя, режим доступа:=xlShared
Приложение.DisplayAlerts = True
MsgBox " Теперь Поделился"
Конец, Если

спасибо

Что я уже пробовал:

Dim xlApp как excel.Приложение
Dim xlWorkBook как excel.Рабочая тетрадь
Тусклый xlWorkSheet как excel.Рабочий лист
xlApp = новый excel.Приложение
xlWorkBook = xlApp.Книги.Открыть ("D:\program gann\NEST.xls")
xlWorkSheet = xlWorkBook.Рабочие листы ("NEST-Sheet1")

ActiveWorkbook = xlWorkBook

ActiveWorkbook.SaveAs(ActiveWorkbook.Имя, xlWorkSheet. accessmode: = xlShared)

---