ITmedia総合 >  質問!ITmedia  >  V

「VBA」最新質問一覧

Visual Basic for Applications

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)

オフィス系ソフト
Document ImagingをVBAで操作
Tifファイルが300ファイルあります。どのファイルも20文字程度の文字のみです。Microsoft Office Document Imagingを使用すると文字が抽出出来るようですが・・・・私は「Microsoft Office Document Imaging」自体使用はしたことがありません。この300ファイルをExcel V...(2017/02/13)

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)

Excel(エクセル)
【ExcelのVBAで何か関数を使ってリアルタイム
【ExcelのVBAで何か関数を使ってリアルタイムに動くものが作りたい】例えば関数に自動で次々に値が代入されて周波数のようなウェーブのグネグネしたグラフを点を打ちながら描かれていくVBAとか作りたいです。どうやって作るのか参考サイトを教えてください。あと動くVBAっ...(2017/02/08)

Excel(エクセル)
Excel vba ListVew 右揃え
Excel vba ユーザーフォームにListVewを作成し、数値の部分は「,」付で右揃えにしたいのですが、全て左揃えで表示されます。右揃えにするにはどうしたら良いでしょうか?以下のコードで使用しています。  'ListVew1に書出し Set rng = ActiveSheet.Cells(1, 1).Cu...(2017/02/08)

Excel(エクセル)
エクセル VBA グラフの要素の値を取得
エクセルVBAのグラフの要素の値の取得方法について教えて下さい。グラフは散布図でX軸、Y軸の値があります。マウスでクリックしてポイントを選択するとグラフツールの窓に表示される値はX軸の値です。添付させて頂きました画像の「要素」の後の値です。この値を取得して変...(2017/02/05)

Excel(エクセル)
エクセルVBA 教えてください
VBA初心者です。現在エクセルで書類作成のテンプレート原本を作成しています。その中に1.携帯電話2.ポケットベル3.固定電話4.その他というように複数の中から選択する項目があります。リストボックスでとも考えていたのですが、選ばれていない項目も表示しておきた...(2017/02/03)

Excel(エクセル)
Excel VBA 結合セルがある時に1列だけ選択
A1からD1までの4つのセルが結合されている時にC列をクリックするとC列だけを選択できます。これをVBAで記述するにはどのように記述すればよいでしょうか。マクロの記録ではColumns("C:C").Selectというコードが生成されるのですがマクロ記録時にC列だけが選択さ...(2017/02/03)

Excel(エクセル)
EXCEL VBAの記述をお願いします
添付ファイル1.の表は一カ月のシフト表です各記号で役割があります上段(1)(1)が午前、下段が午後(2)(2)です。お願いしたいのはこのシフト表から2.の表に実績として1日の(1)はだれ(1)はだれ、(2)はだれと代入したいのです。お願いは代入する式をお願いしたい。1.の表...(2017/02/02)

Visual Basic
EXCEL VBA 取得したセルの列の最終行
お客さんからいただいたEXCELフォーマットに沿って、集計ツールを作成していますが下記でつまってしまいました。 Wb.Worksheets("Sheet1").Cells.Find("実施日").Select Sel_Col = Selection.Column Last_Row = Wb.Worksheet...(2017/02/02)

Visual Basic
VBA【初歩的な質問】
エクセルシートのA列にホームページの名前、B列にそのページのアドレスが入力されております。A列のページ名にハイパーリンクの情報を結び付けて、B列を削除したいです。※A列の名前が青くなっていて、クリックするとそのページに飛んでいくことができて、B列は空白そのVBA...(2017/01/28)

Excel(エクセル)
VBA超初心者です。繰り返しのVBAの使い方
お読みくださいましてありがとうございます。超初心者のため、くだらない質問をしてしまっていることをお許しください。現在シート内で、B2のセルが空白ではなかったら、MsgBox (("B2")&("B4") &("B7"))c2のセルが空白ではなかった...(2017/01/27)

