フォルダの条件付き世代管理(ローテーション)
VBSの質問です。 ■やりたいこと 1)設定ファイルを読み込んで、バックアップするフォルダの世代数(2世代分)と、フォルダ名を取得する。 2)対象フォルダ内にある任意2文字のサブフォルダがあることを確認し、作成日付でソート(古い順)する。 3)直近の新しい任意2文字のサブフォルダを2世代分を残して、3世代以降は削除する。...
View ArticleExcel VBA ユーザフォームの検索について
添付の画像のようなユーザフォームを作っています。 TextBox1に検索ワードを入力して、CommandButton1をクリックすると、下のComboBox1に一覧が出るようにしたいと思い、ほかのサイトから下記のコードを見つけて、作ってみました。参照先のsheet2を表示しているときは大丈夫なのですが、別のシートを選んでいるとエラーになります。...
View ArticleエクセルVBA ピボット作成
SUB テスト１（）Sheet1（"A2~F3600")のデータを新規ブックのSheet1にピボットテーブル表示させるVBA構文をご教示ください。初心者です宜しくお願いします。
View Articleaccess イベント名取得方法
accessでフォーム、またはコントロールのイベント名の取得方法を教えてください。 フォーム、コントロール、レポートには、それぞれプロパティシートを持っていて、開くと、 「書式」「データ」「イベント」「その他」「すべて」の４つのタブに分かれています。 やりたいことは、この４つの中で「イベント」タブにある内容をイベント毎に取得したいのです。 ＜コーディング例＞ '全フォームループ For Each...
View ArticleVBS 任意の名前でzip内のファイルを解凍したい
VBSを使ってzipファイルの解凍を行う際に、解凍ファイルを任意の名前にしたいです。 現在以下の内容のvbsでzipファイルを解凍しています。 --------------------------------------------------------------- zippath = "C:\新しいフォルダー\test.zip" savepath = "C:\新しいフォルダー" Set...
View Articleスライサーの項目選択を別シートのセルを参照にしたい
スライサーについての質問です。 シートが２つあり Ａシートには営業担当名がプルダウンで選択できるようになっており、 Ｂシートのスライサーの項目選択はＡシートで選択した営業担当名を選びたいのですがこれをＶＢＡのコードで書くのは不可能なのでしょうか？ ｎｅｔで検索をしたのですがどうしても見つからず・・ 教えていただきたいです。
View ArticleVBS Dateadd関数の実行
VBSについて、おそらく初歩的な質問です。 以下のプログラムが実行できないのはなぜでしょうか。。 また、メッセージボックスにy(5)の値(2017/08/10 11:00:00 ) を表示するにはどのように訂正すればよいでしょうか。 よろしくお願いします。...
View Articlevisualbasic2013 Excel出力
以下の開発環境でOleDbを利用してExcelファイルの出力を 行いたいと考えております。 ・visualbasic2013(Pro) ・クライアントにはExcelインストール済 以下のコードを実装しています。 Dim cn As System.Data.OleDb.OleDbConnection '/ ADO.NET接続用 cn = New...
View Articleaccess VBA
組み立てたSQL文を実行し、movelastするとエラーになります。 エラー番号：3071 SQLは、対象のテーブルよりキーを指定して抽出していますが、 そのテーブルにキーが２種類以上存在するとエラーになってしまいます。 なにが原因なのでしょうか。 STR_sql = "" STR_sql = STR_sql & " SELECT Mid([CM_KEY],2,2) AS A " &...
View ArticleVisualbasic datagridview
Visualbasic2013を利用してシステム開発を行っています。 データベースのマスタ情報(顧客マスタ)をdatagridviewに表示しているのですが、 以下のような項目を表示するとコードと内容で2列必要となってしまい横幅が大きくなってしまい見た目が良くありません。 ・○○区分(0:あり、1:なし) datagridviewを直接編集しデータベースに反映したいと考えているため、...
View ArticleVBA
ACCESSのVBAにて、エクセルのデータ操作を行っています。 「sum」や「vlookup」などの関数が入ったセルをコピー&貼り付けしていく処理があります。 デバック―モードで実行するとエラーとなりませんが、 通常に実行するとエラーになってしまいます。 エラーの内容： アプリケーション定義またはオブジェクト定義のエラーです。 sleepを入れてみましたが、結果はかわらずでした。...
View ArticleVBAとVBSの違いについて！？
VBAとVBSの違いはなんですか？ VBSの初心者本が売っていないので代わりに VBAの初心者本を購入して勉強しようかと考えているのですが、 無駄でしょうか？
View Articleシートにデータがなければ削除するＶＢＡ
こんばんは、ＶＢＡについて質問させてください(^O^) あるブックに３２個のシートが入っています。 ３２個のシートのうち、セルＡ２にデータの入っているシートとそうでない シートがあります。（毎回変動します。） これを踏まえて、セルＡ２にデータが入っていればそのまま、 入っていなければそのシートを削除。 という作業をＶＢＡでやろうと思って以下の通りＶＢＡを記述したのですが、...
View ArticleOpenメソッドについて
ブックＡのSheet1にあるセルのデータをブックＢのSheet1のセルにコピーするために、以下のようにOpenメソッドを使ったＶＢＡを記述してみたのですが、エラーコード1004「指定されたファイルが存在しません」のようなエラーメッセージが出てきました。Openメソッドが使われている例を見ているとどうやらブックのあるフォルダを指定しているような感じがするのですが、Openメソッドは具体的に該当のブック...
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