VBAスタンダード練習

背景
投稿者投稿者Semi  いいね4  お気に入り登録
プレイ回数3380  難易度(2.7) 676打 英字
タグVBA タイピング EXcel エクセル

関連タイピング

関連タイピング一覧

問題文

ふりがな非表示 ふりがな表示

(ｖａｒｉａｎｔ)

Variant

(ｌｂｏｕｎｄ)

LBound

(ｒｅｄｉｍ　ｐｒｅｓｅｒｖｅ)

ReDim Preserve

(ｓｅｔ　ａ　＝　ｎｏｔｈｉｎｇ)

Set A = Nothing

(ｄｏ　ｕｎｔｉｌ)

Do Until

(ｌｏｏｐ　ｕｎｔｉｌ)

Loop Until

(ｄｏ　ｗｈｉｌｅ　ｃｅｌｌｓ（ｉ，　１）　＝　”ｘｘ”)

Do While Cells(i, 1) = "xx"

(ｌｏｏｐ　ｗｈｉｌｅ　ｃｅｌｌｓ（ｉ，　１）　＝　”ｘｘ”)

Loop While Cells(i, 1) = "xx"

(ｃａｓｅ　ｉｓ)

Case Is

(ｃａｓｅ　ｅｌｓｅ)

Case Else

(ｆｏｒ　ｅａｃｈ　ａ　ｉｎ　ｓｅｌｅｃｔｉｏｎ)

For Each A In Selection

(ｌａｒｇｅ)

Large

(ｓｍａｌｌ)

Small

(ｗｏｒｋｓｈｅｅｔｆｕｎｃｔｉｏｎ)

WorksheetFunction

(ｉｆ　ａ　ｉｓ　ｎｏｔｈｉｎｇ　ｔｈｅｎ)

If A Is Nothing Then

(ｉｆ　ｎｏｔ　ａ　ｉｓ　ｎｏｔｈｉｎｇ　ｔｈｅｎ)

If Not A Is Nothing Then

(ｃｕｒｒｅｎｔｒｅｇｉｏｎ)

CurrentRegion

(ｐｈｏｎｅｔｉｃ．ｔｅｘｔ)

Phonetic.Text

(ｓｕｂｔｏｔａｌ)

Subtotal

(ｔｈｉｓ　ｗｏｒｋｂｏｏｋ．ｐａｔｈ)

This Workbook.Path

など

(ｆｏｒｍａｔ（ｎｏｗ，　”ｙｙｙｙｍｍｄｄ”）)

Format(Now, "yyyymmdd")

(ｌｏｏｋａｔ：＝ｘｌｗｈｏｌｅ)

LookAt:=xlWhole

(ｆｉｎｄ（ｗｈａｔ：＝．．．ｌｏｏｋａｔ：＝．．．）)

Find(What:=...LookAt:=...)

(ｌｏｏｋａｔ：＝ｘｌｐａｒｔ)

LookAt:=xlPart

(ｆｉｌｅｃｏｐｙ)

FileCopy

(ｃｅｌｌｓ（ｒｏｗｓ．ｃｏｕｎｔ，　１）．ｅｎｄ（ｘｌｕｐ）．ｒｏｗ)

Cells(Rows.Count, 1).End(xlUp).Row

(ｍｋｄｉｒ)

MkDir

(ｅｎｔｉｒｅｒｏｗ)

EntireRow

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

EntireColumn

(ｒｅｓｉｚｅ（１，　３）)

Resize(1, 3)

(ｏｆｆｓｅｔ（０，　１）)

Offset(0, 1)

(ａｕｔｏｆｉｌｔｅｒ　ｆｉｅｌｄ：＝１)

AutoFilter Field:=1

(ｘｌｏｒ)

xlOr

(ｘｌａｎｄ)

xlAnd

(ｓｏｒｔ．ｓｏｒｔｆｉｅｌｄ．ｃｌｅａｒ)

Sort.SortField.Clear

(ｓｏｒｔ．ｓｏｒｔｆｉｅｌｄ．ａｄｄ２)

Sort.SortField.Add2

(ｘｌａｓｃｅｎｄｉｎｇ)

xlAscending

(ｘｌｄｅｓｃｅｎｄｉｎｇ)

xlDescending

(ｈｅａｄｅｒ　＝　ｘｌｙｅｓ)

Header = xlYes

(ｈｅａｄｅｒ　＝　ｘｌｎｏ)

Header = xlNo

(ｓｅｔｒａｎｇｅ)

SetRange

(ｄａｔａｂｏｄｙｒａｎｇｅ)

DataBodyRange

(ｈｅａｄｅｒｒｏｗｒａｎｇｅ)

HeaderRowRange

(ｌｉｓｔｃｏｌｕｍｎｓ)

ListColumns

(ｌｉｓｔｒｏｗｓ)

ListRows

(ｏｎ　ｅｒｒｏｒ　ｇｏｔｏ　０)

On Error GoTo 0

(ｏｎ　ｅｒｒｏｒ　ｒｅｓｕｍｅ　ｎｅｘｔ)

On Error Resume Next

(ｄｅｂｕｇ．ｐｒｉｎｔ)

Debug.Print

(ｕｂｏｕｎｄ)

UBound

(ｒｅｄｉｍ)

ReDim

問題文を全て表示 一部のみ表示 誤字・脱字等の報告