Excel(エクセル)
Excel VBA 自身を非表示にした時の解除方法
Excel2010でVBAのコードデバッグ中にExcelアプリケーションのウインドウの中にExcelブック(シート)が表示されなくなってしまったため一度、Excelアプリケーションを終了して再びデバッグ中のExcelブックを開いたのですがそれでもExcelアプリケーションのウインドウだけが表...(2017/01/25)

Visual Basic
VBAセルの値が指定数量に満たない時に印刷させない
皆様いつもお世話になります。行き詰ってしまったので質問させてください。複数セルが空白なら印刷させないコードを作ったのですが、そこへ総数が納入ロットより少ない時と総数が納入ロットより大きい時に警告メッセージを表示して印刷させたくないのです。もちろん総数=...(2017/01/24)

Excel(エクセル)
Excel 特定の文字を検索して計算 VBA
急ぎで困っております。エクセル2010にて、表を小計をさせた文字や特定の文字を検索して、別セルに計算式を参照させ表示するマクロを考えております。表の内容は都度、変更になり小計をかけます。画像添付しております。ご教示のほどよろしくお願いします。(2017/01/23)

Excel(エクセル)
VLookupで一致しなかった時のVBAでの処理
On Error ?を使わないで、VLookup()で一致しなかった時の処理をさせたいのですがどのように記述すればよいでしょうか。例えば、以下のようなコードの場合、一致したデータがない時にyに-1を代入するには以下のコードをどのように記述すればよいのでしょうか。-------------...(2017/01/20)

Visual Basic
VBAで複数セルの何れかが空白なら印刷しない。
VBA初心者です。VBAでワークシートに印刷ボタンを配置して印刷しているのですが、製品名・受注数・納期・発注番号の何れかが空白だった場合、メッセージを表示させてどの項目が空白か警告表示させて印刷させたくないのです。複数項目が空白ならメッセージも複数表示できれ...(2017/01/20)

Visual Basic
メルカリ VBA 出品カテゴリのスクリプト
https://www.mercari.com/jp/sell/こちらのページをIE/VBA制御したいと考えております。商品の詳細という欄にあるカテゴリのフォームは、大カテゴリ(例: レディース)を入力すると、スクリプトを読み込んで小カテゴリ(例: ワンピース)のフォームが出てくる仕組みになってい...(2017/01/19)

Excel(エクセル)
EXCEL VBA VLOOKUP 範囲を変数で
Excel VBA で VLookup()の第2引数の範囲を行と列の数値の変数で指定したいのすがどのように記述すればよいでしょうか。以下の式がエラーにならないように具体的に直していただけないでしょうか。よろしくお願いします。-----------------------------------Dim d1 As Stri...(2017/01/19)

Visual Basic
【VBA】日付から遅延案件を抽出、新ファイルに転記
工程が何十項目もある案件から、各項目の予定と実績を比較し、1項目でも遅延している案件があったら別ファイルに遅延リストとして抜き出してまとめる、というマクロを作成しています。見よう見まねで自分で書いてみたのですが、全然うまくいかず力尽きました。どうぞお力を...(2017/01/18)

Visual Basic
【VBA】全角半角入り交じった住所を分割
Book1のA列に記載されている市区町村番地を、別のファイルであるBook2のA列とB列に、それぞれ市区町村と番地に分けて転記するVBAを教えていただけますでしょうか。住所は半角全角が入り交じっていますが、どちらかに統一するのではなく、記載されているとおりに転記したい...(2017/01/17)

Visual Basic
AccessのVBAに関しての質問です。
クエリで抽出したファイルをCSVで出力させ、出力したファイル名を「連番&ファイル名」の形にしたく下記のコードを使用しました。6ファイルは出力は成功したのですが、7ファイル目を出力しようとしたところ、「#6:オーバーフロウしました。」とエラーがでてきてしまい...(2017/01/17)

