【Day54】文系オタクのエンジニア道～問題演習⑧-1～

2024年6月29日 06:30

こんにちは
安田です

最近、雨が多くて
本格的に梅雨を感じています

今朝、自転車が「ない」
と大慌てでした

リマインド機能が
「チャリを〇〇へ引き取りに行く」
と教えてくれたので
安心しました

昨日は飲み会のあと
雨が降ってきたので
自転車を置いて帰ったんです

LINEのリマインくん
めっちゃ便利です
（ステマや宣伝ではないですよー）

さて本日もVBAの問題を解いていきます

Sub Test1()
Dim i As Long
For i = 1 To 3
Cells(i, 2) = 【　1　】(Cells(i, 1), 5)
Next i
End Sub

普通に「right」を使うものだと思っていました

「Mid」を使います
Mid(文字列, 開始位置, 文字数)

問題文の「Cells(i, 1)」が文字列
「5」が開始位置（アルファベットの先頭）になる

「文字数」が指定されていない場合
→指定した文字列の開始位置から
すべての文字列を取得する

Sub Test1()
MsgBox【　1　】(Range("A1"), Range("A2"), Range("A3"))
End Sub

「DateSerial関数」を使う
年月日の数値から日付形式のデータを作ることができる

DateSerial(年,月,日)

「UCase関数」は
アルファベットの文字列を大文字に変換する

逆に小文字にする場合は
「LCase関数」を使う

補足
「UCase」は「uppercase（大文字）」
「LCase」は「lowercase（小文字）」の略

これは覚えやすい

正答率 57％
7問中4問正解

No.8は問題数が多かったので
いくつかに分けて学習していこうと思います

「VBAマスターに俺はなる」

最後まで読んでいただき
ありがとうございます
安田

マガジンにまとめてありますので
よかったらそちらも御覧ください

#66日ライラン
ライラン　3日目

この記事が気に入ったらサポートをしてみませんか？