ITmedia総合 >  質問!ITmedia  >  V

「VBA」最新質問一覧

Visual Basic for Applications

関連キーワード

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
OUTLOOK2010,2013VBAフォルダ作成
メールの添付ファイルをパソコンのCドライブに保存したいのですが、あらかじめフォルダを作成しておいて、保存する方法はわかるのですが、フォルダが存在しない時は、その存在しなかったパスのフォルダを作成して、添付ファイルを保存したいのですが、やり方がわかりませ...(2017/04/16)

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

Excel(エクセル)
VBA ユーザーフォーム上のチェックボックスのキャ
皆様、宜しくお願い致します。私はVBA歴が浅く初心者に近いため、何卒ご教示の程お願い申し上げます。過去にココで諸先輩方の貴重なアドバイスを頂戴し、お陰様で運用できております。そこで今回は、現在運用中のユーザーフォームに「チェックボックス」を2つ組み込んで、...(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)

その他(プログラミング)
アマゾンAPIのExcel VBA利用方法について
アマゾンAPIをExcel VBAで利用する方法について教えて頂けないでしょうか。現在、小口出品者の為、Amazon APIの種類はProduct Advertising APIを使用する事となります。条件としては、以下のとおりです。検索条件について●B3にアマゾンの在庫情報の入力欄を設けます。(在...(2017/04/09)

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)

Visual Basic
エクセル2010VBAからDBへの接続方法
エクセル2010VBAでMS AccessまたはHSQLDBへの接続方法はどんなものがありますか?イントラネットでサーバPCにDB(MS AccessまたはHSQLDB)を置き、クライアントPCのエクセルから接続する構成を考えているのですが、接続方法はどんなものがありますか?AccessだとDAO、ADOで、...(2017/04/05)

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)

Visual Basic
VBA色を反映させる
VBA初心者です。初歩的な質問ですみませんが教えてください。やりたいこと仮に前提としてファイルの名前を試験1試験2とします。試験2のファイル1行目のA列に1、B列に2、C列に3・・・AE列に31と連続する数字があります試験1のファイル6行目のK列に1、L列に2、M列に3・・...(2017/03/10)

Excel(エクセル)
エクセルVBAで複数行の値を統合したい
エクセルVBAで下記のように区分ごとに複数行の値を統合したいです。どのようなロジックにすると、より高速に処理できるでしょうか?(エクセルの標準機能でこういうことができるならば、それを取り入れたいと考えてます)【 統合前 】|区分 |値1 |値2 |値3 |---...(2017/03/09)

Visual Basic
画像抽出するVBAで画像を同じサイズにしたい
サイトから画像を抽出する下記のVBAで、出力される結果について(1)画像の縦横比(サイズ)をすべて同じにしたい(2)(1)にあわせたセルのサイズにしたい(3)2列出力を3列出力にしたいのですが、どのようなソースに変更すればよいでしょうか?教えていただけると...(2017/03/08)

Visual Basic
VBAでボタンを押すと指定サイトの画像抽出
お力を貸してください。エクセルVBAで、テキストボックスとボタンを配置しました。テキストボックス内にURLを入れてボタンを押すと、指定サイトに表示されているすべての画像を抽出して、エクセルに貼り付けるVBAを作りたいのですが、どのようなソースにすればよいでしょう...(2017/03/08)

Excel(エクセル)
ExcelVBA 行を非表示にするとボタンが消える
 Excel2016です。調べても解決できなかったので,初めて質問させていただきます。 マクロで行を非表示にしたらコマンドボタンやチェックボックスが消えてしまいます。非表示にする行にはかからないようにオブジェクトを設置していますが,消えてしまいます。コントロール...(2017/03/07)

Visual Basic
excel vba コンボボックス更新について
お世話になります。シート1のA1セルに 名前 B1セルに期限と入力してありA2セル リンゴ  B2セル 1703 A3セル バナナ  B3セル 1703 A4セル ぶどう  B4セル 1704 A5セル キウイ  B5セル 1704 A6セル お米   B6セル 1706 A7セル 酒    B7セル 1...(2017/03/06)

Excel(エクセル)
Excel VBA のエラー 5 でトラブルです
'下記のVBAで---------で囲った部分でエラー 5 「プロシージャの呼び出し、または引数が'不正です。」となります。色々試してみたのですが、何をやってもうまくいきません。'ご教授頂けないでしょうか'何卒、宜しくお願い致します。Sub 月次工数_M()' 月次工数_M Macro ...(2017/03/01)

Excel(エクセル)
ExcelVBA Dictionaryオブジェクト
こんにちは。Dictionaryオブジェクトについて、ご教示いただきたく質問させていただきます。あるCSVデータにおいて、A列に入力されている番号で重複をなくし、重複する番号については、B列(売上額)C列(利益額)それぞれの値を合計してSheet2に表示させるコード(test1)を書き...(2017/02/27)

Excel(エクセル)
エクセルVBAがエラーが出て作動しません。
以下のVBAコードを作成してみました。ところが、"Sub Sample1()"の部分が黄色く塗りつぶされ、"get folder"が選択された状態で”Subまたはfunctionが定義されていません”というエラーがでます。こちらですがどこを直せばうまくいくかご教示いただけな...(2017/02/26)

Visual Basic
VBAで
会社で毎日現品札というものを発行するのですが、電卓で計算しながら発行しており非常に時間がかかるので1回或いは2回の印刷でできないかとおもい質問させていただきました。やりたい内容は下記のイメージです。シートに18梱包分を入力できるようにしてあり、ユーザーフォ...(2017/02/26)

