Как обратится к ячейке (плюс несколько нестандартных методов выделения ячейки)
Категория: Basic
2012-11-30 16:34:01
code: #vba
Range("B5").Select Range("$B$5").Select Range("Дата").Select Range("B" & 5).Select [B5].Select [Дата].Select Range("A5").Next.Select Range("C5").Previous.Select Range("A5").Range("B1").Select Range("B1").Range("A5").Select Application.Goto Range("B5") Application.Goto Reference:=Range("B5") Application.Goto Reference:=Range("Дата") Application.Goto "Дата" Application.Goto [Дата] Application.Goto Reference:="Дата" Application.Goto Reference:=[Дата] Range(Names!Дата).Select Range(ThisWorkbook.Names!Дата).Select Range(Application.Names!Дата).Select Range(Names("Дата")).Select Range(ThisWorkbook.Names("Дата")).Select Range(Application.Names("Дата")).Select Names!Дата.RefersToRange.Select ThisWorkbook.Names!Дата.RefersToRange.Select Application.Names!Дата.RefersToRange.Select Names("Дата").RefersToRange.Select ThisWorkbook.Names("Дата").RefersToRange.Select Application.Names("Дата").RefersToRange.Select Range("B5:B10").Item(1).Select Range("B5:B10").Item(1, 1).Select Range("A5:CM5").Item(1, 2).Select Range("B1:B10").Item(5).Select Range("B1:B10").Item(5, 1).Select Range("C1:D10").Item(5, 0).Select Range("D1:H50").Item(5, -1).Select Range("A17:E15").Item(-9, 2).Select Range("D10:E15").Item(-4, -1).Select Range("B5:B10")(1).Select Range("B5:B10")(1, 1).Select Range("D1:H50")(5, -1).Select Range("A17:E15")(-9, 2).Select Range("D10:E15")(-4, -1).Select Range("B5:B10").Cells(1).Select Range("B5:B10").Cells(1, 1).Select Range("A5:CM5").Cells(1, 2).Select Range("B1:B10").Cells(5).Select Range("B1:B10").Cells(5, 1).Select Range("C1:D10").Cells(5, 0).Select Range("D1:H50").Cells(5, -1).Select Range("A17:E15").Cells(-9, 2).Select Range("D10:E15").Cells(-4, -1).Select Range("B:B").Item(5).Select Range("B:B").Cells(5).Select Range("B:B").Rows(5).Select Range("B:B").Rows("5:5").Select Range("5:5").Item(2).Select Range("5:5").Cells(2).Select Range("5:5").Columns(2).Select Range("5:5").Columns("B").Select Range("5:5").Columns("B:B").Select Range("B:B 5:5").Select Range("B:B" & " " & "5:5").Select Range("B1").Offset(4).Select Range("C1").Offset(4, -1).Select Range("C10").Offset(-5, -1).Select Range("B5,B5").Select [B5:B5].Select [B5.B5].Select Range("B5.B5").Select Range("B5:B5").Select Range("B5:B5:B5").Select Range("B5", "B5").Select Range("$B$5", "$B$5").Select Range("B5", Range("B5")).Select Range(Range("B5"), "B5").Select Range(Range("B5"), Range("B5")).Select Range(Cells(1026), Cells(1026)).Select Range(Cells(5, 2), Cells(5, 2)).Select Range(Cells(5, "B"), Cells(5, "B")).Select Range(Cells(5, "B:B"), Cells(5, "B:B")).Select Cells(5, 2).Select Cells(5, "B").Select Cells(5, "B:B").Select Cells(1026).Select Rows(5).Cells(2).Select Rows(5).Columns(2).Select Rows(5).Columns("B").Select Rows(5).Columns("B:B").Select Rows("5:5").Columns("B").Select Rows("5:5").Columns("B:B").Select Columns(2).Cells(5).Select Columns(2).Rows(5).Select Columns(2).Rows("5:5").Select Columns("B").Cells(5).Select Columns("B").Rows(5).Select Columns("B").Rows("5:5").Select Columns("B:B").Cells(5).Select Columns("B:B").Rows(5).Select Columns("B:B").Rows("5:5").Select
авторы: Steven Roman, Richard Shepherd
Поделиться: