321 (`□´)/ダーーーーー🔥問題 解答編【GAS🎨】
こんにちは!
パソコンインストラクター歴12年の
チサです。(*´∀`)
今日は昨日
出題した
321 (`□´)/ダーーーーー🔥問題
の解答編を書きますねーw
昨日のnoteはこちら👇
GAS🎨で
ループやIF文を使って
スプレッドシートに
こんな風に書き出す問題でした👇
みなさん
できたかな??
|ω•)チラッ
きっと人それぞれ
いろいろやり方があるだろうなぁ
(っ ॑꒳ ॑c)ゎ‹ゎ‹
ちなみに
わたしが書いたのは
こんなコード👇
function mondai_321(){
const ws = SpreadsheetApp.getActiveSpreadsheet().getSheetByName("シート1");
let kakegoe = 3
// 1~10までループする
for (let i = 1; i <= 10; i++){
//書き出し先のセルを変数で設定
let rg=ws.getRange("A"+i)
//kakegoeが1だった時にダー🔥
if ((kakegoe)==1){
rg.setValue(kakegoe + " (`□´)/ダーーーーー🔥")
//kakegoeを3に戻す
kakegoe = 3
}else{
//そうでなかったたらkakegoeのみ表示
rg.setValue(kakegoe)
kakegoe=kakegoe-1
}
}
}
掛け声を3から始めて
ループが回るごとに
1を引く
もし、掛け声が1だった場合は
(`□´)/ダーーーーー🔥
が出て、掛け声を3に戻す
そんなコードにしてみました
𐤔wʷ 🤣 𐤔w𐤔
みなさんのコードも
気になる!
おもしろいアイデアあったら
紹介してほしい💕
ついでに
VBAとPython🐍でも
書いてみました👇
ExcelVBA編================
こんな結果にする👇
★解答例
Sub mondai_321()
Dim kakegoe As Long
Dim gyo As Long
kakegoe = 3
For gyo = 1 To 10
If kakegoe = 1 Then
Range("A" & gyo).Value = kakegoe & " (`□´)/ダーーーーー"
kakegoe = 3
Else
Range("A" & gyo).Value = kakegoe
kakegoe = kakegoe - 1
End If
Next
End Sub
Python編================
こんな結果を出力👇
★解答例
kakegoe = 3
for i in range(1, 11):
if kakegoe == 1:
print(str(kakegoe) + " (`□´)/ダーーーーー🔥")
kakegoe = 3
else:
print(kakegoe)
kakegoe -= 1
わたしは
VBAが一番書きなれてるから
サクッと書けました。
Python🐍は
:(コロン)で書くところを
GAS🎨に引っ張られたのか⁉️
;(セミコロン)で書いちゃってて
エラーが出て怒られました🤣
いろんな言語が
ごちゃごちゃにならないよう
気をつけまーす🚨
ではでは
またあした!
(´꒳`)/
新刊出版しました👇
Wordショートカット力試しドリル
あなたはショートカットだけで
どこまでやれる?
|д゚)チラ
この📕で修行すれば
マウスのドラッグ操作から解放されますよ✨
ヾ(o´∀`o)ノワァーィ♪
➊パソコンに関する📕 4冊
➋Kindle出版に関する📕 2冊
➌節約に関する📕 1冊
➍読書に関する📕 1冊
➎海外の方向けの📕 3冊
気になる本があれば
試し読みだけでも♪
(´▽`)
この記事が気に入ったらサポートをしてみませんか?