VBA 初心者練習用です

(ｃｏｌｕｍｎｓ（”ａ：ｂ”）)

columns("A:B")

(ｒａｎｇｅ（”ｄ２”）．ｃｕｒｒｅｎｔｒｅｇｉｏｎ．ｓｅｌｅｃｔ)

Range("D2").CurrentRegion.Select

(ｒａｎｇｅ（”ｄ２”）．ｃｕｔ　ｒａｎｇｅ（”ａ１０”）)

Range("D2").Cut Range("A10")

(ａｐｐｌｉｃａｔｉｏｎ．ｃｕｔｃｏｐｙｍｏｄｅ　＝　ｆａｌｓｅ)

Application.CutCopyMode = false

(ｒａｎｇｅ（”ａ１０：ｂ１２，ｄ１０：ｅ１２”）．ｃｌｅａｒ)

Range("A10:B12,D10:E12").Clear

(ｍｓｇｂｏｘ　ｒａｎｇｅ（”ａ２：ａ１０”）．ｒｏｗｓ．ｃｏｕｎｔ)

MsgBox Range("A2:A10").Rows.count

(ｒａｎｇｅ（）．ｃｕｒｒｅｎｔｒｅｇｉｏｎ．ｃｏｐｙ　ｒａｎｇｅ（）)

Range().CurrentRegion.Copy Range()

(ａｃｔｉｖｅｓｈｅｅｔ．ｐａｓｔｅ　ｒａｎｇｅ（”ｄ２，ａ７，ｄ７”）)

ActiveSheet.Paste Range("D2,A7,D7")

(．ｃｕｒｒｅｎｔｒｅｇｉｏｎ．ｒｏｗｓ．ｃｏｕｎｔ)

.CurrentRegion.Rows.Count

(．ｃｕｒｒｅｎｔｒｅｇｉｏｎ．ｃｏｌｕｍｎｓ．ｃｏｕｎｔ)

.CurrentRegion.Columns.Count

(ｃｏｌｕｍｎｓ（”ａ，ｂ”）)

columns("A,B")

(ｃｏｌｕｍｎｓ（”ｄ：ｅ”）．ｈｉｄｄｅｎ　＝　ｔｒｕｅ)

Columns("D:E").Hidden = True

(ｃｏｌｕｍｎｓ（”ｄ：ｅ”）．ｈｉｄｄｅｎ　＝　ｆａｌｓｅ)

Columns("D:E").Hidden = False

(ｃｏｌｕｍｎｓ（”ｄ：ｅ”）．ｄｅｌｅｔｅ)

Columns("D:E").Delete

(ｒｏｗｓ（”６：８”）．ｄｅｌｅｔｅ)

Rows("6:8").Delete

(ｃｏｌｕｍｎｓ（””）．ｉｎｓｅｒｔ　ｘｌｓｈｉｆｔｔｏｒｉｇｈｔ)

Columns("").Insert xlShiftToRight

(ｒｏｗｓ（””）．ｉｎｓｅｒｔ　ｘｌｓｈｉｆｔｄｏｗｎ)

rows("").Insert xlShiftDown

(ｓｅｌｅｃｔｉｏｎ．ｅｎｔｉｒｅｒｏｗ．ｓｅｌｅｃｔ)

Selection.EntireRow.Select

(ｓｅｌｅｃｔｉｏｎ．ｅｎｔｉｒｅｃｏｌｕｍｎ．ｓｅｌｅｃｔ)

Selection.EntireColumn.Select