Добрый день!
Не нашел поиском, прошу помочь.


Команда отдельно в PowerShell работает

get-adcomputer -filter "description -like '*123*'" -properties *| select name, description, physicalDeliveryOfficeName

и выдает правильные результаты.

Не знаю, как ее прописать в VBA - уже 300 вариантов перепробовал - результата ноль.


Private Sub CommandButton59_Click()

   Dim objShell As Object

   Set objShell = CreateObject("WScript.Shell")

Call Shell (get-adcomputer -filter "description -like '*123*'" -properties *| select name, description, physicalDeliveryOfficeName)

End Sub


Заранее спасибо!

Добрый вечер!
Сломал голову - не знаю как скопировать из Excel таблицы  в документ Word - пропадает форматирование
Если я просто копирую мышкой вручную и вставляю в Word специальной вставкой с сохранением форматирования - все нормально.

Пробовал записать макрос и посмотреть что происходит - не получается, тк не Word уже не попадает в запись.....
Пробовал записать макрос в Word - не знаю как применить записанный код в макросе Excel....    
(Selection.TypeParagraph
   Selection.PasteExcelTable False, False, False)



Вот код  в Excel:

Worksheets("BarCode_EAN_128").Activate ' активация листа, с которого будем копировать
Range("D1:D5").Select ' выбор диапазона
Selection.Copy ' копирование

With CreateObject("Word.Application").Documents.Add ' создание документа Word
 
   
    .Range.PasteSpecial (xlPasteFormats) 'вставка с форматом Excel, но не работает...
   
    .Parent.Visible = True

End With

Помогите, пожалуйста, решить головоломку.
Заранее спасибо!

Добрый вечер!

Подскажите, пожалуйста, может быть есть уже такая тема, я не нашел.

Написал макрос, назначил его на кнопку в Outlook - все работает.
Каким образом сделать так, чтобы не вручную переносить этот макрос и кнопку на другие компьютеры?
Может быть какой-то батник или exe файл как-то собрать в какой-то программе?
Кто-то сталкивался с такой задачей?


 

Добрый день!
Нужна Ваша помощь. Никак не могу сообразить что нужно сделать, чтобы макрос работал правильно.
Задача такая - нужно искать совпадения по всем листам и записывать в лист Отчет.
У меня перезаписываются ячейки и добавляются "лишние повторные" значения. Предполагаю, что ошибка где-то в цикле.  Файл с кнопками и макросом прилагаю.
Помогите пожалуйста исправить код...
Заранее спасибо!

Доброго времени суток! Поискал на форуме, но ничего не нашел, чтобы подходило мне. Помогите пожалуйста, не могу сделать так, чтобы при выборе из одного динамического списка выпадали значения другого динамического списка. Сильно не ругайте и не бейте, если что.