オフィス系ソフト
VBAからIEを動かしてタブをクリックする方法
すいません、ここ10日間くらい悩んでいます。VBAからIEを動かして所定の場所にログインをした後以降の作業でつまづいています。ソースコードを記載しております。その後のタブをクリックする以降の作業を以下に記載いたしました。⇒どうしてもタブが押せません。ーーーーー...(2017/01/17)

Excel(エクセル)
EXCEL・VBAで、範囲名を参照したい。
またまたお世話になります。タイトルの通りなのですが、EXCELで作成している出勤表(sheet毎に月別にし、縦軸に社員名、横軸に日付を入れてあります。社員名は同一のブックの別シートにまとめてあり、参照で各月に表示してあります。)で、出勤した日に”1”を入れる...(2017/01/16)

Visual Basic
Excel VBAで読み取り専用ファイルをコピー
お世話になります。Excel VBAでサーバーにある共有のExcelファイルを自分のPCにコピーするコードを作りました。FileCopy "\\Server\サンプル.xls", "\\○○○\Users\Desktop\サンプル.xls"通常は問題ないのですが、コピーするファイルが誰かに開かれて...(2017/01/16)

Visual Basic
VBA教えて下さい
VBA初心者ですやりたいこと変数を宣言し今開いているシート(activesheet)にfor nextを使用し列5?20を調べ行3?5を指定しもし、5?20列の2行目のどれかに”No.8”という文字があれば(ここまでのコードは書けました)その当てはまる列の3?5行を選択し(1)更に、(1)の下2列を...(2017/01/15)

Excel(エクセル)
VBAでリスト通りにフォルダを作成
excelのvbaでアクティブブックが入っているフォルダの中に"sheet1"のA列のリスト通りに名前を付けフォルダを作成したいです。リストに重複した名前がない場合はできますが、図のように重複した名前が入っているとどうすればいいか分からなく、ここに質問します。...(2017/01/15)

オフィス系ソフト
VBA 参照設定について
Windows7 Access 2013です。以下サイトを参考にして、VBAに貼り付けたところ”ユーザー定義型は定義されていません”というコンパイルエラーが出ました。http://gdipluscode.sakura.ne.jp/gdip/resize_save_jpeg.html引っかかっている部分はOptional ByVal InterpolationMo...(2017/01/15)

オフィス系ソフト
VBAで起動しているIEの操作
IEでOKWAVEを開いていたら イミディエイトウィンドウに タイトルを表示するのに次の 記述をしましたが エラーになりました。実行時エラー '-2147467259 (80004005)':'Document' メソッドは失敗しました: 'IWebBrowser2' オブジェクトなぜでしょうか?IEは11です。エ...(2017/01/13)

Visual Basic
Excel VBA の作り方について【初心者】
Excel VBA の作り方について質問させてください。A1セルに「営業部【山本】」と入力されています。B1セルに「01:35:24」(タイム)と入力されています。(1)D1セルに「山本」を抜き出して表示(2)E1セルに「95」(分数)で表示(3)A2以降で同じ作業の繰り返し(最終入力列まで)とい...(2017/01/12)

Visual Basic
Excel VBA の作り方について【初心者】
Excel VBA の作り方について質問させてください。A1セルに「営業部【山本】」と入力されています。B1セルに「01:35:24」(タイム)と入力されています。(1)C1セルに「山本」を抜き出して表示(2)D1セルに「95」(分数)で表示(3)A2以降で同じ作業の繰り返し(最終入力列まで)とい...(2017/01/12)

Visual Basic
VBAで複数行の指定
VBA教えてください  初心者ですやりたい事for next文を使用しbook1のシート内N~R行にある文字が入っていたならbook2のシート内のB行の文字を消すといった内容です考えたコードsub test()dim c as variantdim i as longSet c = Workbooks("book2.xls").Acti...(2017/01/11)

Excel(エクセル)
エクセルVBA,シート間転記でエラー1004
皆様宜しくお願いします。以下の記述で「実行時エラー1004アプリケーション定義 またはオブジェクト定義のエラーです」が出てきます。やりたい作業としては「週入力」シートのD5セルから下に入力されている内容を「転記」シートの同じセル範囲へ転記したいです。現在、...(2017/01/09)

