パソコン仕事5倍塾
35,000人を指導した東大卒・元日本IBM社内講師が直伝
MENU
浦山大さんの投稿
(投稿ID: 3338)
Sub test() Dim gyo For gyo = 2 To 51 Dim juusho juusho = Range("C" & gyo) Range("F" & gyo).Value = Left(juusho, InStr(juusho, "区")) Next End Sub
Sub choumeiika() Dim gyo For gyo = 2 To 51 Range("G" & gyo).Value = Mid(Range("c" & gyo).Value, InStr(Range("c" & gyo), "区") + 1) Next End Sub
小川慶一さんのコメント
(コメントID: 4800)
たった1ヶ月で人生が劇的に変わりました
佐藤信さん
役員クラスの方から高い評価を受けるようになりました。
佐賀県 - 岩本徹さん
今までまったく知らなかったショートカットキーを使いまくっています。
東京都 - 鷹觜慶さん
年齢60才間近、営業で外回りの時間が多い私でも退社時間が1-2時間程度早くなりました。
東京都 - 宗内隆明さん
受講前もすでにパソコン得意でしたが、そんな私でも受講して本当に良かったと思えた講座です。
東京都 - 佐伯とも子さん
ここまで包括的に仕事に役立つ深い学びを受けれた講座は初めてでした
東京都 - 飯田倫子さん
2024年05月06日 19:09
2024年05月05日 07:10
2024年05月01日 14:04
2024年04月30日 17:13
2024年04月27日 15:36
2024年05月10日 13:24
2024年05月10日 11:46
2024年05月09日 09:02
2024年05月08日 16:04
2024年05月07日 17:54
2022年02月24日 10:59
2019年12月23日 05:57
2019年09月20日 12:29
表示できる投稿はありません。
この学習サイトの教材制作、サポート、システム開発をすべてやっています。
2022年02月02日 00:00
2022年02月02日 03:00
2022年02月02日 06:00
2022年02月02日 09:00
2022年02月02日 12:00
2024年02月15日 18:30
2024年02月09日 17:05
2024年01月19日 13:00
2023年12月31日 17:00
2023年12月21日 14:00
2024年05月05日 09:40
2024年05月03日 11:20
2024年05月02日 10:38
2024年05月02日 05:00
2024年05月01日 18:30
浦山大さんの投稿
(投稿ID: 3338)
演習に入る前に自分で何も見ないでコードを作成してみました(F列、G列)。
ここまでの練習で、ForNext構文のイメージが湧きやすかったので、
ForNext構文にて記載しました。
これじゃないパターンで作るとどう作れるのかな?
と楽しみにしながら動画を拝見していきたいと思います。
他コメントで出てきているみなさんが記載したコードも、
自作したあとで拝見させて頂くと「こういう方法もあるのか!」
ととっても勉強になります。
Excelファイルでテストしたところ、
以下2つのコードが思うように動作したことを確認済みです。
↑gyoとjuushoを変数にしました。
↑gyoだけ変数にして、juushoは使いませんでした。
何回も書き直しがあったので纏められた方がいいなと感じました。
小川慶一さんのコメント
(コメントID: 4800)
ヒントらしいヒントなしでここまでできたのは、とてもすばらしいことです v(^^*
以下の投稿に対して、あとの動画をひととおり見たあとで、ご自身で添削を入れてください。
それがいちばん力つきます。
添削をここに載せていただければ、その添削に対して僕がコメントします。
> プログラム表記はこれで上手にいくかな?テスト兼ねて投稿です。
>
> 演習に入る前に自分で何も見ないでコードを作成してみました(F列、G列)。
> ここまでの練習で、ForNext構文のイメージが湧きやすかったので、
> ForNext構文にて記載しました。
>
> これじゃないパターンで作るとどう作れるのかな?
> と楽しみにしながら動画を拝見していきたいと思います。
>
> 他コメントで出てきているみなさんが記載したコードも、
> 自作したあとで拝見させて頂くと「こういう方法もあるのか!」
> ととっても勉強になります。
>
> Excelファイルでテストしたところ、
> 以下2つのコードが思うように動作したことを確認済みです。