Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Присвоение переменной имени листа VBA
 
Прошу прощения за дурацкий вопрос (перешерстил уже кучу форумов), как правильно реализовать присвоение имя листа переменной?
Что бы не прописывать каждый раз длинное название
Ниже привел код, что то в нем не работает. Может кто подскажет как правильно записать его?
Код
Dim x, y As Sheets
    Set x = Sheets("Основные_данные")
    Set y = Sheets("Ввод_пробега")
x.Cells(5, 3) = y.Cells(1,1)
Изменено: Alex6656 - 25.01.2016 00:47:59
Удаление строки на другом листе по условию
 
На Листе1 в ячейке A1 указывается номер строки...Затем этот номер ищем на листе2. После того как нашли совпадающий номер нужно удалить полностью строку на ЛИСТЕ2 .....Загвоздка с кодом удалния(уже всю голову сломал)..помогите пожалуйста.
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Dat As Range
Set Dat = Sheets("Лист2").Range("A1:A100").Find(what:=Sheets("Лист1").Range("A1").Value)                'Ищем значение ячейки А1 на листе2
MsgBox ("Адрес ячейки на листе2 где находится искомое выражение- " & Dat.Address & "   Удаляем строку на Листе2 номер- " & Dat.Row)
Dat(Row).Delete     'Удаляет какую то странную строку, но не ту
End Sub

Если записать Dat(Row) - выдает какое то другое значение от Dat.Row
Спасибо.
Изменено: Alex6656 - 23.01.2016 22:38:58
закрыть окно изображение(элемент ActiveX) с помощью vba, закрыть окно изображение(элемент ActiveX) с помощью vba
 
Открыл окно  изображение(элемент ActiveX) вcтавил картинку. Но хотелось бы усовершенствовать программу чтобы при открытии excel выводилось изображение, а через некоторое время закрывалось. С формами все получается, но хочется что бы было без крестиков и названия окна.
Изменено: Alex6656 - 26.09.2015 18:54:33
Страницы: 1
Loading...