ITmedia総合 >  質問!ITmedia  >  V

「VBA」最新質問一覧

Visual Basic for Applications

関連キーワード

Excel(エクセル)
VBAで実行時エラー1004が出ます
VBAで実行時エラー1004が出ます。「Rangeメソッドは失敗しました。Worksheetオブジェクト」です。あらゆる可能性を調べたのですが、分かりません。誰か教えて頂けますでしょうか?下記コードの「Cells(m, 7) =・・・」の部分がエラーになりました。Sub ボタン1_Click()Dim ...(2017/12/15)

オフィス系ソフト
VBAリボンタブが選択された事を知りたい
Excel VBA でアプリを作成しています。アプリをアドイン化して専用のリボンタブを作成しました。そのリボンタブが選択された時に呼び出したいプロシージャがあるのですが、そのリボンタブが選択された事をどうやって知れば良いのか判りません。ご存じの方、よろしくお願い...(2017/12/06)

オフィス系ソフト
ExcelのVBAとExceed onDemand
仕事でExcelのVBAとExceed on Demandをそれぞれ使用しているのですが、Exceed on Demandを起動中にExcelのVBAを実行するとExceed on Demandを起動していない時に比べてVBAの実行速度がかなり遅くなり実行時間が10倍近くになります。何度か試しましたがExceed on Demandを起...(2017/11/30)

Visual Basic
エクセルVBA、列のコピーについて
VBAについて助けてほしいことがございます!VBA初心者なので、ひょっとしたらレベルの低い質問かもしれず申し訳ないのですが、VBAに詳しい方がいらっしゃれば教えて欲しいことがあります。 下記の前提を含めた作業内容をVBAのコードとしてまとめる事は出来るのでしょうか?...(2017/11/28)

Excel(エクセル)
VBAで小数点を含む数値をLong型に入れ方法
タイトルのままです。ググッてもわかりませんでした。Int関数を使うとInegerの範囲を越えた値を扱えません。以下はダメな例Long Var = Int(40000*Rnd+1)(2017/11/26)

オフィス系ソフト
Outlookで選択したメールのみ書き出すVBA
こんにちは。Outlookで選択したメールのみ書き出すVBAを教えてください。下記のコードまでは作成ができ、書き出すことには成功しました。ですが、下記コードだとフォルダ内すべてのメールが書き出しされてしまいます。選択しているメールのみ書き出すコードに書き換えたい...(2017/11/26)

Visual Basic
エクセルのVBAについて
エクセルのVBAに詳しい方がいらっしゃれば、助けて頂きたい事がございます!・Sheet1(以下S1と記載)の、1列目に、A1セルより、項目として、「ID、地区、住所、電話番号、資産名、耐用年数、取得日」が記載(=S1は項目のみ)・Sheet2(以下S2と記載)の、1列目に、A1セル...(2017/11/26)

Excel(エクセル)
数字と数字のー(ハイフン)は消去しないVBA
Private Sub Worksheet_Change(ByVal Target As Range)Dim myAsc As Integer, InSP As Integer, myFlag As IntegerDim myStr As StringIf Intersect(Target, Range("B4:CH4")) Is Nothing Then Exit SubIf Application.CountBlank(Target) > 0 Then Exit Sub ...(2017/11/25)

Excel(エクセル)
エクセルVBAでメールに画像添付
エクセル2010です。以下のようなVBAでOutlookメールを作成しているのですが、本文の中に画像を添付する方法がわかりません。下記で言えば strMOJI(0) と strMOJI(1) の間に画像を張り付けたいのです。画像ファイルを添付するのではなく画像として見えるようにしたいので...(2017/11/17)

Visual Basic
Excel VBA 特定の文字を含むシートを移動
VBA初心者です。2つのブック(ブック1、ブック2)があり、ブック2でシート名に”●●支店”という文字を含むシートをすべてブック1にコピーしたいです。支店名はいろいろあるのでinputboxで検索したいです。VBAを最近実践し始めたところなので、いろいろ調べたものの全く応用...(2017/11/14)

Excel(エクセル)
エクセルVBA 画像あり範囲を指定してPNG保存
利用環境win7エクセル2013お世話になっております。シート2の範囲A1:T11の範囲をVBAで画像保存したいです。範囲はセルを調整して1920x1080ピクセルにしております。範囲内に5枚ほどの画像を挿入しております。表示そのまま画像保存できますでしょうか。こちらの保存した...(2017/11/11)

Excel(エクセル)
指定したセルに条件で次の日を表示させるVBAなど
セルCL4には日付が表示されています。表示形式は〇〇〇〇年〇〇月〇〇日です。(画像参照)次にセルCL5?CL76には8:00から10分毎の時間が表示されています。表示形式は〇〇:〇〇です。(画像参照)時刻と時間間隔は固定ではなく任意で変えていきます。そし...(2017/11/11)

