EXCELファイルの表をロータスノーツのデータベースに流し込む、というのはできるでしょうか。
「流し込む」というのは、ファイル読込等の一括した方法で、ということです。
できそうな気がするのですが教えて下さい。

このQ&Aに関連する最新のQ&A

A 回答 (4件)

再び登場しました。



基本的な詳しい流れは、R4.6で以下の通りです。

0.まず、Excelの表ををカンマで区切ったテキスト形式で保存し、
  列に対するフィールドとの対応の説明ファイル(拡張子 .COL)を作成します。
(通称.COLファイル)
1.データベース開いて、ソースデータを呼び出すビューを開きます。
  文章(Form)に流し込みたいフィールドが全部記述されているビューにします。
2.[ファイル - 呼び出し] を選択する。
3.[Tabular Text] を選択する。
4.ソースファイルの名前を選択する。
5.[呼び出し] をクリックします。
6.呼び出されたソースデータに適用するフォームを [使用フォーム] リストから選択する。
7.ヘッダ、フッダがある場合は、[ヘッダー行数] または [フッター行数] を選択する。
  (要するに注釈行のことです)
8.ソースファイルに [1ページの行数] の数値を入力する。
9.[形式:] リストは [主要文書] が選択された状態にしておく。
10.[形式ファイルの使用] を選択し、列の説明ファイル(.COL)を選択する。
11.[OK] をクリックします。

となります。
.COLファイルの作り方などはHelp Fileに書いてあります。
Help Fileは、
「ノーツの基本」から、「データベースの開発及び管理」の下にある、「ビューへ呼び出す/ビューから書き出す」の項目を探してみて下さい。
その中に、「表形式テキストをビューへ呼び出す」「列の説明(COL)ファイルを作成する」等の項目があると思います。

バージョンが違うとまたちょっと違うかもしれませんが、多分似たようなものがあるはずです。

では。
    • good
    • 0
この回答へのお礼

ありがとうございました。
お礼が大変遅くなり申し訳ありませんでした。

お礼日時:2001/07/12 08:48

ええとですね、今手元に資料がないので、すぐに具体的には答えられないのですが、一応流れだけ。



Excelの表は、テキストの形式で保存します。
で、データベースのフィールドに合わせたCOLファイルを作ります。
あとは、読み込んであげれば良いです。

私も一度だけやったことがあるのですが、数年前のことでほとんど頭から消し飛んでいます。
最近のパージョンでは試していませんが、多分まだ出来ると思います。

すいません。答えになってなかったですね。
今日は調べられないので、明日以降にまたわかったら書き込みますね。
それまでに、回答が得られれば良いのですが。

では。
    • good
    • 0

Notes側のDB内の文書のfieldがテキストのものであれば、Excel側でCOPYしてからNotes側で「形式を選択して貼り付け」を選ぶことで、Excelのオブジェクト、ビットマップ、リッチテキストでPasteできます。


でも、表内の各データを各Notesのfiledへとなると、一つのセル毎にCopy&Pasteするしかないのでは・・・・・

ちなみに私は、Excel97
LotusNotes R4.57の環境です
    • good
    • 0
この回答へのお礼

ありがとうございました。
お礼が大変遅くなり申し訳ありませんでした。

お礼日時:2001/07/12 08:49

>ロータスノーツのデータベース


ノーツのDBと言うのが今一つイメージ湧かないのですが?
Oracleでかそれとも他のDBをお使いでしょうか?
    • good
    • 0
この回答へのお礼

ありがとうございました。
お礼が大変遅くなり申し訳ありませんでした。

お礼日時:2001/07/12 08:49

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qテキスト形式(.txt)をエクセルで読み込むときに1桁目の「0」を読み込みたい

タブ区切りで作成されたテキストデータがあります。

これをエクセルで読み込むと、タブ区切りからセル区切りに自動的に変換されますが、
テキストに「0」から始まるデータがある場合、エクセルに変換されると数値として読み取ってしまうので、2桁目以降の0以外の数字を1桁目として認識してしまいます。

つまり、
「テキストデータを「文字列」のデータとしてエクセルで読み取る」
方法を探しています。

ご存知の方、教えてください。
よろしくお願いいたします。

Aベストアンサー

テキスト ファイル ウィザードの3/3のところで、
[列のデータ形式]を[文字列]にしてみてください。

QTXTファイルデーターをEXCELで読み込む

Aというテキストファイルがあります。
そのファイルのは、
1 12 123 1234
という様なスペースで分けられた文字列が並んでいます。
これを、新規作成したEXCELファイルで読み込みたいのですが、出来ますでしょうか?
現状は、テキストファイルをスペース区切りでEXCELに変換しているのですが、ファイル量が多くなりそうで手間がかかります。
ですので、テキストファイルから直接読み取りEXCELに貼り付けたいのです。(自動リンクのイメージでリンク元がAというテキストファイル)

以上、ご教示お願い致します。

Aベストアンサー

#8 です。

データの様子や動作仕様で不明な点はありますが、とりあえず現状の VBA
コードをアップしてみます。

リンクってのがよく分かりませんが、テキストのインポートでやりました。

下記のコードを実行すると、次の動作を行います。

1. このコードが書かれた同一フォルダ内の D*.txt をDOSコマンドで連結
  し、ファイル MergeData.txt に出力します。
2. MergeData.txt のデータを行単位でメモリ上に読み込みます。
3. 2.をアクティブシートのセルに展開します。
4. 最後にスペース区切りで各要素をセルに分割します。

なお、動作確認は WindowsXPsp2 + Excel2002sp3 の環境です。

30個程度のファイルなら、ループで回しても良かったのですが、何となく、、

