ITmedia総合 >  質問!ITmedia  >  V

「VBA」最新質問一覧

Visual Basic for Applications

関連キーワード

Visual Basic
VBA Hex関数
Hex関数を使用して、16進から10進の処理をしようとしてますが下記※のところで「型が一致しません」と出てしまいます。色々変数の型を変えても、2つの※のどちらかで出てしまいます。Dim r As LongDim H2D As LongDim CheckSum_Cal As LongFor r = 1 To 10 H2D = Hex(Cel...(2017/05/22)

Excel(エクセル)
excel vba 選択されたセルの範囲を別のセル
excel vba 選択されたセルの範囲を別のセルに書き込みたい。お世話になっております。乱筆乱文お許し下さい。EXCEL VBAについてですが、或るブックを閉じる時(Private Sub Workbook_BeforeClose(Cancel As Boolean))にその時点でACTIVEなsheetの名前を指定シートの指定セ...(2017/05/21)

Visual Basic
エクセルVBAでIE操作
初心者です。例、エクセルからIEを呼び出してヤフーの全国お天気情報をsheets("sheet1").Range("A3")から順次張り付けていく構文をどなたかご教示お願いします(2017/05/20)

Excel(エクセル)
エクセルvbaで同姓同名の抽出方法について
エクセルVBAで質問があります。ワークシート1(上段、example1)のB2のセルにひらがな(苗字)を入力したとき、ワークシート2(下段、example2)で作成して該当した情報をワークシート1のC2からe7へ反映させたいと考えています。ワークシート2に、1000人越えの情報があ...(2017/05/20)

Visual Basic
excelを使用したVBAの問題に関する質問です。
excelを使用したVBAの問題に関する質問です。 下記のサイトの問題19の解答の中で、 http://excel-ubara.com/excel-answer/EXCELVBA619A.html'縦合計の客単価If i = 4 Then Cells(20, j) = Cells(18, j) / Cells(19, j)End Ifなぜ、週を表している「i」が「4」(if=だったら)...(2017/05/19)

Excel(エクセル)
ExcelVBA .cells(… が働きません
お世話になりますメモリーの、壁と格闘して、います其の、中でOfficeTANAKA様のhttp://officetanaka.net/excel/vba/tips/tips71.htmの、ページを拝見しPrivate Declare Sub GlobalMemoryStatus Lib "kernel32" (lpBuffer As MEMORYSTATUS)と、モジュールに、書き...(2017/05/17)

Excel(エクセル)
Vba UserForm SetFocus
ExcelのVbaでUserForm上に英単語のタイピング練習のソフトを作ろうとしていますが、うまくいきません。コントロールのイベントについての理解が不足しているのが分かりました。ユーザフォーム上の複数のテキストボックス間のフォーカスの移動について教えて下さい。UserFor...(2017/05/13)

Excel(エクセル)
VBA   Evaluateはアクティブセル向け?
度々、お世話になります Evaluateなのですが対象シートを、最前面に出して、おかないと駄目とは、聞いた事が、ないの、ですが出して、おかないとダメなのですか?下記コードは以前、頂いたものに加筆した、ものですが動かして、みるとなんか、変です一定条件下で☆印の、所...(2017/05/12)

Excel(エクセル)
ExcelVBA SET Worksheets(
お世話になります済みませんお馬鹿質問だとは、思うのですがお許し下さい下記の、箇所で実行時エラー '438':オブジェクトは、このプロパティまたはメソッドをサポートしていませんに。なります何故で、しょうか?宜しく、お願いします。               記S...(2017/05/10)

Visual Basic
vba エクセルに記載のURLを順次見に行き画像を
エクセルのB列に複数のURLが入っています。1 http://~~~2 http://~~~ 等々ユーザフォームのボタンを押すと、このURLを順次見に行き、別シートにシート番号1   上の1のURL内にある画像を張っていく(並べていく)シート番号2   上の2のURL内にある画像を...(2017/05/09)

Visual Basic
VBA フォームに入力したものを検索しエクセルへ
わたしはVBA初歩で現在勉強しているものです。VBAでユーザフォームに検索窓を設置しました。下記のことをできるようにしたいです。(1)フォームの検索窓に文字を入力(2)フォームのボタンを押す(3)googleで(1)の文字を検索(サイトはshowしなくてよい)(4)検索結果のすべてを...(2017/05/09)

Excel(エクセル)
EXCELVBA Variantとobject
毎度お世話に、なります。3つ、程お伺いしたいの、です先ず、1つ目Variant型に、Set で代入、したら駄目みたい、ですけど昔からでしたで、しょうか?後、2つ目objectは複数値を、持つポインタに、よる実態参照の、変数と、思っていたの、ですがVariantも此の、意味ではobje...(2017/05/09)

Excel(エクセル)
VBA  Evaluateの速度への影響度に付いて
お世話になります。先に、謝罪します前置きが、いい訳じみて尚、長いです済みませんhttps://okwave.jp/qa/q9325848.htmlにて Evaluateが、遅いと、教わりました一方でOfficeTANAKA氏がhttp://officetanaka.net/excel/vba/cell/cell10.htmにて>VBAをマスターしよう...(2017/05/07)

Excel(エクセル)
ExcelVBA 非連続域の扱い(01)
お世話になります。添付映像の、ような非連続域の、扱いに困って、います下記に、記載のコードに、おいて2回目、以降にFunction 最小値域(…に、制御が、回た際の>フィールド.Rows.Countが、1に、成り困って、います。と、言うか抑も、非連続域の、扱い方が全く解って...(2017/05/06)

Excel(エクセル)
excelを使用したVBAの問題に関する質問です。
excelを使用したVBAの問題に関する質問です。 下記のサイトの問題13の解答の中で、 http://excel-ubara.com/excel-answer/EXCELVBA613A.html1,If InStr(Cells(i, 1), "(") > 0 Thenとありますが、"(") はどんな意味を表していて、なんなのでしょう...(2017/05/05)

Visual Basic
Excel VBA tabキーでtextを移動
Excelシート上のテキストボックスやコンボボックスに入力後、TABキーで次のボックスに移動することを考えています。keycode=9でTABキーを検出しtextbox1.activate としてもtextbox1にカーソルが立ちません。TABキーで移動して即入力できるようなプログラムはできないで...(2017/05/04)

Visual Basic
vba ボタン押すとユーザフォーム、リストをクリア
vba で、実行すると、ユーザフォームとリストBOXに結果を反映するものをつくりましたが、この反映された結果を、ボタンを押すとクリアにしたいのです。ユーザフォーム、リストボックスの内容をクリアするには、どのような記述にすればよろしいでしょうか?(2017/05/02)

Visual Basic
VBA 変数の受け渡し
エクセルVBAで標準モジュール内でインプットボックスに入力した変数をユーザーフォームに受け渡してユーザーフォーム内のリストボックスに表示させる場合どのように変数の受け渡しを行えばよいか教えてください。現在は、一度ワークシートの任意のセルに値を書き出し、その...(2017/04/28)

Excel(エクセル)
VBAで抽出した画像の数枚をフォームに表示
VBAで指定したURLにある画像を抽出し、その画像をExcelシートに貼るものを作りましたが、そのうち3枚くらいをユーザフォーム上にも表示したいのですが、どのように記述したらよいでしょうか?教えていただけたら幸いです。(2017/04/28)

Visual Basic
(vba) 画像抽出時、ファイル名を表示したい
vbaで指定するURLにある画像を抽出するものをつくりました。一部------------------------------------ For Each e In oIE.Document.getElementsByTagName("img") If LCase(e.nameProp) Like "*.jpg" Or LCase(e.nameProp) Like "*.jpe...(2017/04/28)

Excel(エクセル)
[VBA] マクロファイルの管理について
こちらの識者の方々にはいつもお世話になっております。VBAの質問で、環境は下記になります。OS=windows7 pro 64bitOffice=Excel2010(14.0.7128.5000)業務でたくさんのマクロを作成(仮にA-Zとします)し、複数人が使用しているのですが、作成しすぎて管理が大変になってき...(2017/04/28)

オフィス系ソフト
エクセルVBAでテキストボックスの金額表示について
テキストボックスに金額を入力する際、1,000のように表示したいと思っています。ただ、テキストボックスが20個あるので、一括設定する方法はありませんか。(2017/04/27)

Visual Basic
VBAでExcelシートもユーザーフォームも閉じる
タイトルのとおりなのですが、ボタンを押すと、Excelシートもユーザーフォームも閉じてExcel自体を・終了するボタンを作成したいのですが、どのような、記述をしたらよいでしょうか?教えてください。(2017/04/26)

Visual Basic
(VBA) 実行すると指定URLにある画像を保存
タイトルの通りなのですが、vba で、実行すると、指定のURLにある「jpg」,「jpeg」画像を抽出し、指定フォルダに保存するものを作りたいのですが、どのようなコード記述にすればよいでしょうか?教えていただけると幸いです。(2017/04/26)

Excel(エクセル)
VBAのresponseTextのエラー
標題の件で、エクセルのマクロでMSXML2を用いて"モーニングスター [ PTS値上がり率株式ランキング]"というサイトの1ページ目のテーブル内のコード、銘柄名、基準比の値を取得したいのですが"write .responseText"で"システムエラー 1072896658 VB...(2017/04/26)

Visual Basic
vbaのコードを他の人が書き換えないようにしたい
ExcelのVBAで、ツールを作成しています。作成したツールを何人かに配布する予定ですが、他のものがコードをみたり、改ざんできないようにしたいのですが、どういった設定をすればよいのでしょうか?また、そういったコードがあれば教えていただけると幸いです。よろしくお...(2017/04/25)

その他MS Office
既存のVBAに機能を追加させたい
先日、このサイトでアドバイスをいただきましたが「ありがとうございます」、更に能力をアップできればと思っています。アドバイスをお願いします。[やりたいこと]既存のVBA記述に機能を追加したい。「このサイトでアドバイスをいただいたVBAに機能追加」現在、テ...(2017/04/25)

Visual Basic
VBA Oracle接続について
現在、Access2013+oo4oでOracle11gのDBに接続しています。今回、DBをOracle12cに変更しようとしています。Oracle12cよりoo4oがサポートされなくなり、使用することが出来ないとの事でODP.NETでの接続に変更しようとしていますが可能なのでしょうか?ちなみに以下を行ったと...(2017/04/24)

Excel(エクセル)
ExcelVBA Rangeの扱い
お世話になります。お恥ずかしながらRangeに、付いて教えてください。Const 検索範囲 As String = "A2:E9"Range(検索範囲).Cells(Cells(1, 5), Cells(Range(検索範囲).Rows.Count, 5))とか、Range(検索範囲).Range(Cells(1, 5), Cells(Range(検索範囲).Rows...(2017/04/24)

Visual Basic
VBA ユーザーフォーム
エクセルVBAのユーザーフォームのInitializeでnに値を代入しPrivate Sub UserForm_Initialize()Dim n As Longn = 19・・・・・End Sub同じユーザーフォームのボタンコマンドが押されたらPrivate Sub CommandButton2_Click()MsgBox n Worksheets("AAA").Cells...(2017/04/18)

Visual Basic
Excel VBAにおける複数条件での検索方法
以下のように、ExcelシートがあってこのExcelシートで以下の条件で検索、その結果を返すVBAを作りたいのですが、悩んでいます。  検索条件 果物:りんご       産地:青森        複数ある時は、購入日が一番古いものを選ぶ。       更に複数あ...(2017/04/18)

Excel(エクセル)
VBAで実行押すまでExcel非表示にしたい
VBAでユーザフォームを作成しました。Excelを立ち上げるとExcelシートの前にユーザフォームが出る状態なのですが、ユーザフォームの実行ボタンを押すまでは非表示にしたいのですが、どのような記述をしたらよいでしょうか?マクロ的に実行ボタンを押すと結果が、Excel上に...(2017/04/17)

Visual Basic
エクセルVBA
ユーザーフォームのテキストボックスに現在時間を表示し、表示を時計のように現在時刻を表示し続ける方法を教えてください。以下は現在のコマンドです。Private Sub txtTime_Change()End SubPrivate Sub UserForm_Initialize() UserForm1.txtTime.Value = TimeEnd Subよ...(2017/04/14)

Excel(エクセル)
EXCEL VBA伝票行NOを自動挿入したい
お世話になります。下記のようにA列に伝票NOが記述されているExcelデータがあります。[行NO]というボタンを作成してボタンをクリックすすると、その横B列に伝票NOに応じた行NOを自動で付与するVBAロジックを作りたいと思っています。毎回手で入れているため時間がかかって...(2017/04/11)

Excel(エクセル)
エクセルVBAのショートカットについて
自分でショートカットキーに割り当てたマクロを、ショートカットキーのほうから調べる方法はありますか? 例えばCtrl+Qに割り当てたのがなんていうマクロだったか知りたいということです。 手直ししたくても同じようなマクロがたくさんあってわからなくなってしまいました...(2017/04/10)

Visual Basic
エクセルvbaマクロのショートカットについて
自分でショートカットキーに割り当てたマクロを、ショートカットキーのほうから調べる方法はありますか?例えばCtrl+Qに割り当てたのがなんていうマクロだったか知りたいということです。手直ししたくても同じようなマクロがたくさんあってわからなくなってしまいました。...(2017/04/10)

Excel(エクセル)
VBA withブロックで自分自身を指定する
エクセルVBAのwithブロックの中で、自分自身のオブジェクトを指定する方法はあるでしょうか?具体的には、Dim sh As WorksheetSet sh = Worksheets(1)With sh Call XXX(sh)End Withのcall XXX(sh)の「sh」の部分で、withブロックの中に自分自身のオブジェクトを再度表記す...(2017/04/08)

Excel(エクセル)
【VBA】真の場合、何もしない処理をしたい
VBAで困っています。(1)A=BかつC=D(2)A≠BかつC=D(3)A=BかつC≠D(4)A≠BかつC≠D以上4つの条件がある時、(1)以外では処理をしたいです。For n = 1 To 10If (1)  何もしない処理end if(2)、(3)、(4)にしたい処理Next条件(1)では、何もせずに、Nextまで飛んで、次のnで処理...(2017/04/06)

Excel(エクセル)
VBA dictionary getkeys返り値
エクセルVBAの話です。dictionaryオブジェクトのgetkeysメソッドを、keyが1つも登録されていないときに使ったときに、返り値をウォッチウィンドウで見ると、型「Variant/Variant(0 to -1)」 その中身の値「<変数なし>」と表示されています。この返り値の挙動が、プ...(2017/04/05)

Excel(エクセル)
ExcelVBA テキストボックスのControl
いつもお世話になります。Excelのユーザーフォームのテキストボックスの機能についてご質問させて頂きます。TextBox40のControlSourceに「設定項目!B9」と設定しました。その際、B9には「10:00」と入力しておりまして、テキストボックスにはシリアル値が表示されてしまい...(2017/03/31)

Visual Basic
ExcelVBAにて経路図作成
 ある作業にて経路図を作成する事になり検索等行っているが、最短経路検索や地図連携、オートシェイプ結合の物が多く見つかってしまいます。検索下手かもしれ無いですが、質問させて下さい。 行いたい事は、お互いのセルを線で繋ぎ経路を作って行きたいと考えており、自...(2017/03/30)

その他MS Office
VBAに「maqBox」を追加したい
検索結果フォーム「未来」を開くフォーム「マスター」に配した、コマンドボタンのイベントに下記の記述「OKWaveで過去にアドバイス頂いた」をしています。この記述に「("指定したレコードはありません")」を表示させたいと思います。WEBを参照したりしてやっ...(2017/03/25)

Excel(エクセル)
ExcelVBA MSクエリのパラメーターの操作
いつもお世話になっています。Excel2013のMSクエリを使用して、VBAの開発をしています。その中で、パラメータの数が可変になるクエリがあります。このパラメータの数を可変にするVBAコードを調べてもなかなか発見できないので質問いたします。あくまで、使用するのはMSクエ...(2017/03/25)

Excel(エクセル)
VBAでJavaのように関数の引数に関数を渡す方法
やりたいことは、テキストファイルを読み込んで「一行ずつ何か処理」をさせたいです。この、「一行ずつ何か処理」の部分を引数に渡し、関数の中身で「ファイルを1行ずつ読み込む」部分を実装する方法はないでしょうか。<イメージ>Function ReadFile(path As String, ...(2017/03/22)

Visual Basic
VBA 引数の簡単な命名規則ありますか?
Excel VBAで 簡単なプロシージャを作る時に引数名で詰まります。関数化するなら引数は別に名前を付けたい。でも単純すぎてわざわざ別名が思いつかない…できれば呼びだし元の変数名をそのまま使いたいhoge(text,loop)sub hoge( _text, _loop )とかできればいいんですが先頭...(2017/03/13)

Excel(エクセル)
Excel VBAでの 停止→手作業→再開始
ExcelのVBAを使ってピボットテーブルなどを作成しているのですが、途中でVBAを停止させ、図表の修正や、ピボットテーブルのデータを基に作業をしたいと思っています。色々と検索したり、書物をあさったりしているのですが、MsgBoxや時間を決めてLoopさせる等は記載されてい...(2017/03/13)

Excel(エクセル)
Excel VBAシートの同一番地のセルのリスト化
別々のシートの同一番地のセルの値をリスト化するのにこのようなVBAを見つけました。シートは追加せず、既存のシートを指定したくて、色々と書き換えをチャレンジしましたがうまくいきません。既存のシートを指定し、この作業を行うにはどうしたらよいのでしょうか?ご教示...(2017/03/13)

Excel(エクセル)
EXCEL VBA構文について
EXCEL初心者です、退職された人が作成した関数を利用しているのですが、関数をデリートを押し消してしまう人がいて困っています。これは記号で入力したシフト表から1日?月末の日当たりの仕事別担当は誰かを検索して表を作成しているものです。この関数をVBAで作成したいの...(2017/03/10)

Excel(エクセル)
エクセルVBAで全てのマクロを実行するには?
エクセルVBAの初心者です。エクセルの他のワークブックからマクロのあるワークブックを開き、値を入れる式は成功したのですが、マクロにはパスワード保護がかかっており、マクロの実行式を入れることができません。DoCmd.RunMacro でマクロ名は必須のようです。マクロボタ...(2017/03/10)



Twitter&TweetDeckライクなSNS。オープンソースで誰でもインスタンス(サーバ)を立てられる分散型プラットフォームを採用している。日本国内でも4月になって大きくユーザー数を増やしており、黎明期ならではの熱さが感じられる展開を見せている。+ こういったモノが大好きなITmedia NEWS編集部を中心に、当社でもインスタンス/アカウントを立ち上げました! →お知らせ記事

意欲的なメディアミックスプロジェクトとしてスタートしたものの、先行したスマホゲームはあえなくクローズ。しかしその後に放映されたTVアニメが大ヒットとなり、多くのフレンズ(ファン)が生まれた。動物園の賑わい、サーバルキャットの写真集完売、主題歌ユニットのミュージックステーション出演など、アニメ最終回後もその影響は続いている。

ITを活用したビジネスの革新、という意味ではこれまでも多くのバズワードが生まれているが、デジタルトランスフォーメーションについては競争の観点で語られることも多い。よくAmazonやUberが例として挙げられるが、自社の競合がこれまでとは異なるIT企業となり、ビジネスモデルレベルで革新的なサービスとの競争を余儀なくされる。つまり「IT活用の度合いが競争優位を左右する」という今や当たり前の事実を、より強調して表現した言葉と言えるだろう。