その他(プログラミング・開発)
Excel VBAを特定の端末以外で実行不可にする
ExcelVBAを特定の端末以外では実施できないようにしたいです。ツールを販売し、他の端末にコピーして使わせたくないというのが目的ですが、何か方法はありますでしょうか?(2017/11/08)

Excel(エクセル)
エクセルVBAで月別最大値を取得したい
いつもお世話になっております。要件がエクセルVBAで・・という事で困っています。エクセルの2010を使用しています。今、添付画像のように、A列に日付、B列に金額が入っており、D列に月表示、E列に各月の金額MAXを入れたいのですが、どのように記述したら良いかわかりませ...(2017/11/06)

Excel(エクセル)
指定した時刻と時間間隔を表示するVBA
'カレンダーフォームのVBAIf Intersect(Target, Range("BP1")) Is Nothing Then Exit Sub If MsgBox("日付を記入するためカレンダーを表示させます、よろしいでしょうか?", vbYesNo) = vbNo Then Exit Sub Else End If ' カレンダー...(2017/11/03)

Excel(エクセル)
Excel VBAでpptのアクティブスライド
Excel VBAで、pptのスライドショー実行中のアクティブスライド番号を取得するコードを教えてください。編集中のスライド番号を取得する方法は、検索して探し出したのですが、スライドショー実行中での方法がわかりません。Excelのセルにある値を、pptのテキストボックスに...(2017/10/30)

Excel(エクセル)
vba boolean変数を開放する方法
エクセルのセルに「○○○○○○○○○○××××××××××」と入っているものをランダムに並べ代えるマクロを探してみました。Sub macro2()Dim i, m As IntegerDim b, c As StringDim flg(1 To 20) As Booleanb = Cells(1, 1).ValueRandomizeFor i = 1 To 20 Do ...(2017/10/29)

Visual Basic
VBA グラフ 系列の名前で指定してグラフ色変更
VBA マクロにて、任意で指定する系列の名前のグラフの色を変更したいです。グラフに関するマクロを作成するのは初めてです。 ワークシートには約30個ほどのグラフがあります。ワークシート内の選択されている複数のグラフに実行したいです。グラフのラベル名ではなく、コン...(2017/10/28)

Excel(エクセル)
【EXCEL VBA】ユーザー定義関数の設定
ネットより拝借した下記ユーザー定義関数を使用して、複数の選択したセルの値を区切り文字(セミコロン)で連結する仕組みを作成している途中です。(例えば、A;B;C;D のように)Function myJoin(範囲 As Range, Optional 区切り文字 As String) As VariantDim c As Range,...(2017/10/27)

Excel(エクセル)
「VBA} XLSMのファイルをXLSX保存したい
いろいろとVBAが入っているシート1.xlsmがあります。シート1の内容をXLSXで保存したいのですが、うまくいきません。解決に向けてご教授ください。<ステップ1 XLSMでは保存できます。>Private Sub hachu_Click() '担当者名取得(C4) Dim s As String s = Range(&...(2017/10/26)

Visual Basic
Excel VBA callのあるなしの違い
Excel VBA の以下の2つのケースでcallがある場合とない場合では何か違いがあるのでしょうか。(1) 他のモジュール(Main)の中のプロシージャ(main)を呼び出す場合 Main.main Call Main.main(2) VBAのオブジェクトのメソッドを呼び出す場合 ActiveWorkbook.Clos...(2017/10/23)

Excel(エクセル)
Excel VBA 複数あるオプションボタンの処理
excel VBAで、複数あるグループ内のオプションボタンを、グループ別にまとめてoffにする方法を探しております。下のcodeではsheet上のすべてのオプションボタンをoffに出来ますが、グル?プ別にしたいのです。 In ActiveSheet.グループ1.OLEObjectsみたいに(これはNGで...(2017/10/22)

Excel(エクセル)
VBAでNOWから年と秒をはぶきたい
VBAで質問です。ボタンを押したらD4に月/日スペース時:分(10/20 17:07)が入るようにしました。 Range("D4").Value = Format(Now, "mm/dd hh:mm")別のセルM6にc4にある担当者名とD4の情報を入れたいのですが、うまくいきません。NGのコード(1)Range...(2017/10/20)

Visual Basic
excleVBA 出発・到着地 電車 所要時間
ExcelのA列に「出発地住所」、B列に「到着地住所」のデータが100行ほどあるのですが、C列に電車(+バスや徒歩も含めた)での「所要時間」を出したいと思っております。可能でしたらD列に「運賃」も表示したいですhttps://oshiete.goo.ne.jp/qa/1641060.htmlhttps://detai...(2017/10/18)

Excel(エクセル)
Excel VBA ボタン動作について
Sheet1にあるCommandButton1で、Sheet2に移動せずSheet2に在るCommandoButton2を動作させたいのです。Sheet2に在るCommandoButton2は、10ケの乱数を発生させています。 Sheet2のCommandButton2を使わずに、CommandButon1でその値をSheet1のセルに表示させたいのです。 要...(2017/10/17)

Windows系OS
エクセルVBAでWindowsをシャットダウン
エクセルVBAでWindowsをシャットダウンするにはマクロはどう記述したらよいのでしょうか?どなたかご教示お願いします。(2017/10/11)

Excel(エクセル)
excel vbaでリストの範囲設定
よろしくおねがいします。Sub 科目自動入力()Sheets("出納帳テンプレート").SelectApplication.ScreenUpdating = False'ww列最終行取得Dim vv As Long ' Sheets("科目シート").Select vv = Sheets("科目シート").Range("v&qu...(2017/10/07)

Excel(エクセル)
Excel vba について
vba初心者で、どのようにコードを書けばよいかわからないので、ご教授願います。添付画像のような状態で、「追加」ボタンを押した際に上に入力した内容(道の駅名等)の内容が左表の一番下に追加されるというようなマクロボタンが作りたいです。欲を言うと枠線も追加された...(2017/10/05)

Excel(エクセル)
EXCEL VBAお願いいたします
sheet1のA1に123456が入っています、sheet1のA2に左から2番目を代入するときはRange("A2").Value = Left(Range("A1"),Value,2)でA2に2と入り出来ました。これをsheet1のA1からsheet2のA1に代入したいのですがどうにも出来ないのです、worksheets(&quo...(2017/09/29)

Visual Basic
Excel VBAプログラム終了時に、
Excel2016でVBAのプログラムを終了しようとすると、自動的にコードが書かれている画面に移ってしまいます。ユーザーフォームを使用しているのですが、終了する際にそのフォームだけ消したいです。プログラムにどうやって書けばいいでしょうか?ちなみに終了するときは「終...(2017/09/29)

Excel(エクセル)
最終行/処理対象のデータまでを表すVBA
こんばんは、データの最終行/処理する対象のセルまで処理する場合のVBAの記述について質問させてください!VBAの最終行/処理する対象のセルまで選択するために使用する記述方法が何種類かありますが、そのうち、書籍やネットで検索しても出てこない記述方法につい...(2017/09/28)

Excel(エクセル)
Excel VBAの入門に良い物
ExcelのVBAを使用し、あるセルに文字を入力しその隣のボタンを押したら、入力欄の文字が消えて用意しておいた表に上から順番に入力した文字が追加される、というようなものを作成しようと考えているのですが、素人には出来るわけもなく、入門書や入門者にいいサイトなどを...(2017/09/27)

Excel(エクセル)
Excel VBAを使いこなせるようになりたい
Excel VBAを自由自在に使いこなせるようになりたいと思っています。プログラミング経験は大学の1単位分のみです。アルゴリズムの基本は学んだことがあります。ITパスポート超え、基本情報技術者未満のIT知識です。最短で学ぶためにはどのような方法がおすすめですか?質の...(2017/09/22)

Access(アクセス)
Access2016ではVBAは使えないのでしょう
お世話になります。Access2010を使っています。今回Office365proに切り替えるべく、インストールしました。Access2016使用可能になり、これでAccess2010で作成したファイルを開こうとすると以下の警告が出て、かまわず続けると警告通り、VBAが全て削除されています。その上...(2017/09/21)

Visual Basic
VBSとVBAの違いはなんですか?
VBScriptとVBAは何が違いますか?教えてくださいよろしくお願いします。(2017/09/20)

Excel(エクセル)
VBAの配列について
初めまして、VBAの配列の入力方法について質問させてください。大量のデータの処理を高速化するため、配列を使用して以下のVBAを入力しました。インターネットで調べ、見よう見まねで入力してみたものです…(T_T)内容は、シート「資料」のC列とシート「Sheet1」のG列の文字...(2017/09/20)

Excel(エクセル)
VBA Selectの省略
こんばんは、VBAのSelectメソッドの省略について質問させてください。VBAにおいてSelectを使用すると処理が遅くなると聞いたことがあるので、なるべくSelectを避けるべく以下のVBAを記述しました。内容は、シート「りんご」のA列?AN列に入っているデータを見出し項目を含め...(2017/09/20)

オフィス系ソフト
アクセスのVBAについて
前任が辞めたときに会社と一悶着あり、VBAにアクセスを開いた瞬間ファイルを閉じるプログラムを組んで退社したようで、顧客情報の入ったファイルが開けません。このファイルを開ける方法が何かあれば教えて下さい。(2017/09/19)

Excel(エクセル)
「?以上、?以下」のオートフィルタのVBAについて
こんばんは、オートフィルタについて2つ質問させてください!1つ目は、10列目に入っている値で、20170901以上かつ20170931以下の値をオートフィルタで抽出しようと以下のVBAを入力しましたが、該当するデータがあるにも関わらず抽出ができませんでした(T_T)何か間違っ...(2017/09/13)

Excel(エクセル)
VBAの設定「2題」
最初に取り組んだEXCELのVBAですが、何人かの方にアドバイスを戴きましてやっと「まともな質問」ができる様になりました。やりたい事への完成アドバイスをお願いします。「環境]MS Office2007(Windows10)・ファイル名:ムービーリスト・フィールド名:A?H、A...(2017/09/12)

Visual Basic
ExcelVBAコンボボックスの扱い
こんにちは、いつもお世話になっております。(1)Excel(あるシステムを起動すると自動で起動するExcel)ファイルがあります。(2)コンボボックスでプルダウンで該当部署を選択、更新ボタンを押すと そのチームのデータが反映されます。(3)(2)のデータを加工したいので、シー...(2017/09/11)

SE・インフラ・Webエンジニア
html vba accessはスキルになるか。
よろしくお願い致します。35歳男性です。派遣社員です。事務の仕事をしていますが、社内で使用しているシステムの開発・保守・メンテナンスの仕事をしないか(部署異動)と打診されています。上記ソフトはかじった程度ではありますが、実際に作成・メンテナンスなどを行...(2017/09/09)

Visual Basic
VBA 画像貼り付けのオプション指定法
VBA初心者です。MS Office 201で,Excelに画像を貼り付けるとき,アスペクト比を保って幅を指定,位置をセルの位置で指定,名前を付けたいので,ネットを参考にして,以下の通りにしました。 Range("A6").Select 'A6の位置を指定 ActiveSheet.Pictures.In...(2017/09/06)

Visual Basic
WORD VBAマクロ 図(画像)をすべて選択 
別のファイルからコピーして図(拡張メタファイル)で貼りつけた画像が文書内にたくさんあり、それを一度に選択してスタイルの変更がしたいのですが、マクロだとどうすれば良いのでしょうか?activedocument.shapes.selectallかと思ったのですが、書き込みできません、とエ...(2017/09/05)

Excel(エクセル)
オートフィルタのVBAについて
初めまして、オートフィルタに係るVBAについて質問させてください!A列にりんごやぶどうなど果物の名前が入っているデータがあり、K列までデータが入っています。(B列以降は果物の個数や値段のデータなので、果物の名前はA列のみです。)うち、「りんご」、「みかん」、「...(2017/09/05)

Visual Basic
VBA 単純なIF文ですが?
以下のような文を書いたときに、If文の後の変数を「set_s」にした場合イコールが実行されません。「set_s」を単純な数字(この場合16)にするとIf文が機能します。なぜでしょうか。Doset_s = 16Cells(1, 1) = Timeh = Left(Time, 2)m = Mid(Time, 4, 2)s = Right(Time, 2) ...(2017/09/04)

Visual Basic
同一フォルダの別ブックへのデータ貼り付け(VBA)
Excel2007・VBAにより、マクロ実行ブック(「親」)の≪Sheet1≫シートにおけるP10:P54に入力されている数値を、「親」と同一フォルダにある複数の別ブック(「子」)の≪Sheet1≫シートのP10:P54に貼り付けたいです。なお、同一フォルダには「子」とは別に本処理対象とし...(2017/08/31)

Excel(エクセル)
VBA教えてください
VBA初心者ですやりたい事B70セルから文字を探しB70?B20セルに文字が入っている場合文字が入っている一つ下のセルを選択しA1セルの文字を反映する例、B50セルに文字が入っていたらB51セルにA1セルの文字を入れるということをしたいです考えたコードSub test()Dim a...(2017/08/29)

Visual Basic
VBA Public変数の値が初期化されません
 質問させていただきます。どうぞよろしくお願いいたします。  環境:Win7 SP1 64Bit    エクセル2010 SP2 32bitでございます。【現象】 下記のコードを実行後、再実行するとなぜか最初からB_Num = 3 になっております。VBAの場合は明示的に初期値を入れない...(2017/08/28)

Excel(エクセル)
エクセルVBAでワークシート上のPDFをPrint
https://okwave.jp/qa/q9367116.htmlの関連質問です。Worksheets("Sheet2").OLEObjects(1).Verb Verb:=xlVerbOpenで、ワークシート上に埋め込んだPDFファイルを開くことはできました。今度は、これで開いたPDFを手動ではなく自動でPrintし、Acrobatを終了させる...(2017/08/27)



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

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

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