|
|
|
| Другие темы раздела | |||||||||||||||||||||||
|
VBA Скопировать строку Excel, за текущей строкой если из выпадающего списка выбрать второе значение в ячейке
https://www.cyberforum.ru/ vba/ thread2365115.html Добрый день, никак не получается совместить макрос который я пытаюсь совместить Есть макрос который выполняется если выбрать из списка ячейки D, новое значение On Error Resume Next If Not Intersect(Target, Range("D2:D300")) Is Nothing And Target.Cells.Count = 1 Then Rows(Target.Row + 1).Insert Shift:=xlUp, CopyOrigin:=xlFormatFromLeftOrAbove ... |
VBA Сколько и какие варианты замен для того чтобы слово стало без ошибки здравствуйте как программно это узнать в ворде в том числе и по возможным категориям, например "по хорошему" - Возможно, это одно слово. В таком случае они пишется через дефис. какие еще есть категории? спс | ||||||||||||||||||||||
| VBA Как изменить свойства документа Excel Приветствую всех ! Ребята, подскажите пожалуйста, как изменить вот эти три свойства(в коде ниже) в документе Excel формата .xlsx или .xlsm ? Просто ничего не происходит. Остальные свойства меняются без проблем. Более того, в файлах .xls всё работает как нужно. Куда копать ? https://www.cyberforum.ru/ vba/ thread2364890.html |
VBA Макрос которым можно найти путь по схеме (фигуры Shapes с присоединенными и наложенными линиями)
https://www.cyberforum.ru/ vba/ thread2364873.html Доброго времени суток! Помогите, пожалуйста, написать макрос, при помощи которого можно найти путь по схеме например: выделив начальную и конечную фигуру, при нажатии кнопки, схема выделит нужный путь по линиям и фигурам изменив цвет. Схема состоит из фигур Shapes и присоединенных/наложенных к ним линий. Один добрый человек с форума подсказал, что нужно --запомнить координаты и... | ||||||||||||||||||||||
|
Запрет на редактирование ячейки в MS Exce через макрос VBA Есть условие, что если в определенной ячейке с16 выбрана категория 3 (из 7-ти категорий), то появляется сообщение о том, что в ячейке с17 не менее 21% и при этом на ячейку с17 накладывается запрет на редактирование этой ячейки. Макрос написан и работает всё, кроме этого запрета) Прощу помощи, знающий людей. Заранее спасибо) Private Sub Worksheet_Change(ByVal Target As Range) If Range("C16")... |
VBA Ошибка при повторном открытии книги
https://www.cyberforum.ru/ vba/ thread2364761.html У мея есть код, написан на VBA в Excel 2010. Все работает отлично, при запуске надо выбрать книгу через проводник. Начали возникать случаи когда книга уже открыта и код работает, но в конце закрывает книгу без сохранения и данные еряются. Можно ли как-то проверить открыта уже книга или нет? | ||||||||||||||||||||||
|
VBA Смещение массива
https://www.cyberforum.ru/ vba/ thread2364405.html Учитывая моё "регулярное "посещение - я поздравляю всех с наступающим Sub no встроенная функция СМЕЩ() позволяет смещаться на ± N ячеек от стартовой ячейки. Как прописать СМЕЩ() в массиве ? например А1=СУММ(D3:E4) А2=СУММ(F5:G6) А3=сумм(G7:H8) |
Формат времени VBA Доброго времени суток всем. Задача сводиться к следующему - Вычислить скорость передачи данных. Я вроде сделал, но не пойму почему если вводишь в первую ячейку больше 10 мегабайт, перестает правильно считать, помогите разобраться, вроде бы все просто на первый взгляд. Sub расчет() S = Range("a1") * 1024 * 1000 * 8 / Range("b1") Sec = S Range("c1") = (Sec / 86400)... | ||||||||||||||||||||||
|
VBA Как вычеркнуть символы после буквы "а"?
https://www.cyberforum.ru/ vba/ thread2364107.html Пытался сделать через Replace Задание (Составить программу для вычеркивание в слове X всех букв, стоящих после буквы "a") Public Sub test1() Dim sStr As String sStr = "a2" MsgBox Replace(sStr, "a", "a_") End Sub |
VBA Программа поиска удобного расписания для посещения офиса( или любого другого места)
https://www.cyberforum.ru/ vba/ thread2364071.html Добрый день! Есть задача прикладная для работы, наверное проще расписать на примере. Допустим у нас есть компания, с которой заключен договор на предоставления услуг по одному виду работ и по другому, один вид услуг прописан таким образом, что в офисе мы должны появится 12 раз за год, а по другому виду работ 8 раз. Соответсвенно, что бы не гонять лишних разов необходимо вместить 8 раз в... | ||||||||||||||||||||||
|
Программирование в MS Excel. Заливка ячеек через подпрограмму VBA Мне необходимо найти числа кратные пяти, и залить их желтым цветом. Но у меня не работает подпрограмма, не могу понять почему. Строчки, связанные, с подпрограммой закомментированы. Плюс я не знаю как найти наиболее значение среди кратных. Sub ???1_????() Dim Matrix As Range Dim Rows As Byte, Columns As Byte, c As Range Set Matrix = For Rows = 1 To Matrix.Rows.Count For Columns = 1 To... |
VBA Ajax VBA HTTPRequest vs PHP CURL
Добрый день, уважаемые эксперты.
Подставляю один и тот же ajax запрос к серверу в curl PHP и в xmlhttp в VBA.
Сам URL вида: "https://www.site.com/rex/ajax/spec.php?a=6rdULF&b=notax"
CURL в PHP возвращает ответ в виде str:
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL, $url);
https
Наверх
| ||||||||||||||||||||||