|
|
| Другие темы раздела | |
| VBA VBS - Копирование данных из txt в Excel Не могу перенести код из VBA в VBS. Пыталась найти альтернативы, но никак не могу. Есть файл txt, в нем какое-то количество строк такого типа: Соединение. 000000000 01/01/2010 00:00:50;ПР. ;1 ;11_11_1111 ;ОЗ ... https://www.cyberforum.ru/ vba/ thread2721240.html |
VBA Цена прописью Всем привет! Есть код функции, который преобразует число в ценовой формат прописью. Подскажите, пожалуйста, как добавить разряд миллиардов? Пытался по аналогии с миллионами, но не получается. Видимо что-то делаю не так. Заранее огромное спасибо! Function Cur_txt1(cur As Currency, gender As String) As String Dim str As String Dim word As String Dim digital As Integer Dim c As Currency c... |
|
VBA Найти точку, максимально удалённую от полюса, среди первых четырех заданных точек
https://www.cyberforum.ru/ vba/ thread2721005.html Заданы координаты десяти точек плоскости и координаты точки-полюса. Найти точку, максимально удалённую от полюса, среди первых четырех заданных точек и такую же точку - среди последних шести. Определить так же расстояние между населенными точками. Задачу нужно решить с использованием подпрограмм |
VBA Отправка письма из Excel с выбором вложения, копированием диапазона и вставки картинкой в письмо
https://www.cyberforum.ru/ vba/ thread2720959.html Добрый день. У меня есть макрос, который делает копию файла в .xlsm и .pdf. Например, 1.xlsm -> 2.xlsm, 2.pdf Потом я копирю ручками pdf, переношу в письмо и отправляю. Хочу автоматизировать :) У меня есть отдельно работющие части кода: 1) Отправка письма с адресатами и пр: Sub Send_Mail_With_Picture() |
|
Перенос части ячейки в другую с применением формулы VBA В ячейках произвольный текст с описанием, импортированный макросом из txt-файлов. Последней строкой стоит "Время звучания: 04:25:12" (например). (Эта строка может быть и в начале, тогда я переставляю ее в конец. А может и отсутствовать). Нужно из ячеек с описанием эту фразу удалить, а в другой столбец ("Время звучания в мин.") вставить только время, но в минутах (т.е. с применением формулы).... |
VBA Неправильное определение номера абзаца. 2 и три четверти Есть файл (см во вложении), я осуществляю поиск текста с помощью Selection.Find метода по слову "Заявитель", после нахождения определяю номер абзаца с помощью oDoc.Range(1, Selection.Range.Paragraphs.Last.Range.End).Paragraphs.Count В случае этого дока выдаёт второй номер. Но проблема в том, что в данном файле абзац с номером два - абзац, начинающийся со слов "ДЕКЛАРАЦИЯ О СООТВЕТСТВИИ ", sText... https://www.cyberforum.ru/ vba/ thread2720560.html |
|
VBA Обозначение ячейки переменной
https://www.cyberforum.ru/ vba/ thread2720549.html Всем привет! Мы можем обозначить ячейку переменной: Range("A1") = a Но как обозначить переменной ячейку не зная ее координаты, но зная ее значение? Как обозначить ячейку, которая содержит "Привет" переменной А? |
Задача с массивом из 7 чисел VBA Задача по программированию. Нужно написать задачу на языке BASIC диалект VBA. Задача так звучит: "Записать в массив 7 чисел. Найти максимум и записать его в последний элемент. Преобразованный массив вывести на экран Basic VBA." Я предложил такое решение: Sub Задача6() Dim N(1 To 7) As Double Dim i As Byte |
| VBA Как в ячейки можно написать формулы для вычисления суммы через VBA Т.е. я хочу что бы он в ячейку А1 написал формулу =СУММ(А1+В2). Как это сделать ? https://www.cyberforum.ru/ vba/ thread2720492.html | VBA Как вызвать процедуры в зависимости от событий на листе? нужно чтоб макрос ставил единички в столбцы через 2 клетки вправо (заполняю ячейку A1 макрос ставил единицу в D1) Private Sub Worksheet_Change(ByVal Target As Range) AddDate DropDown End Sub Sub AddDate(Target As Range) For Each cell In Target If Not Intersect(cell, Range("A:A")) Is Nothing Then https://www.cyberforum.ru/ vba/ thread2720462.html |
|
VBA Получить значение верхнего уровня в таблице для строки (ячейки) Добрый день, возник следующий вопрос. Как можно в таблице для конкретной строки получит значение верхнего уровня? Т.е. таблица с группировкой, нужно для, например : "Учетный лист тракториста-машиниста 00СД-009075 от 01.10.2020 8:30:00", получить как-то значение "Иванов Михаил Петрович". Это будет происходить в цикле, известно, что Cells(2, 2) содержит значение учетного листа, и для него... |
VBA Определить текущее имя диапазона
https://www.cyberforum.ru/ vba/ thread2720331.html Динамический диапазон, при каждом обновлении, меняет своё имя. Как определить текущее имя диапазона? |
|
2739 / 1714 / 778
Регистрация: 23.03.2015
Сообщений: 5,429
|
|
| 01.11.2020, 20:28 | 0 |
Excel Как удалить последний символ в строке? - VBA - Ответ 1496392701.11.2020, 20:28. Показов 8174. Ответов 4
Метки (Все метки)
 Сообщение было отмечено JungleJungle как решение
Решение
JungleJungle,
В вашем коде строку 17 Rng.Value = xOut поменяйте на Rng.Value = Left(xOut, Len(xOut) - 1) Вернуться к обсуждению: Как удалить последний символ в строке? VBA
2
|
|
| 01.11.2020, 20:28 | |
|
Готовые ответы и решения:
4
Как удалить последний символ из файла?
Как привести Int к строке, а затем удалить последний символ из строки
|
| 01.11.2020, 20:28 | |
| 01.11.2020, 20:28 | |
|
Помогаю со студенческими работами здесь
0
Удалить последний символ в строке
Удалить ненужный последний символ в строке
Удалить последний символ в строке вывода данных |