三流君VBAで Access から Excel 連携

概要説明とリンク

概要を見て、これは？と思ったら、タイトルをクリックして本文を読んでください

[No.2 AccessからExcel出力]
で、
・ウィザードを使ってたサンプルを作れることを説明
・マクロ記録でExcelの操作をVBAにする
・頭にオブジェクト変数を付けてAccessからExcelを操作
を簡単に説明しました。

[No.7 ＭＤＢと同フォルダのExcelファイルを開く]
では、
CurrentDb.NameからMDBの位置を取りだし、
相対位置（同じパス）のExcelファイルを開きました。

[No.13 Excel セルに名前を付けてみる]
では、
Accessから名前付きのセルにデータをセットして、
変更が少ないシステムについて説明しました。

[No.14 Excel 隣のシートを参照して逃げる]
では、名前付きのセル参照から、一歩後退?一歩進んで、
データシートと表のシートを分け、データはデータシートにセット、
データシートを参照して表を作りました。

[No.48 AccessからExcelブックを開き、書式設定を行う]
では、
AccessからExcelブックを開き、
objEXCEL.Selection.Style = "Comma [0]"
objEXCEL.Selection.NumberFormatLocal = "0.00_ "
で書式設定を行うサンプルを解説しました。

[No.54 AccessからExcel開いて、処理終了後に閉じたい]
では、
.RunでExcelのVBA関数を呼び出し、処理後、
oApp.ActiveWorkBook.Close SaveChanges:=False
oApp.Quit で終了する処理を解説しました。

[No.58 Access クエリーを Excel既存シートへエクスポート]
DoCmd.TransferSpreadsheet acExportを使用して、Excelへ出力。
いろいろとやってみたがしっくりいかなかった。

[No.59 Excelのマクロ付きフォーマットを壊されないように]
では、
ActiveWorkbook.SaveAs FileName:="XXXXXX"
と別名に保存して、元ファイルを壊されない小細工を説明しました。

[No.64 AccessからExcelファイルを開いて・印刷して・閉じたい]
Excelでやりたい操作をマクロ記録して、
Workbooks.Open ActiveWindow.SelectedSheets.PrintOut ActiveWorkbook.Close
を探り、開いて、印刷して、閉じました(笑)

[No.93 Access2000 ADOでクエリーのレコードを参照 Excelへ出力]
Dim rs As New ADODB.Recordset
rs.Open "Q_顧客情報", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
なんて感じで、ADOでクエリーを開き、Excelへ自分で転記した。

[No.100 AccessからExcel 分類別のシートへデータを転記してみる]
データを分類別にExcelのシートに転記してみました。
(セリーグの打撃成績データをチーム別のシートに転記しました

[No.130 Access クエリーをExcelシートへ10行x3列で出力する]
クエリーで集計した結果をExcelのシートへ出力してみました。
出力時、10行x3列で出力してみました。

↑出力イメージ

[No.131 Access クエリーをExcelシートへ罫線を付けて出力する]
罫線付で、データをExcelへ出力してみました。

[No.138 AccessからExcel出力、色・列幅・行の高さを調整する]
AccessからExcel出力時に
背景色 .Cells(nYLINE, nXLINE).Interior.ColorIndex = 33 'スカイブルー
列幅 .Columns(nXLINE + 1).ColumnWidth = 8.5 など
行の高さ .Rows(nYLINE).RowHeight = 25 など
を調整しました

↑出力イメージ

[No.139 AccessからExcel出力、複数クエリーを１シートへ]
複数のクエリーを色を変えてExcelのシートへ出力してみました

↑出力イメージ

AccessからExcel セルの範囲指定と結合
.MergeCells = Trueでセルを結合させてみました。
i = 10 '10列目の１行目と２行目を連結列にする
oApp.Range(oApp.Cells(1, i), oApp.Cells(2, i)).MergeCells = True
oApp.Cells(1, i) = "連結されたかなぁ？"

最近発売の雑誌を紹介する

パソコン雑誌です。息抜きや空いた時間に読んで見ては？

ページフッター(リンクなど)

[三流君(TOP ken3.org へ戻る)]
-- [VBA系TOPへ]
---- [VBA系バックナンバー目次へ移動]
------ [VBAでIEを操作 CreateObject("InternetExplorer.application")]・・・実は当店一番人気、VBAでIEを操作するサンプルです
------ [VBAでOutlookの操作 CreateObject("Outlook.Application")]・・・Outlookを使い、メール関係の処理です
------ [Access から Excel 連携 CreateObject("Excel.Application")]・・・人気のAccessからExcelへデータ書き出しなどです
------ [AccessのUserForm/サブフォームを操作]・・・アクセスでフォームを使ったサンプルです
------ [Accessのレポートを操作]・・・レポートを操作してみました
------ [Access クエリー関係やその他関数]・・・あまりまとまってませんが、スポット的な単体関数の解説です
------ [Excel UserForm(ユーザーフォーム)を操作する]・・・エクセルでユーザーフォームを作成して入力などを行ってます
------ [ExcelからAccessを操作する]・・・ExcelからAccessのマクロを起動してみました、
------ [Excel関係関数、その他]・・・その他Excel関係です
------ [VBAでテキストファイル(*.txt,*.html,*.csv)の操作]・・・テキストファイルを使ったサンプルです
------ [VBA 標準関数関係とその他解説]・・・その他、グダグタ解説してます

blog
-- [三流君の作業日記] ← 日々の作業を少々
-- [通販あしあと] ← 通販ページの足跡を一覧で羅列

書籍の購入

Webだけじゃさすがに勉強しきれないので、プログラミング関係の書籍も読んでみては？？

コンピュータ書籍の発送がハヤイ専門店

コンピュータの本・専門店

※種類が豊富で探し易いです。※在庫ありが48時間以内発送が急ぎで資料や書籍がほしい時、とても助かります。
お奨め本の目次を見るだけでも勉強になったり

amazon.co.jpでキーワード別チェック

下記、私が設定したキーワードですが、こんな感じで資料や書籍を探ってみては？
[VBA全体を把握する] -- やはり全体をさらっと見たいですよね。
[SQL関連でＤＢ力UP] -- システムはデータベース設計が重要
[ADO接続を探る] -- VBAなのでADO接続を押さえておく
[Windows APIを探る] -- さらにAPIになて知ってれば強力だ！
[.NETを探る] -- と言っても時代は.NETに流れてるし
プログラミング以外でも知りたいことは多くって、
[人間関係] -- で、客先・上司、まわりに気を使い。
[プログラマーの自己啓発] -- プログラムだけじゃなくいろいろと向上したいよ
[コーチング・育成] -- 先輩になったら後輩(部下)の面倒をみてね。
そんなこんなでプログラマーっていろいろと大変なんだってば・・・

2008/05/15 12:50:21