С помощью макроса ниже вы можете вернуть размер экрана с помощью функции GetSystemMetrics32. Declare Function GetSystemMetrics32 Lib «User32» _ Alias «GetSystemMetrics» (ByVal nIndex As Long) As Long Sub DisplayMonitorInfo() Dim w As Long, h As Long w = GetSystemMetrics32(0) ‘ width in points h = GetSystemMetrics32(1) ‘ height in points… Continue Reading Определите размер экрана с помощью VBA в Microsoft Excel

Вопрос: Дни недели и даты месяца нужно открывать в двумерном массиве, а затем вставлять в лист Ответ: Поместите приведенный ниже код в стандартный модуль. Sub dayarray() Dim arrDay(1 To 31, 1 To 2) As Variant Dim intCounter As Integer For intCounter = 1 To 31 arrDay(intCounter, 2) = DateSerial(Year(Date), 12,… Continue Reading Как создать динамический массив VBA в Microsoft Excel

Звуковые файлы в формате MIDI часто бывают длинными, поэтому может потребоваться остановить воспроизведение звука (например, когда макрос будет завершен). Вот пример: Private Declare Function mciExecute Lib «winmm.dll» _ (ByVal lpstrCommand As String) As Long Sub PlayMidiFile(MidiFileName As String, Play As Boolean) If Dir(MidiFileName) = «» Then Exit Sub ‘ no… Continue Reading Воспроизведение MIDI-файлов с помощью VBA в Microsoft Excel

Если вы хотите получать автоматические обновления для сегодняшнего дня недели, эта статья для вас. В этой статье основное внимание уделяется обновлению пользователя текущего дня недели через msgbox в vba. Вопрос): хочу код для определения дня недели. Чтобы запустить редактор VB, нам нужно выполнить следующие шаги. Щелкните вкладку «Разработчик». В группе… Continue Reading VBA Message Box в день изменение сегодня в Microsoft Excel

Вопрос: При фильтрации столбца строка заголовка должна быть выделена желтым цветом фона Ответ: Вставьте следующий код в соответствующие модули. Поместите приведенный ниже код в стандартный модуль. Private Sub Worksheet_Calculate() Dim flt As Filter Dim intCol As Integer For Each flt In ActiveSheet.AutoFilter.Filters intCol = intCol + 1 If flt.On Then… Continue Reading Установите желтый цвет фона для заголовка в таблице автофильтр с помощью VBA в Microsoft Excel

Значение Пи — 3,14, гравитационное притяжение Земли — 9,8 м / с ^ 2 ^, вас интересует VBA и т. Д. Все это константы, и они не меняются. В VBA вы можете определять переменные, значение которых нельзя изменить в программе. Программист VBA самостоятельно определяет эти постоянные значения в программе, чтобы… Continue Reading Как Объявить VBA Константы в Excel

В этой статье мы будем использовать событие изменения рабочих листов для отображения предупреждающего сообщения, когда общее количество столбцов превышает общее значение. Исходные данные представляют собой солевой состав лекарства. Он состоит из названия соли и ее веса на 10 грамм. Сумма всех солевых ингредиентов равна 10 граммам. Когда мы изменяем вес… Continue Reading Отображение сообщения, если общая колонка превышает используя VBA в Microsoft Excel

Звуковые файлы в WAV-формате легко проигрывать. Вам нужно только знать имя файла звука, который вы хотите воспроизвести, и решить, хотите ли вы, чтобы макрос ждал, пока воспроизводится звук, или нет. Вот пример: Public Declare Function sndPlaySound Lib «winmm.dll» _ Alias «sndPlaySoundA» (ByVal lpszSoundName As String, _ ByVal uFlags As Long)… Continue Reading Воспроизведение WAV-файлов с помощью VBA в Microsoft Excel

Строки частного профиля часто используются для хранения информации о пользователе вне приложения / документа для последующего использования. Например, вы можете хранить информацию о последнем содержимом в диалоговом окне / UserForm, о том, сколько раз открывалась книга или последний использованный номер счета для шаблона счета. Строки приватного профиля для каждого пользователя… Continue Reading Частные Струны профиля с помощью реестра с помощью VBA в Microsoft Excel

Если вы не хотите использовать API-функции, вы можете использовать библиотеку объектов Words для чтения и записи строк частного профиля. Слова System.PrivateProfileString могут читать и записывать как INI-файлы, так и реестр. В других приложениях, кроме Word, вам нужно добавить ссылку на библиотеку объектов Words. Вы можете добавить ссылку, открыв редактор Visual… Continue Reading Частные Струны профиля с использованием слова System.PrivateProfileString с помощью VBA в Microsoft Excel