オンライン講座 質問と回答

無料・有料のオンライン講座で寄せられたメッセージの一部を紹介致します。

[13110] 配列操作の便利関数、オプション、その他

2021-09-15 20:38:52 受講生さんからの投稿です。

見れました。ありがとうございます。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13107] 配列操作の便利関数、オプション、その他

2021-09-12 00:41:59 受講生さんからの投稿です。

エクセルマクロ上級3点セットを購入しました。

他の方の質問にあった
エクセルマクロ・VBA発展編2演習と回答は、
私も見れる講座でしょうか?

URLをクリックすると、
新しいどうか購入か購入済みの動画をみるというバナーが表示され、
購入済みの動画をクリックするとマイページになって見れません。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13104]ワーク「shift_shita」解説

2021-09-06 05:47:39 ケイジさんからの投稿です。

ファイルをダウンロードすると、ワーク「shift_shita」のファイルがメモ帳として保存されます。
ワークするときは、メモ帳をEmEditorにコピペしてから実施しており手間がかかります。
テキストエディタでダウンロードする方法を教えてください。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13100]補講9-たった1行のコードでセルのデータを配列に投入する

2021-08-29 16:36:00 受講生さんからの投稿です。

お世話になっております。
「エクセルマクロ上級3点セット」を購入しましたが、
他の方と同じく「エクセルマクロ・発展編2演習と回答」の案内メールが来ておりません。
URLをクリックしてもホーム画面が表示されます。
お手数お掛けしますが、ご確認宜しくお願いいたします。

[ 続きを読む ]  返信件数:3件  [ 動画を見る] 

[13098]ワーク「shift f10」フィードバック2

2021-08-25 06:32:21 ケイジさんからの投稿です。

「h表を埋める」内のエクセルファイルを開くと、ツールバーに保護ビューが表示され、「編集を有効にする(E)」をクリックするまで表示され続けます。
「shift」や「CTL」「ALT」キーを押しながら、「E」を押しても表示は消えません。
ショートカットキーを使ってこの表示を消す方法はありますか。
ご教示ください。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13094]エクセルとウェブブラウザーでのワーク

2021-08-18 20:26:49 ケイジさんからの投稿です。

「登録しました」→「戻る」を押下すると、毎回、「中国語(繁体字)のページを翻訳しますか」と表示が出て、「翻訳する」「今は実行しない」の選択が求められます。表記しない方法はありますか。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13082]発展編1 フォローメールセミナー 第1回

2021-08-01 19:46:38 凜さんからの投稿です。

いつもお世話になっております。
動画での講義ではなく、文章のみ・・どうなのだろうと思いましたが、とても面白いです!
動画で得た知識を能力に変えていく事ができるような感覚です。
次が楽しみです!

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13077]出現回数を数える。CountIf関数がやっていることをマクロで書くと?

2021-07-29 19:08:02 受講生さんからの投稿です。

いつもお世話になります。

こちらの回のみ、この動画は、再生できませんとなり
再生が出来ません。

ご確認いただけますでしょうか?
宜しくお願い致します。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13070]エクセルマクロ・VBA発展編1フォローアップミニセミナーNo.03

2021-07-22 23:48:20 凜さんからの投稿です。

お世話になっております。
今回の講義の中で 出てくるSet についての記憶がなく見直したいのですが、どの講義でご教示頂いたものか教えて頂けますでしょうか。
きちんとメモを取り切れていなかったようで、お手数をお掛けして申し訳ありません。
よろしくお願いします。

[ 続きを読む ]  返信件数:3件  [ 動画を見る] 

[13066]補講8-ウォッチ式で配列の状態を確認する

2021-07-13 21:03:16 田中 宏明さんからの投稿です。

今日は実務でエラー調査と対処をスムーズに出来ました。動画で学習したことを無意識に思い出すことができたのだと思います。
 ①ウォッチ式で配列の状態確認
 ②デバックプリント 式
 ③Typename(変数)

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13058]総合問題4-1 連想配列に行番号のリストを格納する

2021-07-10 17:04:13 田中 宏明さんからの投稿です。

以下の手法で実装できました。記念に投稿します。
 ①連想配列にCollectionを格納
 ②Collectionに1次元配列を格納

