VBAスタンダード練習
| 順位 | 名前 | スコア | 称号 | 打鍵/秒 | 正誤率 | 時間(秒) | 打鍵数 | ミス | 問題 | 日付 |
|---|---|---|---|---|---|---|---|---|---|---|
| 1 | ku | 5056 | B+ | 5.0 | 99.2% | 132.7 | 676 | 5 | 50 | 2025/01/13 |
| 2 | ku | 4970 | B | 4.9 | 100% | 136.0 | 676 | 0 | 50 | 2025/04/10 |
| 3 | ku | 4697 | C++ | 4.7 | 99.8% | 143.7 | 676 | 1 | 50 | 2025/05/11 |
| 4 | あ | 3140 | E++ | 3.1 | 98.5% | 212.1 | 676 | 10 | 50 | 2025/04/17 |
| 5 | k | 2611 | E | 2.7 | 95.4% | 246.6 | 676 | 32 | 50 | 2025/05/03 |
関連タイピング
-
Excel VBA たぶんよく使う用語です
プレイ回数2404英字170打 -
プレイ回数40460秒 -
練習しながらEXCEL関数を覚えよう
プレイ回数2312長文843打 -
officeTanaka.netでVBAの勉強
プレイ回数724長文60秒 -
関数ROUND（ラウンド）についてです。
プレイ回数847長文873打 -
Excelの基本的な関数です。
プレイ回数1536短文英字60秒 -
Rangeオブジェクトに対するプロパティ・メソッドです。
プレイ回数1970英字60秒 -
イフを覚えて欲しくて作りました。
プレイ回数763長文886打
問題文
(ｖａｒｉａｎｔ)
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