VBA 画像貼り付けのオプション指定法
VBA初心者です。MS Office 201で，Excelに画像を貼り付けるとき，アスペクト比を保って幅を指定，位置をセルの位置で指定，名前を付けたいので，ネットを参考にして，以下の通りにしました。 Range("A6").Select 'A6の位置を指定 ActiveSheet.Pictures.Insert(myFile).Select 'myFileはあらかじめ設定 With...
View ArticleExcelVBAコンボボックスの扱い
こんにちは、いつもお世話になっております。 (1)Excel(あるシステムを起動すると自動で起動するExcel)ファイルがあります。 (2)コンボボックスでプルダウンで該当部署を選択、更新ボタンを押すと そのチームのデータが反映されます。 (3)(2)のデータを加工したいので、シートごと新規ファイルにコピーします。 別名保存します。 という一連の作業があります。...
View Articleクリスタルレポートの文字間隔の設定方法について
Visual Studio 2013でクリスタルレポートを使用していますが、数値型を集計(SUM)した項目の文字間隔を設定する方法が分かりません。 文字列型であれば文字間隔の設定が可能である事は分かりましたが、数値型や集計(SUM)をした項目の文字間隔を設定する事は可能でしょうか。 ＜例＞ ◆１ページ目◆ 商品A 100円 ←金額の文字間隔を[10pt]に設定 商品B 200円...
View ArticleACCESSからexcelを操作
accessのＶＢからEXCELのデータ編集を行う際、 最後エクセルを開放しているつもりなのですが、できていないようです。 ※タスクマネージャーにエクセルのタスクが残っており、 該当のファイルを開くと白くなっている。閉じて再度開くと正常動作する。 いくつかの帳票がありますが、 現象が起こるものと起こらないものがあります。 試しに Xls_app.ScreenUpdating =...
View Article別Book値を参照し現在のBookに計算後値入力
閉じているデスクトップの"B"Booksheet1に入力しているA1=3,B2=4の掛けた値12を現在開いている"A"Booksheet1 A3に計算式ではなく値のみを入力したいのですがVBAコードがどなたかお分かりになる方宜しくお願いします。
View Article同じフォルダー内の別ブックで計算結果を入力
Aブックsheet1をActiveしており同じフォルダー内にあるBブックのsheet1の検索値"A2"のVLooKUPで出した計算結果13の値のみをAブックsheet1 セル"A2"に入力したいのですが。Excel関数は解るのですがVBA関数となると難しくどなたか解るかた宜しくお願いします。因みにBブックは閉じています。
View ArticleDataGridView スクロール時の描画速度
Visualbasic 2013 でWindows Form アプリを開発しております。 DataGridViewにOracleのテーブルより抽出した結果を 10,000レコードを表示する必要があります。 ※DataTableをバインドしてDataGridViewのDataSourceに指定しています。 表示自体は問題なく実装できているのですが、...
View Articleエクセルマクロで検索ボックスを作成する
エクセル2010のマクロで検索ボックスを作成したいと考えています。 質問No.4072490を参照して作成しました。 ////////////////////////////////////////////////////////// 質問...
View ArticleVBSで特定のエラーが出た場合のみスルーしたい
VBSについて質問です。 VBS実行中、事前に予測できる特定のエラー番号が出た場合にのみ エラーメッセージを無視させることはできないでしょうか http://bayashita.com/p/entry/show/76 ↑こちらのページ等を拝見させていただき、 事前にエラーが出ることが分かる個所の前に On Error Resume Next を挿入して、以降全てのエラーを無視させる。...
View ArticleExcel VBAプログラム終了時に、
Excel2016でVBAのプログラムを終了しようとすると、自動的にコードが書かれている画面に移ってしまいます。 ユーザーフォームを使用しているのですが、終了する際にそのフォームだけ消したいです。 プログラムにどうやって書けばいいでしょうか？ ちなみに終了するときは「終了ボタン」を押してプログラムを終了させるようにしています。(画像参照)
View ArticleOutlook2013自動送信が出来ません。
はじめまして、いつもお世話になっております。 excel vba の学習を始めたばかりの初心者です。 あるサイトで自動でoutloook2013を起動しファイルを添付して送信するマクロを 見つけ送信しようとしましたが、『コンパイルエラー』の為、上手くいきません。 どなたか画像をご確認いただき、修正方法をご教示いただきたく存じます。 よろしくお願いいたします。...
View Articleテキストボックスの値をセルに反映させたい。
はじめまして、いつもお世話になっております。 EXCEL VBAの質問です。 下記(1)(2)の質問にお答えいただきたく、お願いいたします。 (1)ユーザーフォームのテキストボックスの値をEXCELのデータが入力されている 最終行の下の空白にユーザーフォームのボタンをクリックして反映。 (2)(1)の逆で特定のセルの値をユーザーフォームのテキストボックスに反映。...
View Article前の命令の実行が完了してから次を実行させたい
エクセルシートに挿入－図形から長方形を挿入し、下記のマクロを設定しました。 図形をクリックしたところ、アクション１→２→３の順には実行されず、まず２と３が同時に実行され、１のコメントは３のメッセージボックスのＯＫを押した後に表示されました。 １の表示が３よりも後になるのは、１の処理に時間がかかるためかと思います。...
View ArticleVBA Public変数の値が初期化されません
質問させていただきます。どうぞよろしくお願いいたします。 環境：Win7 SP1 64Bit エクセル2010 SP2 32bit でございます。 【現象】 下記のコードを実行後、再実行するとなぜか最初からB_Num = 3 になっております。 VBAの場合は明示的に初期値を入れないでも自動で初期化されるものと思っておりましたが、...
View Article同一フォルダの別ブックへのデータ貼り付け（VBA）
Excel2007・VBAにより、マクロ実行ブック（「親」）の≪Sheet1≫シートにおけるP10:P54に入力されている数値を、「親」と同一フォルダにある複数の別ブック（「子」）の≪Sheet1≫シートのP10:P54に貼り付けたいです。 なお、同一フォルダには「子」とは別に本処理対象としない≪Sheet1≫シートが存在しない他のブックも存在しています。...
View ArticleVBA 単純なIF文ですが？
以下のような文を書いたときに、If文の後の変数を「set_s」にした場合イコールが実行されません。 「set_s」を単純な数字（この場合16）にするとIf文が機能します。 なぜでしょうか。 Do set_s = 16 Cells(1, 1) = Time h = Left(Time, 2) m = Mid(Time, 4, 2) s = Right(Time, 2) If set_s = s...
View ArticleWORD VBAマクロ 図（画像）をすべて選択
別のファイルからコピーして図（拡張メタファイル）で貼りつけた画像が文書内にたくさんあり、それを一度に選択してスタイルの変更がしたいのですが、マクロだとどうすれば良いのでしょうか？ activedocument.shapes.selectall かと思ったのですが、書き込みできません、とエラーが出てしまいます。...
View ArticleVB.NETを書いているのですが基本型のメソッド
IntegerとかDateとかが持つメソッドの一覧はどこを見れば書いてありますか？TryParseとかCompareToとか。MSDNを見ても基本型の説明しか載ってません。 Java見たいになんで綺麗にドキュメント揃ってなんですか。これだからVBは嫌なんです。
View Article