Результаты поиска по запросу "excel-vba"
Я обнаружил, что CDate время от времени плохо себя ведет. Этот код появляется, чтобы сначала преобразовать вашу дату в строку, а не в числовое представление даты. Это преобразование происходит после того, как вы найдете строку. Так как вы упомянули, что первая ячейка пропускается, то первая дата, содержащая эту строку, - 11/1/16.
тим, у меня есть следующая тривиальная задача: Укажите первую дату месяца с января 2016 года по июнь 2018 года подрядНайди 01 января 2016 года и раскрась краснымиспользованиеRange.Find()Таким образом, я создаю код с циклом от 1 до 30 и записываю ...
Вы можете запустить это из Excel
й день, Я создал макрос, который загружает данные в базу данных доступа (обе на моем рабочем столе). Проблема в том, что я продолжаю получать ошибки, когда пытаюсь расширить диапазон. Я предполагал, что это будет что-то простое, но мне кажется, ...
Это код, который я создал, чтобы решить эту проблему:
даю копию файла Excel, используя VBA. В этом файле есть столбец, который содержит числа с предшествующими нулями. Копия файла создана, но данные в этом столбце удалены. Мне нужно сохранить значения с предыдущими нулями. Как я могу решить эту ...
Также, как я могу добавить текст после первой таблицы? @ L42
я был поиск по всему этому вопросу и до сих пор не получить точные коды для него. Мне нужно скопировать цвет сводной таблицы из Excel в тело Outlook. При запуске кода я получил формат, но единственная проблема заключается в том, что цвет таблицы ...
Смотрите обновленный код
плохо знаком с этим, но я постараюсь сделать мой вопрос простым для понимания. У меня есть лист Excel с сводной таблицей, который я фильтрую по первому столбцу (имена торговых представителей) один за другим, а затем копирую ...
Полный макрос;
я есть документ Excel (2007) с диаграммой (Clustered Column), которая получает свои ряды данных из ячеек, содержащих вычисленные значения Вычисленные значения никогда не изменяются напрямую, а только в результате изменения других ячеек на ...
Спасибо за ответ, используя ваше решение, фильтрация исходного листа действительно работает, но экспортированный CSV-файл пуст.
тоящее время я использую этот код для экспорта всего листа, но я хотел бы экспортировать только те строки, в которых выполняется условие. В этом случае в столбце 13 есть «х»: Option Explicit Sub ExportAsCSV() Dim MyFileName As String Dim ...
Спасибо за поправку .. Статья была действительно полезной
у удалить пустые ячейки в диапазоне (E1: E130). Я пытался использовать, если клеткаvalue = "" тогда как видно из кода ниже: For Each cell In ranger If cell.Value = "" Then cell.Delete End If next cell Однако этот код, кажется, пропускает ...
Однако на следующем листе не удается установить новую таблицу запросов с использованием того же соединения, которое не было закрыто. Я подозреваю (и добавлю решение ниже), что мне нужно сбросить соединение перед удалением таблицы запросов. Вышеприведенный код Расмуса выглядит как вероятное решение.
дую коду, найденному на другом сайте. Вот основы моего кода: Dim SQL As String Dim connString As String connString = "ODBC;DSN=DB01;UID=;PWD=;Database=MyDatabase" SQL = "Select * from SomeTable" With ...
Команда VBA Application.Quit не закрывает все приложение Excel
У меня есть следующий код под дном. Когда я щелкнул по нему, он просто закрывает текущий лист Excel, но не закрывает все приложение Excel. Application.DisplayAlerts = False ThisWorkbook.Save Application.DisplayAlerts = True ...