Я пишу программу Excel для отслеживания расположения инструментов на нашем рабочем месте. Я пытаюсь переместить данные с одной страницы на другую. У меня есть VLookup для доступа к информации, но я хочу иметь возможность очищать содержимое другой страницы, как только будут найдены данные. Проблема, с которой я столкнулся, заключается в написании формулы в коде VBA (так как это кнопка, которая активирует все это), которая может найти строку, а затем очистить содержимое этой строки. Я попытался поместить формулу сопоставления в случайную ячейку, чтобы найти строку, и пытался автоматически ввести ее в диапазон. Кто-нибудь знает, как это возможно? Вот что я пробовал. В этой ячейке X1 есть формула сопоставления.
Листы("Рабочий.Лист").Диапазон("A"Рабочий.Лист").Диапазон("X1").Значение).ОчиститьСодержимое
решение1
Почти получилось. Попробуй.
Sheets("Running.Sheet").Range("A" & Sheets("Running.Sheet").Range("X1").Value).ClearContents
Вы можете сделать код немного более управляемым, объявив переменные для листа, присвоив имя листа переменной, а затем используя переменную. Вот так:
Dim ws As Worksheet
Set ws = Sheets("Running.Sheet")
ws.Range("A" & ws.Range("X1").Value).ClearContents
Хотя настройка потребует немного больше работы, вы повысите эффективность, если будете чаще обращаться к одному и тому же листу.