Windows Script Hostは、スクリプ
Windows Script Hostは、スクリプト言語なのでしょうか？ Sub Sample() Dim WSH As Variant Set WSH = CreateObject("Wscript.Shell") Debug.Print WSH.SpecialFolders("Favorites") Set WSH = Nothing End Sub...
View ArticleVBA詳しい方お願いします！！
下のコードをブック・シート名指定なしでフォルダから転記したいです。 詳しくは下記URLに記載。 http://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q12159449297 ___________________________________________________ Sub データ取込メイン() Dim sheetobj As...
View Articleエクセルでマクロを組み始めたばかりのため、皆様にご
エクセルでマクロを組み始めたばかりのため、皆様にご教授頂ければと思います。 今開いているシートに転送ボタンを作成します。このシートのセルC4からC27までデータ(言葉や数値など)を、ボタンを押して、デスクトップ内の「マクロ」というブック、「記録用紙」名のシートにB列に横へ(B4,C4…)、毎日データ転送しようと思います(4行目,5行目…)。 その際、転送先はシート保護をしておきたいのです。...
View ArticleVBAでtextファイルを作成
マクロ・VBA初心者です。 ご教授お願いします！！ 経費精算のExcelデータを画像のような「"",]で区切ったテキストファイルを作成するマクロを作りたいと考えてます。 完成イメージ：マクロのボタンを押すとテキストファイルの形でフォルダに作成される。もしくは、マクロボタンを押すとテキストファイルの形で区切ったものが表示されるものを作りたいです。...
View ArticleVBA(1つのファイルに転記する方法）
〈フォルダ内のファイル名に限らず、2種類のファイルを1つの集計用ファイルに集計し、それぞれ別々のシートの転記するマクロ。〉 マクロ・VBA初心者です。 ご教授、宜しくお願いします。 上記の動作を行うVBAコードを教えていただけたら幸いです。 ■詳細 社員から経費精算書・交通費精算書のファイルをもらい一つのフォルダーに入れた状態で集計用のファイルに転記する） 経費のデータは→経費用データのシート...
View ArticleVBAを使ってcsvファイルをアップロードする方法
エクセル2013のVBAを使用して下記のコードを入力し、自動ログインまでは出来ました。 ログイン後、指定のフォルダにあるcsvファイルを自動で取込みたいのですが、コードがわかりません。。 ------------------------------------------------ Sub 自動ログイン() Dim objIE As Object Dim obj As Object Set...
View Articleアクセステキストエクスポートについて。
アクセスでエクスポートする際に フィールド開始位置が有効ではないとなり テキストのアウト出来ない場合 下記の DoCmd.TransferText acExportDelim, , "ファイル名クエリ", "C:\Documents and Settings\Administrator\デスクトップ" & "\" & "ファイル名.csv", True End Sub...
View ArticleExcelからPPTを操作する際のコピペオプション
はじめまして。 現在VBAにて、ExcelからPPTを操作するマクロの改修を行っています。 内容としては、Excelにて指定された既存のスライドを新規PowerPointへコピーするといったものです。...
View Article実行時エラー 2001
http://officetanaka.net/excel/vba/vbe/05.htm を参考に VBAコードを取得したいのですが Declare Function GetTickCount Lib "kernel32" () As Long Public sampledata As String Sub Sample9() Dim Code As String Code =...
View ArticleＶＢＡ Ｄｏ…Ｌｏｏｐについて
お世話になっております。 ただいま、アクセスＶＢＡにてＤｏ…Ｌｏｏｐの練習をしております。 テキストボックス１に数字を入れ、コマンドボタンを押すと入力した数字が１ずつ引かれる形でテキストボックス２に入るようにしたいです。 （テキストボックス１に「８」→テキストボックス２に「８７６５４３２１」のように） Dim I As Variant I = Me.text1.Value...
View Articleエクセルでマクロを組み始めたばかりの者です。下記の
エクセルでマクロを組み始めたばかりの者です。下記のようなマクロを組んでみましたが、27行目もしくは41行目のActiveSheet.Pasteで「実行時エラー‘1004‘： 変更しようとしているセルまたはグラフは保護されているため読み取り専用となっています…」というエラーメッセージが出て止まってしまいます。...
View Articlevbaについて。
お世話になっております。 ＡｃｃｅｓｓＶＢＡの初心者です。 subプロシージャのボタンクリックイベントから共通モジュール（Public）の動作を呼び、変数の加減乗除の計算をさせたいです。 共通モジュールの中をif文にする時、if「（subプロシージャの）ボタンが押された」時という記述はどのようにすれば良いでしょうか。 よろしくお願いします。
View Articleエクセル VBAのオートフィルター実行時エラー
エクセル VBAのオートフィルター実行時エラーについて教えて下さい VBAのオートフィルター実行時エラーで「’rangeクラスのAutoFilterメッソドが失敗しました’」 が表示されるのですが、エラーの内容がわかりません。教えて下さい。 Sub 複数条件でのデータ抽出() Const OrigSheetName = "データベース" Const PasteSheetName = "検索＆抽出"...
View Articleエクセル VBAのオートフィルター実行時エラー
VBAのオートフィルター実行時エラーで「’rangeクラスのAutoFilterメッソドが失敗しました’」 が表示されるのですが、エラーの内容がわかりません。教えて下さい。 Sub 複数条件でのデータ抽出() Const OrigSheetName = "データベース" Const PasteSheetName = "検索＆抽出" Const ItemRow = 2 Const...
View Article他のブックの複数シートの〇記号の串刺し
エクセルで次のような表のデータが１ヶ月分、31日分あり ます。すなわち31枚のシートに同じ表で中の○× の内容が違うデータがあります。〇×は単純に「まる」「ばつ」と入力して変換したものです。 ア イ ウ エ オ (1) 〇 × × 〇 〇 (2) 〇 × 〇 〇 × (3) × 〇 〇 〇 × (4) 〇 〇 × × 〇 そして〇をゼロ、×を1と数えて、...
View ArticleVBAによる在庫管理について
Sheet1のA1セルからE1セルまで「品名」、「単価」、「単位」、「在庫数量」、「備考欄」が記入されております。10000品目の在庫管理に使用しております。 Sheet2においてinputboxを使用し品名を入れるとSheet1のA1セルを起点とした表のA列「品名」から部分一致で検索し、検索結果のA列からE列までのデータをSheet3に表示するという構文を教えていただけると幸いです。...
View Articlewindows10◇free macroについて
様々試しましたが、 windows10において、free macroというアプリケーションを使用したいのですが、 動かそうとするとjournal hookを作成できませんというエラーが出てしまい、 一切動かすことができません。 ほかのソフトはかなり使いづらく、このアプリケーションがどうしても必要なのですが、 このアプリケーションをどう動かすのかご存知の方がいらっしゃいましたら、...
View ArticleVB2015 ChartControlについて
お世話になります。VS2015のVBでChart Controlを使っていますが、散布図描画で、独自の MakerImageを使いたいのですが、 Chart1.Series(1)..MarkerImage= で、指定出来るのは直接マーカー画像のPathだけのようですが、 PictureBox1.Image 等のように画像Image等を指定する方法はないでしょうか？...
View Articlepdfのあるページを移動させたい
お世話になっております。 早速ですが、 pdfファイル内のあるページをVisualBasicを使って移動させたいのですが出来るでしょうか？ 例えば、5ページ目を1ページ目に移動させるとかです。 お分かりの方おりましたらご協力よろしくお願いいたします。
View Article