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

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

[10850]発展1講座第1章 – データの「型」2

2018-12-26 21:31:42 tyuさんからの投稿です。

数値を文字列型変数に格納する機能はキャストですか?
Range(“A” & i).value のiと同じでしょうか。

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

[10849]発展1講座第1章 – データの「型」1

2018-12-26 21:23:54 tyuさんからの投稿です。

変数の型指定にはポカミスを防ぐメリットがあるというですね。
とても腑に落ちました。

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

[10848]基礎講座第2章11 – ドリル4

2018-12-26 17:04:48 受講生さんからの投稿です。

「:」が文字列と気付けず、KakikaeDrill07~KakikaeDrill11で苦戦しましたが、解けるようになりました。
試行錯誤して動いた瞬間、めちゃくちゃスッキリしました!!

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

[10847]モジュールレベル変数との使い分け

2018-12-26 15:28:35 わかやまさんからの投稿です。

小川様

いつもありがとうございます。
演習問題の模範解答の有無についての質問です。
ダウンロードしたデータのhatten2、SampleData、Enshuの中にあるexecise-sogo3以降の模範解答はどこかにございますでしょうか?
どうぞよろしくお願いします。

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

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

2018-12-25 23:06:06 受講生さんからの投稿です。

Worksheets(“元データ”)やWorksheet(“要注意リスト”)の元データや要注意リストの部分も変数にして当てはめることは可能ですか?シート名が変わったりしても書き変えなくてすむように、motosheet=range(“A1”).valueみたいにできますか?

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

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

2018-12-25 14:49:25 tyuさんからの投稿です。

例として、”都島”を含み性別が”女性”で点数が”70点以上”、のように複数の条件を絞り込みするときに、if文を3重の入れ子とする方法の他に、一度に一つのif文で条件判定することは可能ですか? ワークシート関数で =and() 関数のようなイメージです。

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

[10835]基礎講座第4章8 – 比較の条件設定バリエーション

2018-12-23 16:34:33 tyuさんからの投稿です。

データの数(行数)が可変である場合、for next の数値をどのようにするのがいいのでしょうか。一個もない場合も含めて。

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

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

2018-12-22 23:23:27 めめさんからの投稿です。

こんばんは(>_<)
何か スッキリしません!通常モードとメニューモードのちがいですか
また学びます。

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

[10829]基礎講座第4章3 – 「For Next構文」を覚える

2018-12-22 18:31:17 tyuさんからの投稿です。

カウント変数で慣用的に使われている文字はありますか。

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

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

2018-12-22 15:32:30 ゲストさんからの投稿です。

小川先生
こんにちわ
[2]の回答を作ったのですが、このような形でもいいのでしょうか?
Sub mondai2()
Dim siso
Dim kanpyo
Dim nomimono
Dim gyo
For gyo = 4 To 18
If Range(“C” & gyo).Value = “しそ巻き無料” Then
siso = siso + 1
ElseIf Range(“C” & gyo).Value = “飲みもの無料” Then
nomimono = nomimono + 1
ElseIf Range(“C” & gyo).Value = “かんぴょう巻き無料” Then
kanpyo = kanpyo + 1
End If
Next
Range(“F4”).Value = siso
Range(“F5”).Value = nomimono
Range(“F6”).Value = kanpyo
End Sub

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

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

2018-12-22 15:31:02 Iamさんからの投稿です。

導入編が大変わかりやすく、基礎に進みました。
オブジェクトでSheetsとすれば、エクセルシートもグラフシートも指すという内容がありましたが、それでもWorksheets, Chartsを使うことが基本となっている理由を教えてください。
素人考えで恐縮ですが、大は小を兼ねるという意味でSheetsでカバーできるならそれでいいのでは。。と思ってしまうのです。

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

[10807]楽器・スポーツ・語学と共通の学び方

2018-12-18 23:13:23 めめさんからの投稿です。

