Office TANAKA - Excel VBA Tips[マクロで参照設定を操作する]
VBAの参照設定を操作するときは、VBEの[ツール]-[参照設定]を実行して[参照設定]ダイアログボックスを開きます。ここで、参照設定したいライブラリにチェックを入れると、VBAからそのライブラリを利用できるようになります。 参照設定されているライブラリの情報は、Referencesコレクションで取得できます。次のコードは、アクティブブックで参照設定しているライブラリの情報を表示します。 Sub Sample1() Dim Ref, buf As String For Each Ref In ActiveWorkbook.VBProject.References buf = buf & Ref.Name & vbTab & Ref.Description & vbCrLf Next Ref MsgBox buf End Sub 参照設定を追加するには、ReferencesコレクションのAd
VB6・VBAメモ：逆正接(アークタンジェント) | フィロの村note
'機能：逆正接関数 '引数：Number：正接(Tan) '戻値：ラジアン Function Atn2(X As Double, Y As Double) As Double If X = 0 And Y = 0 Then Atn2 = 0 ElseIf X > 0 And Y = 0 Then 'θ=0 Atn2 = ((PI / 2) * 0) ElseIf X = 0 And Y > 0 Then 'θ=90 Atn2 = ((PI / 2) * 1) ElseIf X < 0 And Y = 0 Then 'θ=180 Atn2 = ((PI / 2) * 2) ElseIf X = 0 And Y < 0 Then 'θ=270 Atn2 = ((PI / 2) * 3) ElseIf X > 0 And Y > 0 Then ' 0<θ<90 Atn2 = Atn(Abs(Y)
ユーザーフォームを利用する:Excel VBA入門
ユーザーフォームの作成 topへ [開発]タブの[Visual Basic]をクリックして、VBE(Visual Basic Editor)を起動します。 または、ショートカットキー [Alt]+[F11]でVBEを起動します。 ツールバーの[ユーザーフォームの挿入]→[ユーザーフォーム]を実行します。 UserForm1が挿入されます。 大きさはUserForm1の周囲に表示されるハンドルをドラッグして調整します。 コントロールの配置・追加 topへ ツールボックスで使用するコントロールを選択し、UserForm1へ配置します。 ツールボックスが表示されていない時は [表示]→[ツールボックス]で表示します。 テキストボックスとコマンドボタンを配置します。 ツールボックスからテキストボックスを選択してUserForm1へ配置しました。 ツールボックスからコマンドボタンを選択してU
VBA基本(ユーザーフォームの作り方)
「ユーザーフォーム」とは何でしょう。 「ユーザーフォーム」というのは、Excelの「ツール」メニューの「オプション」を選択すると表示される、固定ダイアログと言われる種類のフォームウィンドウを自由にデザインして作成し表示利用できる機能です。 「入力画面」としたり、一括処理の起動条件の「指定画面」としてマクロ上で利用します。但し、「入力画面」としては、ワークシート自体が本来は入力画面なので機能としては重複しており、この要件では必須となるものではないという考え方もあると思います。 VBE上からユーザーフォームをプロジェクトに追加します。 この画像は新規ワークブックから行なっています。(VBEのツールバーは非表示にしています) VBEのプロジェクトエクスプローラでプロジェクトを右クリックして「挿入」→「ユーザーフォーム」を選択すると「ユーザーフォーム」が挿入され利用できるようになります。 追加され
全ては時の中に… : 【VB.NET】VB.NETからExcelのVBA（マクロ）を実行し、戻り値を受け取る
2007/11/1322:15 【VB.NET】VB.NETからExcelのVBA（マクロ）を実行し、戻り値を受け取る 以前の記事でExcel VBAの実行方法について説明したが、内容が不十分だったので、その続きを… 前回は、単純に実行するだけで戻り値を返さないSubステートメントの説明であったので、今回は、戻り値を返すFunctionステートメントの利用方法について説明する。 ExcelファイルにVBAを記述する方法は、以前の記事を参照のこと。 【Functionステートメントの利用手順】 1.Excelファイルを作成する。 2.Excel VBAでFunctionステートメントを作成し、戻り値の型を決定する。 3.2で作成したFunctionステートメントの戻り値に合う変数を宣言する。 例）VBA側の戻り値がVariant型の場合、VB.NETではObject型を用意する。 4.Exc
VBA資料編１ 組み込みダイアログボックス一覧
personal.xls に限らず、EXCEL VBAでマクロプログラムを記述する際に便利な機能として、組み込みダイアログボックスというものがあります。組み込みダイアログボックスについては、モーグ スキルアップ講座 ExcelVBA上級テクニック 第6回「ダイアログボックスを使った対話型マクロの作成」に詳しく解説されている（特に2/5ページ以降）ので、そちらを参照してください。 組み込みダイアログボックスは、 Application.Dialogs(ダイアログボックス定数).Show という呼び出し方をします。 上記リンクのモーグのページ中にも記載されているように、ヘルプにダイアログボックス定数と引数の一覧は載っています（下図）。しかし、このダイアログボックス定数を見ただけでは、どんな機能を持った組み込みダイアログなのかが分かりづらいため、求めるダイアログボックスを探し当てるの
PDFをEPSに変換する方法（Excel VBAサンプル） | PDF
TOP > サンプル / 関数 > * [...] Method of conversion from PDF to EPS. 説明 Acrobat PDF を EPS ファイルに変換します。 Acrobat OLE のJSObject とExcel VBA OLE の機能を利用します。 サンプル：ExcelのVBA F8キーでステップ実行しながら動作確認出来ます。参照設定を事前にする。 001 Option Explicit 002 003 Sub CommandButton9_Click() 004 005 Dim objAcroApp As New Acrobat.AcroApp 006 Dim objAcroAVDoc As New Acrobat.AcroAVDoc 007 Dim objAcroPDDoc As Acrobat.AcroPDDoc 008 Dim lR
Office TANAKA - Excel VBA Tips[ファイルを検索する]
Excelは表計算ソフトですから表だけ計算してればいいんですが、ときには「何でExcelでそんなことまでするの？」ということもあります。まあ、Excelでゲーム作ったりしてる私が言えるセリフではありませんけど…。 それでも、Excelでちゃんとしたシステムを作ろうとしたら、表の計算以外にもたくさんの機能が必要になります。ここでは、ファイルを検索するテクをご紹介しましょう。きっと何かのときに役立つと思いますよ。 ファイルを検索するにはFileSearchオブジェクトを使います。厳密に言うとFileSearchオブジェクトはExcelのオブジェクトではなく、Officeシステム全体のオブジェクトです。ここでは、検索した結果をシートに出力していますが、UserFormを使っても便利ですね。 【追記】 Excel 2007からは、FileSearchオブジェクトが使えなくなりました。Excel 2
Office TANAKA - Excel VBA Tips[実は奥が深いInputBox]
マクロ実行中にユーザーから文字列や数値を受け取るとき、最も簡単な方法のひとつはInputBoxを使うことです。次のコードは、ユーザーに名前を入力してもらい、入力された文字列をセルA1に書き込みます。 Sub Sample1() Dim buf As String buf = InputBox("名前を入力してください") Range("A1") = buf End Sub 特に難しいテクニックでもなく、ややもするとVBAの解説本でさえ紹介されないこともある基本ワザですが、実はこのInputBoxは意外と奥が深いんです。 InputBoxは2つある まず衝撃的な事実からお話ししましょう。Excel VBAで使えるInputBoxには次の2種類があります。 InputBox関数 ApplicationオブジェクトのInputBoxメソッド ひとつはInputBox関数です。文字列の左端を抜き出
AB型の変わり者 三流プログラマー Ken3のＨＰ
挨拶・自己紹介:失敗続きのAB型の変わり者 三流プログラマー Ken3です。 ※フリーのエンジニア・個人事業主です・・と書くと聞こえはイイが(それとなくカッコよく聞こえるが)、 最近は実力不足を痛感しながら細々と暮らしてます。 近況: なかなか再起動できないで、ダラダラ日々を過ごしていたり。 少し難しいと感じたら、仕事を受注しなかったりで、最近、弱腰でビビってます・・・ ダミーフォームです、押しても無反応なのでよろしく。 コロコロ変わる呼び名、初めはKen3 から 今は三流君、未来は？ AB型の変わり者(と書くと血液型で決め付けるなとお叱りを受けたり)、 三流プログラマー(と書くと初心者の人からスゴイですと言われ舞い上がったり(笑)) Ken3: メールアドレスを名前のKenjiやKenで取ろうとしたら取れなくて、Ken2→×でKen3になったそんな感じです。 学生時代にケンさんと呼ばれて
VBAではじめるAutoCADカスタマイズ
■ はじめに 前回は、AutoCADとExcelが互いに連携して動作するプログラムの例として、ユーザーがAutoCAD上で選択した複数のポリラインの頂点座標とその面積をExcelのワークシートに書き出すプログラムを作成してみました。連載最終回となる今回は、操作する側とされる側を交代し、Excel VBAからAutoCADを操作するプログラムを作成してみます。ActiveXオートメーションに対応したアプリケーション同士であれば、操作する側がExcel VBAに代わってもほとんど同じ手順、プログラムコードで作成できることがわかると思います。 ■ プログラムの概要 今回作成するプログラムは、AutoCADのモデル空間にExcelのワークシート上に入力されたX, Y座標値を頂点とするポリラインを作図するというものです。前回とは異なり、すべてのプログラムコードをExcelのVBエディタ上で入力
第6回 指定フォルダ内のファイル名一覧をExcelに書き出す
■ Microsoft Excel 2000/2003（FileSystemObjectが使えるWindows）。うまく動作しないときはWSHをバージョンアップしてみてください。 プログラミングをしていると，「プログラム・ファイルの構成一覧をExcelで用意してくれ」と言われることがよくあります。手作業だと面倒なんですよね，こういう作業。で，ExcelのVBA（Visual Basic for Applications）を使う方法を紹介しちゃいます。マクロだったら記入漏れやミスタイプもありません。 今回作成するファイル一覧生成マクロは，Excel/VBAを使って，指定されたフォルダ（ディレクトリ）にあるファイルの名前とファイル種別，最終更新日，コメント用の空欄を自動で生成します（図1[拡大表示]）。大量のHTMLファイルや画像ファイルを扱う，PHP，PerlなどのWebプログラマの方なら，
Office TANAKA - TreeViewコントロールの使い方[ノードの登録]
TreeViewコントロールにツリー形式で表示される各データのことを「ノード」(Node)と呼びます。ノードを登録するには、NodesコレクションのAddメソッドを使います。 TreeView.Nodes.Add [Relative], [Relationship], [Key], [Text], [Image], [SelectedImage] 引数Relativeには、Addメソッドで登録するノードが「どの親」の子供になるかを指定します。たとえば下図のようなツリーでは、「田中」の親は「氏名」になります。また「趣味」と「特技」の親はどちらも「田中」です。 そこで、「田中」「趣味」「特技」の各ノードをAddメソッドで登録する考え方は、次のようになります。 TreeView.Nodes.Add "氏名", [Relationship], [Key], "田中", [Image], [Sele
Excelでファイルの一覧情報リストを取得する
解説 例えば、ファイル・サーバ内のユーザー・ドキュメントを整理したいと思った場合、エクスプローラやファイル検索機能だけでは、どのファイルが必要で、どのファイルが不要なのか判断するのは簡単ではない。可能ならばファイルの一覧リストを取得して、判断したいところだが、Windows標準のエクスプローラは、あるフォルダの下にあるファイルの一覧を取得してリストにするような機能は持っていない。しかし、本サンプルを利用することで、ファイル・サイズや最終アクセス日などの主要情報をExcelワークシートとして取り込むことができる。これを使って、一定サイズ以上のファイルを降順にリストアップしてユーザーにアーカイブ化を求めたり、一定期間アクセスされていないファイルを削除する場合などの分析資料として利用することができるだろう。サーバ管理者の簡易な監視ツールとして役立ててほしい。
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
kndb.jp
http://www2.odn.ne.jp/sailing/exceldll.htm
techbank.jp - このウェブサイトは販売用です！ - techbank リソースおよび情報
VB 実技２ フォルダ情報一覧 - フォルダのサイズを取得して一覧表示する
VB フォルダツリー
http://www.asahi-net.or.jp/~zn3y-ngi/YNxv133.html