ちなみに、テキストファイル毎に1枚のシートであれば、これはボツですね。

Option Explicit

Declare Function SetCurrentDirectory Lib "kernel32" _
  Alias "SetCurrentDirectoryA" _
  (ByVal lpPathName As String) As Long

Sub InportTextFile_Sample()
  
  Const ForReading& = 1, ForWriting& = 2, ForAppending& = 8
  Const BufSize& = 2000 '2000行
  
  Dim objShell As Object
  Dim FS    As Object, TS As Object
  Dim Buf()  As String
  Dim i    As Long
  Dim strPath As String
  
  'カレントディレクトリー設定
  strPath = ThisWorkbook.Path
  SetCurrentDirectory strPath
  
  'テキストファイルマージ
  Set objShell = CreateObject("WScript.Shell")
    objShell.Run "%ComSpec% /c COPY /b D*.txt MergeData.txt", 0, True
  Set objShell = Nothing
  
  'データバッファ
  ReDim Buf(BufSize)
  strPath = strPath & "\MergeData.txt"
  Set FS = CreateObject("Scripting.FileSystemObject")
  Set TS = FS.OpenTextFile(strPath, ForReading)
    Do Until TS.AtEndOfStream
      Buf(i) = Trim$(CStr(TS.ReadLine))
      i = i + 1
      If i > 65536 Then Exit Do
      If Not i Mod BufSize Then
        ReDim Preserve Buf(i + BufSize)
      End If
    Loop
    ReDim Preserve Buf(i)
    TS.Close
  Set TS = Nothing: Set FS = Nothing
  
  'セルに書き込み
  Application.ScreenUpdating = False
  ActiveSheet.Range("A1") _
    .Resize(UBound(Buf) + 1).Value = Application.Transpose(Buf)
  
  'バッファクリア
  Erase Buf
  
  'ソートするならここに書く
  
  '要素分割(SP区切り)
  ActiveSheet.Columns("A:A").TextToColumns _
    DataType:=xlDelimited, _
    TextQualifier:=xlDoubleQuote, _
    ConsecutiveDelimiter:=True, _
    Space:=True

  Application.ScreenUpdating = True
  MsgBox "終了しました.", vbInformation

End Sub

#8 です。

データの様子や動作仕様で不明な点はありますが、とりあえず現状の VBA
コードをアップしてみます。

リンクってのがよく分かりませんが、テキストのインポートでやりました。

下記のコードを実行すると、次の動作を行います。

1. このコードが書かれた同一フォルダ内の D*.txt をDOSコマンドで連結
  し、ファイル MergeData.txt に出力します。
2. MergeData.txt のデータを行単位でメモリ上に読み込みます。
3. 2.をアクティブシートのセルに展開します。
4. 最後にスペース...続きを読む

Q○行おきにデータを読み込む

エクセルのデータで7行おきにデータを読み込んで、空白を詰めて隣または別のシートに書きこんでいきたいのですがどうしたらいいでしょうか。

分かりにくい質問ですが、要するに7行おきに書かれているところのデータが欲しいのです。

←わかってもらえたでしょうか。

大変困っています。
よろしくお願いします。

Aベストアンサー

スマートな方法が思い浮かばないんですが、
例えば一番左に1列挿入します。
挿入した列に、上から














のように7個ごとに印をつけます。
印は、何でも構いません。アルファベットでも数字でも
お好みの物を使用してください。

で、メニューのデータ→フィルタ→「オートフィルタの設定」
で大丈夫だと思います。
オートフィルタでダメなら、「フィルタオプションの設定」の方で試してみてください。

ポイントは、7個ごとに印をつけて、フィルタです。

それぞれの機能でわからなければ、また質問してみてください。

Qアクセスでホームページのデータを読み込むこと出来ますか?

Access97です。ホームページにあるデータを読み込むことは出来るのでしょうか?例えば、DAOを使ってとか。
もし、Access97は無理であれば、Access2003の場合はどうでしょうか?
今までは、ホームページのデータをマウスでコピーしてエクセルに貼りつけて、これを使っていました。
やはり、アクセス化したいと思います。エクセルのデータをアクセスに移せばいいですが、こういう手間をしなくても、ホームページのデータを直接アクセスに読み込むこと出来ないものかと思いました。

以上、よろしくお願い致します。

Aベストアンサー

こんにちは。

固定したWebページでしたら、

Set IE = CreateObject("InternetExplorer.Application")
または、
Dim IE As New InternetExplorer
(要:参照設定-Microsoft Internet Controls)

で、
IE.Document.all または、IE.Document.body.innerHTML (innerText)

で、切り分けて、取り出したら、ADO に渡せば、取れると思いますね。

Access2003 に、そういう機能があれば、また別ですが。

QACCESS2000でテーブルをVBAからテーブルを読み込む方法

ACCESS2000を使っています。
以下の指定をした場合、「ユーザ定義型は定義されていません」のメッセージが出て、コンパイルが通りません。
なにかインストールや設定が必要なのでしょうか?

Dim db As Database
Dim rs As Recordset

Set db = CurrentDb()
Set rs = db.OpenRecordset("テーブル名", dbopendynaset)

ヘルプ等を自分なりに参照してみたのですが、わかりません。教えてください。

Aベストアンサー

DAOの参照設定が、されていますでしょうか?

モジュールウィンドウを開いて、ツール→参照設定で、
Microsoft DAO 3.* Object Library がチェックされていないようでしたら、チェックしてみください。

今、Access2000が手元にないので自信がありませんが、Recordsetは ADO でも使えるようですが、Database はDAO のオブジェクトかと思います。


このQ&Aを見た人がよく見るQ&A

このカテゴリの人気Q&Aランキング

おすすめ情報