Visual Basic
<excel:VBA>変数を使って簡略化したい
google検索してなんとか自力で作ったVBAを下記に貼りました。きちんと動作はするのですが、せっかくなので変数を使って簡素化し、データが多くても動作が速くなるようにしたいのです。いろいろ試しましたが、変数の使い方の知識が乏しく、うまくいきませんでした。変数とし...(2017/01/07)

Visual Basic
VBAエクセル、項目検索からデータ抽出
お世話になります。早速ですがsheets("データ元").Range("A2")にNo.、Range("B2")に日付、Range("C2")に曜日、Range("D2")に項目、Range("E2")に詳細、Range("F2")に金額がありA3?F3以下LastRowま...(2017/01/05)

Visual Basic
エクセルVBA IEの操作
こんにちは、 エクセルVBAでIEの操作の質問です。IEで特定の文字列をクリックするマクロはどのような記述になりますでしょうか?たとえば OKWEBのランキングをクリックする場合はどのようになりますか?http://okwave.jp/mypage から 右上 ランキング という文字をク...(2017/01/03)

Excel(エクセル)
エクセル VBA で IE操作 
エクセルVBAにて IEを操作し リンクをクリックするにはどのような記述になりますでしょうか?たとえばhttp://okwave.jp/mypageへアクセスし画面右上 カテゴリ をクリック次に Excel(エクセル) をクリック という具合に画面に表示されている文字を順番にクリックし...(2017/01/02)

その他(プログラミング)
VBA、IE操作、初心者になります
webページの操作についての質問になります。VBAでやりたいことです。(1)webページを開き、指定したソースが表示されるまで、画面を更新(2)ソース表示がされたら、指定したボタンをクリック(3)画面が移行する(4)移行したページの指定したボタンをクリック不具合(2)ボタンク...(2017/01/01)

オフィス系ソフト
アクセスVBA 変数での抽出条件の書きかた
顧客データテーブルからの抽出です。変数を使った書き方がわかりません。よろしくお願いします。テーブルのレコードには[氏名]:鈴木 [telnum]:0123456789が存在します。Private Sub テキスト0_BeforeUpdate(Cancel As Integer)Dim db As DAO.DatabaseDim rs As DAO.Reco...(2016/12/31)

Visual Basic
VBAでIEを操作したいです。
VBAでIEを操作したいです。エクセルでデータ管理をしております。VBA・マクロ等を使用して、ウェブページの入力フォームに自動で入力、ウェブページの結果を再度エクセルに返すことはできますでしょうか?こちらがサイトになります。モノレートhttp://mnrate.com/こちらの...(2016/12/29)

Visual Basic
VBAでIEを操作したいです。
エクセルでデータ管理をしております。 VBA・マクロ等を使用して、ウェブページの入力フォームに自動で入力、ウェブページの結果を再度エクセルに返すことはできますでしょうか?こちらがサイトになります。モノレートhttp://mnrate.com/こちらのサイトはアマゾンの商品の...(2016/12/29)

Visual Basic
[VBA] セルの色を塗りつぶす
条件付き書式では出来ないみたいなので、VBAに挑戦しましたが苦労しています。Win 8, excel 2010です。「ある1つのセルが100の時、その左横の4列をある色で塗りつぶす」という事を行いたいのですが、ネットで調べたものをちょっとアレンジしてみましたがSub change(ByVal ...(2016/12/28)

Excel(エクセル)
Excel 2010 VBA:ファイル名を読み込む
下は複数のcsvファイルを一つに合体するVBAです。これにシートの右端に読み取ったファイル名を追加するにはどうしたらよいでしょうか。よろしくお願いします。Sub macro1() Dim myPath As String Dim myFile As String Dim s As String myPath = ThisWorkbook.Path &am...(2016/12/28)



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

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

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