レッスン-投稿一覧パソコン仕事５倍塾ポータル

投稿/コメントを表示します。

受講生さんの投稿

(投稿ID: 1089)

こんにちは。
最初に自分だけでやってみた時は、数列を使わずに解きました。

End Sub
Sub list()
Dim title
Dim gyo
title = 1

    For gyo = 1 To 10
        Range("C" & gyo).Value = Range("A" & title).Value & Range("A" & title + 1).Value
        title = title + 3
    Next

End Sub

やはり、文系的な発想ですね…。
数列を使った方が、同じ動きをするプログラムでも、行数が少なく、スッキリしたものができますね。
勉強になりました。
ありがとうございます。

2015/02/05 16:41

ゲストさんのコメント

(コメントID: 2241)

匿名さん:

VBAについての細かい知識をいろいろつけるより、発想のほうが大切です。
いろいろ、楽しみながら学んでいただければと☆

>こんにちは。
> 最初に自分だけでやってみた時は、数列を使わずに解きました。
>
>

>End Sub
>Sub list()
>Dim title
>Dim gyo
>title = 1
>
>    For gyo = 1 To 10
>        Range("C" & gyo).Value = Range("A" & title).Value & Range("A" & title + 1).Value
>        title = title + 3
>    Next
>
>End Sub
>

>
>やはり、文系的な発想ですね…。
> 数列を使った方が、同じ動きをするプログラムでも、行数が少なく、スッキリしたものができますね。
> 勉強になりました。
>ありがとうございます。

2015/02/05 20:44

ようこさんのコメント

(コメントID: 6230)

受講生さん:
私も問題[１]について自力でやってみたところ、こちらの方とほぼ同じコードが出来上がりました。（同じく文系出身者です）

Sub mondai1()
    Dim saki
    Dim moto
    moto = 1
    For saki = 1 To 10
        Range("c" & saki).Value = Range("a" & moto).Value & Range("a" & moto + 1).Value
        moto = moto + 3
    Next
End Sub

結果はこれでも十分達成できるのですが、お手本の回答を見てこのような書き方もあるのか、と気が付きました。

forの変数だけだと１つずつしか数値を増やせないと思い込んでいたので、てっきりもう一個「３ずつ増える用の変数」を別に作らなければ！と思っていましたが、range("")の方でfor変数に＊3するなどして調整すれば、変数は１つだけでも対応できるのですね。
（転記先は１行ずつ進ませ、転記元は３行ずつ進ませるという処理が）

私は文系選択をしたので数列はよくわかっていませんが、３ずつ増えるというのは確かに、たし算というより掛け算的な発想ですね。勉強になりました。

> こんにちは。
> 最初に自分だけでやってみた時は、数列を使わずに解きました。
>
>

> End Sub
> Sub list()
> Dim title
> Dim gyo
> title = 1
> 
>     For gyo = 1 To 10
>         Range("C" & gyo).Value = Range("A" & title).Value & Range("A" & title + 1).Value
>         title = title + 3
>     Next
> 
> End Sub
>

>
> やはり、文系的な発想ですね…。
> 数列を使った方が、同じ動きをするプログラムでも、行数が少なく、スッキリしたものができますね。
> 勉強になりました。
> ありがとうございます。

2019/07/07 21:10

小川慶一さんのコメント

(コメントID: 6232)

ようこさん:

基礎編ベーシックでは、マクロを書くときの考え方の基本たる考え方を演習を通して学べるように、ということで題材を選んでいます。
地味な問題が多いですが、どれも、演習で示した方針で解けるようにしっかり練習しておくと、あとが違います (^^

2019/07/08 19:52

５倍速！メールマガジン

このメールマガジンの詳細はこちら

受講生の声

たった1ヶ月で人生が劇的に変わりました

佐藤信さん

役員クラスの方から高い評価を受けるようになりました。

佐賀県 - 岩本徹さん

今までまったく知らなかったショートカットキーを使いまくっています。

東京都 - 鷹觜慶さん

年齢60才間近、営業で外回りの時間が多い私でも退社時間が1-2時間程度早くなりました。

東京都 - 宗内隆明さん

受講前もすでにパソコン得意でしたが、そんな私でも受講して本当に良かったと思えた講座です。

東京都 - 佐伯とも子さん

ここまで包括的に仕事に役立つ深い学びを受けれた講座は初めてでした

東京都 - 飯田倫子さん

受講生の声一覧へ

サイト運営者紹介

小川慶一講師/教材/システム開発者紹介

この学習サイトの教材制作、サポート、システム開発をすべてやっています。

より詳しい紹介はこちら