ショートカットの学びは楽器 スポーツ 語学と共通です。
緊張して頑張っていると上達するのは、間違い 嘘です!
ガンバリ過ぎない フワッとみる 身体 頭脳を緩める→体験する
→知識で終わらせない→実務で試す
楽にやっているから上手くなります。
記憶しやすくなって→継続して→定着します。(^^

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

[10806]動的配列3-演習

2018-12-18 22:40:54 こんちゃんさんからの投稿です。

最近業務で二次元配列を使用しました。悩みどころは投稿されてる方々と同じでしたので自己解決しました笑。わかりやすい二次元配列の解説ありがとうございました。勉強になりました!

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

[10805]情報を詰め込み過ぎて頭がパンクしそうになったら

2018-12-18 22:33:32 めめさんからの投稿です。

情報を詰め込み過ぎない→疲れたら10分以上開ける そうすると その短期記憶が長期記憶に移り覚えていられて 次の記憶が出来ます。
長期記憶は馴染みの記憶になるのですネッ! 感動です!
短期記憶が空きました。→チャレンジ→気分転換→長期記憶
ありがとうございます。

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

[10804]理系科目の学び方

2018-12-18 22:06:57 めめさんからの投稿です。

今の私では 理科系は得意ではないですし 何をどうするのかわからない
現実ですが、勉強が進んでいくうちに実験も一杯して試してから質問する。

視野を広げる→微細な変化に気が付く
予測して試す。学び方がわかる。各自で試す習慣
宣言するのは、出来ますが できる?出来ない?出来ます!
なんとかなると 。。。よろしくお願いいたします(。。

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

[10803]複数のマクロを連続実行する – Excel2007,2010,2013,2016の場合

2018-12-18 21:41:53 受講生さんからの投稿です。

すみません。追記です。
5:19あたりでmcを作成される時には特にカーソルについてのコメントはなかったようです。

よろしくお願いします。

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

[10802]複数のマクロを連続実行する – Excel2007,2010,2013,2016の場合

2018-12-18 21:38:55 受講生さんからの投稿です。

分かりやすい説明ですんなり理解できました。

ところで、4:15ぐらいでカーソルをG1にしなければならないとおっしゃっています。

なぜ、G1なのか、
自分で自動記録をする場合、どこにすればいいかがわかりません。
また、カーソルの位置が不適切な場合、どのような影響があるのか、
お教えください。

よろしくお願いします。

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

[10801]パレートの法則

2018-12-17 22:45:49 めめさんからの投稿です。

ありがとうございます。
2割で8割の仕事が出来る8割のシーンをカバー出来ますやみくもに
努力せずにピンポイントの努力を...という学び...つまり これが
ショートカットですか?
ファイルをダウンロードしてテキストを ゲットします。の為に
後 zipファイルを開く手順で右クリックして すべて展開が出てきません。
よろしくお願いいたします。

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

[10800]「マジカルナンバー7」と「チャンク化」

2018-12-16 23:56:39 めめさんからの投稿です。

こんばんは❣❣
人間はいちどきに7つまでしか覚えれません!それをチャンク化 塊として
覚えると(電話番号のように)沢山覚えれます。完全主義は止めることです。沢山の情報はいちどきに詰め込められないのが人間なのが 印象的でした。
ありがとうございます^^

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

[10794]学びの階層構造

2018-12-15 22:23:22 めめさんからの投稿です。

一つを学ぶ時 より深い所を学ぶ。。。パソコン 電子機器は スピリチュアルの世界でした。

7合目からの出発でいいかなって思います。
PC操作を知る→この事を次の何かに活かす
頑張ります。^^

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

[10792]どう学ぶか?イントロダクション

2018-12-14 23:45:01 めめさんからの投稿です。

明日も このイントロをみたいと思いました❣❣たいせつな事❣❣

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

[10791]導入

2018-12-14 18:16:04 めめさんからの投稿です。

スタートです。よろしくお願いいたします。

嫌でもエクセルとwindowsの操作が速くなるには

心身ともに力が抜けて仕事が楽になるワークショップ→タイピングが速くなる→ショートカットキー→具体的なツール1.エクセルマクロの基礎
2.対面授業→実務

ですね。
ありがとうございます。
横矢印ではなく縦矢印にすれば良かったです。
分かりにくくて申し訳ございません。 

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

[10785]基礎講座第1章12 – ドリル

2018-12-11 20:33:53 受講生さんからの投稿です。

はじめまして。よろしくお願いします。
VBA初心者です。(N88BASICとLOTUS1-2-3のマクロを作った経験あります(笑))


ドリルで誤って
range(“c4”).value=range(“b4”).value*zeiritsu
と書こうとして
range(“c4”)=range(“b4”)*zeiritsu

と,valueを忘れてしまいましたがちゃんと結果が出ました。

.valueを忘れてしまった場合に何か不具合がありますか?

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

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

2018-12-11 19:16:00 めめさんからの投稿です。

こんにちは。。。DPRフレームワークの5までは、なんとか学べましたが
6からはショートカットキーが出てくるレベルとなり厳しくなりました。
入門講座も色々あります。全てドンドン進むのが、よろしいですか⁇
よろしくお願いいたします。

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

[10766]基礎講座第1章11 – テストの方法

2018-12-10 21:59:31 受講生さんからの投稿です。

F8でやった処理をひとつ戻して、再度そのコードを実行という機能はないのでしょうか?
テストして修正が上手くいったか否かはもう一度最初からテストすることになりますか?

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

[10744]「イベントとフォーム」プレセミナー第7回-コンテナオブジェクト

2018-12-10 09:47:12 マメコトさんからの投稿です。

概念なので簡単に理解するのは難しいのですが、「異なる複数のコレクションを統合する(包含する)オブジェクトがコンテナオブジェクト」という考え方で良いのでしょうか。

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

[10743]「イベントとフォーム」プレセミナー第5回-定数

2018-12-10 09:42:06 マメコトさんからの投稿です。

定数の利用方法として、カウントアップする変数の初期値が決まっている場合等に、「変数を初期化する」のに使い勝手が良い気がします。
変数のネーミングについては、ハンガリアン記法に基づいて、文字列型は先頭に「c」を付けていましたが、今後は文字列型には「ch」を付けて、定数に「c」を付けるようにいたします。

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

[10742]「イベントとフォーム」プレセミナー第2回-Exit Sub

2018-12-10 09:29:16 マメコトさんからの投稿です。

Exit Subが、「そのSubプロシージャを終了させる(End Subまで飛ぶ)」ことは理解できました。
ところで、その上位プロシージャまでも一気に終了させるコマンドもあるのでしょうか。(全プロシージャを終了させるイメージです)
それとも『それを意図するロジックを組む』のでしょうか。

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

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

2018-12-03 22:58:33 めめさんからの投稿です。

こんばんは❣今回は知識のない私でも大筋は 理解出来たと思います。
エクセルは便利で自由度が高いだけに使う側の意図の正しさが求められる❣❣
Dでも使える
Pでも使える
Rでも使える
でも意図をハッキリしないとRからDに戻ってやり直したりでややこしく
なります。

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

[10720]文字列操作の一例を紹介

2018-12-01 14:17:45 田中 宏明さんからの投稿です。

マクロを実行しながら、ログ出力することに成功しました。
出力結果とコードの一部です。素晴らしいです。

2018/12/01 13:37:09, [INFO] , ————— ログファイルオープン —————
2018/12/01 13:38:04, [ERROR] , エラー番号:-2147023783/種類:Unicode 文字のマッピングがターゲットのマルチバイト コード ページにありません。
2018/12/01 13:41:19, [INFO ] , —————正常終了 —————

'*************************************************************
'クラスモジュール
'logフォルダを作成してテキストファイルにログ出力
'*************************************************************
Option Explicit
'-------------------------------------------------------------
'モジュールレベル変数定義
'-------------------------------------------------------------
Private txt As TextStream

'-------------------------------------------------------------
' 名 称 : Class_Initialize
' 機 能 : コンストラクタ
' 引 数 : なし
' 戻 値 : なし
'-------------------------------------------------------------
Private Sub Class_Initialize()

    'インスタンス生成時に追記モードでログファイルオープン
    Dim logPath As String
    logPath = ThisWorkbook.path & "\log"
    
    'ログフォルダが無ければ作成
    Dim objFSO As FileSystemObject
    Set objFSO = New FileSystemObject
    If objFSO.folderexists(folderspec:=logPath) = False Then
        objFSO.createfolder logPath
    End If

    Dim filePath   As String
    filePath = logPath & "\" & "VBA_" & Format(Date, "yyyymmdd") & ".log"

    'TextStreamの追記モードでオープン
    Set txt = objFSO.OpenTextFile(Filename:=filePath, IOMode:=ForAppending, Create:=True, _
        Format:=TristateUseDefault)
    
    Set objFSO = Nothing

End Sub

'-------------------------------------------------------------
' 名 称 : Class_Terminate
' 機 能 : デストラクタ
' 引 数 : なし
' 戻 値 : なし
'-------------------------------------------------------------
Private Sub Class_Terminate()
    'インスタンス解放時ログファイルクローズ
    txt.Close
    Set txt = Nothing
End Sub

'-------------------------------------------------------------
' 名 称 : writeLog
' 機 能 : ログ出力
' 引 数 : level     :ログレベル("INFO " or "ERROR")
'          message   :メッセージ
' 戻 値 : なし
'-------------------------------------------------------------
Public Sub writeLog(ByVal level As String, _
                    ByVal message As String)
    'ログ作成
    Dim buf As String
    buf = Format(Now, "yyyy/mm/dd hh:nn:ss") '時間
    buf = buf & ", [" & level & "] "         'ログレベル
    buf = buf & ", " & message               'メッセージ
    '出力
    txt.WriteLine buf
End Sub 

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


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

 

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

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

トップへ