Excel(エクセル)
Excel VBA Worksheets(())
Excel2016をWindows10で使用しています。以下のマクロが実行できません。Option ExplicitSub raco() Worksheets("Sheet(3)").Range("$B$2:$D$4").FormulaR1C1 = "=Sheet(2)!RC"End SubSheet(3)をSheet3,Sheet(2)をSheet2 と書くとSheet3にSh...(2017/02/25)

オフィス系ソフト
VBA機能はついているのでしょうか
Kingsoft SpreadsheetsにはVBA機能がついていますか。もし付いているとしたなら、どこを操作すればいいのですか。よろしくお願いします。(2017/02/25)

Excel(エクセル)
Excel VBAの自動生成VBAでエラーが発生?
' ↑'この上にピポットテーブルを作る為のデータをSheetに生成し'下記でそのSheetに名前を付けてピポットテーブルを作成するVBA Dim wk As String wk = Application.InputBox("シート名を入力ください") If wk <> "False" Then Ac...(2017/02/25)

Excel(エクセル)
VBAのIF文 あるセルがTRUEの場合
VBAの初心者です。Sub Sample1() If ActiveCell.Value = "新宿" Then MsgBox "新宿です" Else MsgBox "新宿ではありません" End IfEnd Sub上記の記述は以下のページにあったサンプルhttps://www.moug.net/tech/exvba...(2017/02/23)

Visual Basic
VBA 結合セルに名前を付ける
作成中のマクロで、「B9とB10を結合したセルに名前を付ける」作業を入れたいのですが、Range("B9:B10").Name = "あああ"とすると、マクロを実行した時にエラーになってしまいます。Range("B9").Name = "あああ"としても、エラーに...(2017/02/22)

Excel(エクセル)
EXCEL VBA 数式を含めたコピー貼り付け
お世話になります。こちらのサイト内にありました、以前の質問QNo.8966520に対する以下の回答(http://qa.itmedia.co.jp/qa8966520.html)を参考にしているところですが、このVBAでは、A列に入っているデータ毎に新規ファイルを作成・保存するような処理となっているようで...(2017/02/18)

Visual Basic
エクセル VBA 表示範囲の簡素化
よろしくお願いします。下記構文の簡素化ができないでしょうか。CommandButtonが30個ほどあります。ーーーーーーーーーーPrivate Sub CommandButton1_Click()Dim rng As Range Application.Goto Sheets("基本台紙").Range("A1")Set rng = Range("...(2017/02/17)

Excel(エクセル)
Excel VBAで読み取り専用を表示しないで開く
VBAで読み取り専用に設定されているExcelブックを読み取り専用で開いてくださいというダイアログを表示させないで開くにはどうすればよいでしょうか。(Windows7 , Excel2010)(2017/02/16)

オフィス系ソフト
access vba レポートを複数部印刷
MS-Access 2007です。VBAでレポートを印刷しています。2部印刷したいときはどのようにすればよいでしょうか。現在は Dim stDocName As String stDocName = "請求書印刷" DoCmd.OpenReport stDocName, acNormalで一部印刷しています。二回繰り返せば2枚...(2017/02/15)

Excel(エクセル)
VBA一定間隔beepプログラム表示が更新されなく
セルにセットした時間の間隔でbeepを鳴らすプログラムを作りました.beepは最後まで鳴りますが,現在時間をセットしているセルの表示が途中から更新されなくなってしまいます.それ前に砂時計マーク(くるくるマーク)が出ます.beepだけは最後まで正常になります.一応,...(2017/02/11)

Excel(エクセル)
Excel VBAでは可でユーザーは入力不可のセル
C5のセルはユーザーが入力できて、C5セルに入力された値に応じてVBAでC7セルに処理した値を表示させたいのですが、C7のセルはユーザーは入力(選択)できないようにしたいのです。具体的には、C5セルの書式設定の保護タブのロックを解除してホームタブのセルグループの書式▼...(2017/02/10)

Excel(エクセル)
エクセル VBA 数値のみの個別抽出方法
エクセルのグラフ参照範囲の文字列から、数字のみを抽出する方法を教えて下さい。目的は、ある条件の時だけ系列の書式設定を変更するのですが、それを自動でするためです。現状では条件の判定の繰り返し回数が系列の要素数を上回るように設定して、全ての要素について判定...(2017/02/09)

Visual Basic
Excel VBAで別ブックのマクロから配列を取る
Excel VBAで別ブックのマクロで計算した結果を配列で渡したいのですが、上手い方法が見つかりません。同じブック内であれば、Function GetAry(Imax As Integer, ByRef MyAry As Variant) as Booleanのような関数を作れば、GetAry = True の時に返値の MyAry が有効であると...(2017/02/09)

Excel(エクセル)
VBAで別のExcelブックのボタンのマクロ登録
Excelブック1とExcelブック2があります。Excelブック1はVBAで1)Excelブック2を開いて2)Excelブック1のワークシート(Sheet1)と モジュールシート(Module1)を Excelブック2にコピーします。3)ワークシート(Sheet1)にはコントロール(ボタン)が貼り付けてあって このボタン...(2017/02/09)



多くの予想を裏切り、第45代アメリカ合衆国大統領選挙に勝利。貿易に関しては明らかに保護主義的になり、海外人材の活用も難しくなる見込みであり、特にグローバル企業にとっては逆風となるかもしれない。

携帯機としても据え置き機としても使える、任天堂の最新ゲーム機。本体+ディスプレイ、分解可能なコントローラ、テレビに接続するためのドックといった構成で、特に携帯機としての複数人プレイの幅が広くなる印象だ。

アベノミクスの中でも大きなテーマとされている働き方改革と労働生産性の向上。その実現のためには人工知能等も含むITの活用も重要であり、IT業界では自ら率先して新たな取り組みを行う企業も増えてきている。