Sub mondai5_Col_Array()
    '初期化
    Dim cMx As Long
    cMx = Range("O" & Rows.Count).End(xlUp).Row
    If cMx > 1 Then
        Range("J2:O" & cMx).ClearContents
    End If
    
    'データ取得
    Dim cFm As Long
    Dim dic As New Scripting.Dictionary
    Dim st As String
    For cFm = 2 To Range("A" & Rows.Count).End(xlUp).Row
        st = Range("C" & cFm).Value
        If Not dic.Exists(st) Then
            '①DictionaryのItemにCollectionを格納
            dic.Add st, New Collection
        End If
        '②CollectionのItemに一次元配列を格納
        dic.Item(st).Add _
        Array(Range("F" & cFm).Value, Range("D" & cFm).Value, Range("E" & cFm).Value, Range("G" & cFm).Value)
    Next
    
    '結果出力
    Dim ar As Variant 'Collectionからの取出し(一次元配列)
    Dim cTo As Long
    Dim sp() As String
    cTo = 2
    For cFm = 0 To dic.Count - 1
        st = dic.Keys(cFm)
        Range("J" & cTo).Value = st & "のマンションは" & dic.Item(st).Count & "件ヒットしました!"
        cTo = cTo + 1
        For Each ar In dic.Item(st)
            Range("K" & cTo).Value = ar(0)
            Range("L" & cTo).Value = ar(1)
            Range("M" & cTo).Value = ar(2)
            sp = Split(ar(3), "/")
            Range("N" & cTo).Value = sp(0)
            Range("O" & cTo).Value = sp(1)
            cTo = cTo + 1
        Next
        cTo = cTo + 1
    Next
End Sub

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13052]発展1講座第2章 – End プロパティの使い方

2021-07-08 16:38:12 凜さんからの投稿です。

いつもお世話になっております。
今後、作成しなくてはならないファイルの中でとても役に立ちそうな内容でした。ありがとうございます。

1つ質問をさせてください。
なぜxlDownではなく、xlUpなのでしょうか。
「Ctrl+↑」「Ctrl+↓」と同じ動きと考えると同じデータを示すかと思います。

ご指導のほどよろしくお願いいたします。

[ 続きを読む ]  返信件数:3件  [ 動画を見る] 

[13046]基礎講座第2章7 – 日付の扱い

2021-07-07 21:19:00 受講生さんからの投稿です。

講座で学んだことをキーワード検索ができますでしょうか。
以下の”Dim”の書き方は何となくはわかるのですが、ちゃんと学習したいので、
どの講座で学習できるのか教えていただきたいです。
すみませんが、よろしくお願いします。

Sub HidukeHensu()
    Dim dt
    Range("A4").Value = #8/23/2011#
    dt = Range("A4").Value
    Range("A5").Value = dt
End Sub

[ 続きを読む ]  返信件数:5件  [ 動画を見る] 

[13044]クラスとインスタンス、外部ライブラリの参照

2021-07-05 01:02:35 受講生さんからの投稿です。

これまでは繰り返し処理などは標準モジュール内にサブルーチン(と言うのかわかりませんが)を作成して呼び出していましたが、クラスモジュールを使用すべきでしょうか。
クラスを使用した方が読みやすいコードになる様に感じましたが、その他に明確なメリットがあれば教えて頂きたいです。

[ 続きを読む ]  返信件数:3件  [ 動画を見る] 

[13038]条件に一致するデータだけのリストを、条件に一致しないデータを削除する方法で作成する。

2021-06-19 22:54:41 凜さんからの投稿です。

いつもお世話になっております。
教えて頂いた事を復習しつつ、下記のようなマクロを書いてみました。
いちお動作結果は問題ないようでしたが、気付かない不具合があるのかと不安になりました。ご教示頂けますでしょうか。
よろしくお願いします。

Sub hanako()

Dim gyo
For gyo = 10 To 35
    If Range("D" & gyo).Value = "ぬいぐるみ" Then
    
    Else
        If Range("C" & gyo).Value = "" Then
         Exit For
        Else
         Rows(gyo & ":" & gyo).Select
         Selection.Delete shift:=xlUp
         gyo = gyo - 1
        End If
    End If
    
Next

End Sub

[ 続きを読む ]  返信件数:3件  [ 動画を見る] 

[13031]エクセルマクロ・VBAを利用するための推奨設定 – Excel2003の場合

2021-05-29 11:16:11 受講生さんからの投稿です。

設定はどこにどの設定があるかを探すのに時間を要しました。2016を使用しています。mmapに記載がなかったので2010と同じかな?と考えたどり着くことができ設定できました。ご記載されていらっしゃる通りそろそろ資料等の更新も必要かな?と感じました。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13030]エクセルマクロ・VBAを利用するための推奨設定 – イントロダクション

