18
2月
bit型のはNULLは許容してはいけません。
うっかり設定を忘れてしまうとリンクテーブルを直接編集できなくなります。
ということでbit型はNULL許容のチェックは外しておいた方が良いと思います。
14
2月
既存のシステムから計画のレコードを抽出し、Projectでデータを作成する
プログラムを作ることになった。
やり方は以下。
プロジェクトが開いてからの値の設定は実際はレコードを取得後、ループさせることになる。
今はとりあえずこれで。
このコードでとりあえずAccessやExcelやVBの標準モジュールにコピーして
実行可能（注：要Microsoft Project 2003）
‘/*
‘ 【ProjectをAccessから作成する】
‘**/
Private Sub project_test()
‘オブジェクト変数をセット
Dim pj As Object
‘クラスを指定しオブジェクトを作成する
Set pj = CreateObject(”MSProject.project”)
‘プロジェクトを表示
pj.Application.Visible = True
‘規定のファイルを開く
pj.Application.FileOpen “C:\Project1.mpp”
‘プロジェクトの開始日を設定する。
ActiveProject.ProjectStart Format(Now, “yyyy/mm/dd”)
’実際はここでレコード抽出
‘以下はループする部分
SelectTaskField Row:=0, Column:=”タスク名”
SetTaskField Field:=”タスク名”, Value:=”77000″
SelectTaskField Row:=0, Column:=”期間”
SetTaskField Field:=”期間”, Value:=”5″
SelectTaskField Row:=0, Column:=”開始日”
SetTaskField Field:=”開始日”, Value:=”2006/02/13″
SelectTaskField Row:=1, Column:=”開始日”
End Sub