2021-05-29 10:50:56 受講生さんからの投稿です。

設定に関してはこれまで無頓着でした。
これを機に見直そうと思います。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13029]エクセルマクロの全体像

2021-05-29 10:46:00 受講生さんからの投稿です。

なんとなくですが、これまで難しく考えてたのかな?と思える全体像の説明でした。1からやり直したいと思います。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13024]基礎講座第1章2 – オブジェクトの指定

2021-05-23 16:13:52 ゲストさんからの投稿です。

Worksheetsは標準のセルのみ、chartsはグラフのみ、sheetsはどちらも扱えるとのことでしたが、それなら全部sheetsでいいのかな?と思ってしまったんですがsheets だと不都合なことってどんな時があるのでしょうか?

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[13009]文字列を加工してデータ転記する(その2)

2021-05-13 05:49:38 たかちゃんさんからの投稿です。

3か月ぶりに戻ってきました。
ここに戻ってくると、そもそもVBAを勉強し始めたのは、何の目的だったのか等、原点に戻れる気がします。「アバウト過ぎて、びっくりする人がいる」けど、マクロ書く時はこんなものです。という言葉に、ハッとしました。(^^)
こうして、また戻って復習できるのは本当に良いですね。

[ 続きを読む ]  返信件数:4件  [ 動画を見る] 

[12995]表を解析して1行のリストを作る、1行のリストを解析して表にする(その2)

2021-05-06 22:20:11 受講生さんからの投稿です。

1.勤怠の元データをシステムに入力し、
  システムからエクエルにデータを落とします。
2.この元データと入力済データを比較し異なっていたら
  データを赤くする。

この2の段階をVBAで作りたいと思っています。
問題なのはこの中のtaikin1 とtaikin2 を比較する部分です。

単純に半日勤務課か一日勤務かなら問題はないのですが、
出勤時間が午前中で退勤時間が午後になる場合、
システムの仕様で退勤時間が12:00 になり
備考欄に文字列で退勤時間を入力するようになっています。

この午前・午後にわたる半日勤務のとき、
データが赤くなるときとならないと気が合って困っています。

この部分に★で印をつけてありますので
原因の説明と対処方法を教えてください。

[ 続きを読む ]  返信件数:3件  [ 動画を見る] 

[12993]エクセルマクロの全体像

2021-05-05 20:30:31 ゲストさんからの投稿です。

「こびとちゃん」の例えがよかったです。モチベーションが上がる動画でした。頑張って習得したいです。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[12988][Alt] キーの使い方についてお話します。

2021-04-24 16:14:12 受講生さんからの投稿です。

遅ればせながら、タブの移動やファイル選択がうまくいかなかった理由が分かりました。2つのモードがあったのですね。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[12976]発展編1 フォローメールセミナー 第29回

2021-04-15 22:53:47 受講生さんからの投稿です。

お世話になっております。

先日、職場で出社/在宅勤務の予定表(縦が社員一覧、横が日にちの表)を作る機会があり、カレンダー作成マクロを活用することができました。

「とりあえず4月分を作って!」との依頼でしたが、5月以降も必要になるので、来年3月分まで作ってしまいました。

手作業だと1ヶ月分を作るのも大変ですが、マクロなら1年分、土日祝日に色付けをしてもあっという間ですね。

こういう便利なものが作れるようになり、人の役にも立てて本当に良かったです。ありがとうございます。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[12974]条件に一致するデータを別シートに転記する

2021-04-15 13:47:15 受講生さんからの投稿です。

小川慶一 様
この度はご返信ありがとうございます。
早速ですが、エクセルマクロ・VBA基礎編フォローアップ ベーシックの問題に取り掛かりました。
しかし、何度解いてもよくわからない点があります。

★【動画6】 条件に一致するデータを別シートに転記する で例えますと、
Sub ichi()

Dim i As Long
Dim k As Long
k = 9
For i = 4 To 13
If Worksheets(“元データ”).Cells(i, 9) > 100 Then
Worksheets(“要注意リスト”).Cells(k, 3) = Worksheets(“元データ”).Cells(i, 1) ‘ID
Worksheets(“要注意リスト”).Cells(k, 4) = Worksheets(“元データ”).Cells(i, 2) ‘名前
Worksheets(“要注意リスト”).Cells(k, 5) = Worksheets(“元データ”).Cells(i, 9) ‘合計
k = k + 1
End If
Next

End Sub
このような状態です。
解けてはいますし、回答を見ても正しいようなのですが、
k = k + 1の位置にいつも戸惑ってしまうのです。

Dim i As Long
Dim k As Long
k = 9
For i = 4 To 13
If Worksheets(“元データ”).Cells(i, 9) > 100 Then
Worksheets(“要注意リスト”).Cells(k, 3) = Worksheets(“元データ”).Cells(i, 1) ‘ID
Worksheets(“要注意リスト”).Cells(k, 4) = Worksheets(“元データ”).Cells(i, 2) ‘名前
Worksheets(“要注意リスト”).Cells(k, 5) = Worksheets(“元データ”).Cells(i, 9) ‘合計
①k = k + 1
End If
     ②k = k + 1
Next

End Sub

①の状態が正しいというのはif endの中に入れておくというルールのような形で覚えてしまっている状態です。
最初に書いた時点では②の位置に書いてしまうのです。
そしてエラーが出て①の位置に戻しています。
ハナコステップで書いているのですが…何度書いても分かりません。

原因と致しましては、以下のように考えているからだと思うのですが、
そもそも文の読み方が正しくないのでしょうか…
ご教示頂けますと幸いです。

Dim i As Long ‘iを宣言します
Dim k As Long ‘kを宣言します
k = 9 ‘kは9です。
For i = 4 To 13 ‘iは4です(1周目時点)
If Worksheets(“元データ”).Cells(i, 9) > 100 Then ‘もしも元データのi4(1周目時点)が100を超えていたら
Worksheets(“要注意リスト”).Cells(k, 3) = Worksheets(“元データ”).Cells(i, 1) ‘IDをコピー
Worksheets(“要注意リスト”).Cells(k, 4) = Worksheets(“元データ”).Cells(i, 2) ‘名前コピー
Worksheets(“要注意リスト”).Cells(k, 5) = Worksheets(“元データ”).Cells(i, 9) ‘合計コピー
End If ‘K9の値に入れるi4が調べ終わりました
     ②k = k + 1 ‘では次(i=5)に進む前にコピー先のセルも動かします
Next ‘(i=5)に進みます(forに戻ります)

End Sub

[ 続きを読む ]  返信件数:3件  [ 動画を見る] 

[12968]基礎講座第4章10 – If文のその他の構文その2

2021-04-14 11:53:11 受講生さんからの投稿です。

基礎編の教材と問題をダウンロードし、seminar date kisoの、kiso(drill含む)までは学習が完了しました。
しかし、DounyuやEnshuなど、他のフォルダの動画が見つかりません。元々ないのでしょうか?
Enshu以外のエクセルはそもそもなんなのか、いつ使うものなのかも分かりません。
次はどのフォルダの勉強をするのがよいのかご教示頂けませんでしょうか。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[12967]簡単なマクロを書いてみる – 基本編

2021-04-14 10:18:46 受講生さんからの投稿です。

操作のコツも合わせて教えいただき、ありがとうございました。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[12966]【追加特典】「R」から「D」を作る様子-ショートカットキーを使った場合

2021-04-13 14:22:25 受講生さんからの投稿です。

ショートカットキーの活用で作業がサクサク行けるのがよくわかりました。
ショートカットキーをもっと覚えておきたいです。
ありがとうございました。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[12965]エクセル仕事を劇的に簡単にするDPRフレームワークその5

2021-04-13 13:57:42 受講生さんからの投稿です。

DPR順番を意識しての仕事やり易さがよく理解できました。
Rをする前にDからスタートすることを実行していきたいです。
ありがとうございました。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 

[12964]エクセル仕事を劇的に簡単にするDPRフレームワークその1

2021-04-13 13:09:31 受講生さんからの投稿です。

四角に、データが詰まった状態。
一言で覚えられる、素晴らしい教え方。
ありがとうございました。

[ 続きを読む ]  返信件数:1件  [ 動画を見る] 


各講座ごとのメッセージを見る場合はこちら

 

まずはここから!スマホでも学べる無料動画講座

今なら先着30名限定で無料!定価4,800円の、初心者のためのエクセルマクロ動画講座。
  1. Excel 97~Excel 2016まですべて対応。動画本数20本、総再生時間2時間44分53秒
  2. PC, Mac, iPhone, iPad, Androidのお好みの環境で、いつでも好きなときに学べます。
2004年から10年間述べ3,000名以上に実施した研修の経験と実績を集約した講座です。
いますぐ無料で試してください。

トップへ