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ノーツのメール受信通知機能

ノーツの”ユーザープリファレンス”- ”新規メールの通知”- ”ダイアログボックスの表示”にチェックを入れメールが受信されたときにダイアログボックスを表示させるようにしていますが、
Win95+R4.51環境では、ノーツ起動+Wordがアクティブ状態でも、メールを受信するとノーツがアクティブとなって、ダイアログボックスが表示されましたが、
WinXP+R4.67環境では、ノーツ起動+Wordがアクティブ状態で、メールを受信しても、タスクバー上のノーツのバー?が青くなるだけで、ノーツがアクティブとなりません。 ちなみに、Win2000+R4.51でもノーツがアクティブとなることはありませんでした。
何か設定があるのでしょうか?
それともOSとノーツの組み合わせが原因でしょうか?どなたかご存知でしたら教えてください。

Aベストアンサー

直接の回答ではないのですが,OSとの組み合わせで
似たような事があるというのを目にした事があります。

↓R5系ですがよく似た現象が。
http://nmag.softbankpub.co.jp/discussion.nsf/58932b9c0275aca94925684d0069beb5/D002EFFB9654938749256A620012625F?OpenDocument

個人的には,Wordなどで文章入力中に無理矢理ノーツに
フォーカスを取られない方がいいなぁ,なんて思いますが。(笑)

参考URL:http://nmag.softbankpub.co.jp/discussion.nsf/58932b9c0275aca94925684d0069beb5/D002EFFB9654938749256A620012625F?OpenDocum

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

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

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

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

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

Aベストアンサー

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

Qロータスのノーツ

はじめまして。私の勤務地ではメーラーにロータスのノーツを使用しています。以前はアウトルックだったのですが、このノーツが使いづらくて仕方ありません。アウトルックの方が一般的だと思うんですけど、何故ノーツなのかと不思議で仕方ありません。何かエンジニアリング的見地からノーツの方がこのようにいい、という点がありましたらお教え頂きたいと思います。

Aベストアンサー

ノーツはグループウェアソフトです。
グループウェアとしてのシームレスな操作環境がメリットですね。
また、管理者からみればOutlookよりは管理がし易いです。

使い易いかどうかと言うのは慣れや好みの問題もあり難しいですね。

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ノーツのアクションボタン

ノーツDBでフォームにアクションボタンを作りたいです。

ボタンに入力する式を知りたいです。

フォーム文書を貼り付け(とリンク)、新規ノーツメールを開き、固定したノーツグループアドレスの宛先を入力する。

Aベストアンサー

それぞれのコマンドについては、ノーツのヘルプで確認して下さいネ。
---------------------------------------------
文書リンクがついたメールを作成する例
---------------------------------------------
Subject:="(メールのタイトル)";
SendTo:="(固定したノーツグループアドレス、リストも可)";
Remark:="(メールの本文に記入する文字列)";

@Command([FileSave]);
rem {文書リンクを作るには文書が保存されていなければならないので念のために…};

@Command([EditMakeDocLink]);
@Command([Compose];@MailDbName;"Memo");
@Command([EditInsertText]; @Implode(SendTo;","));
@PostedCommand([EditGotoField]; "Subject");
@PostedCommand([EditInsertText]; Subject);
@PostedCommand([EditGotoField]; "Body");
@PostedCommand([EditInsertText]; Remark);
@PostedCommand([EditPaste]);
""
---------------------------------------------
上の式の…
@Command([Compose];@MailDbName;"Memo");
を次の式に変えれば、文書が転記されたメールが作成されます。フォーム文書を貼り付け…って、このことなのでしょうネ。
@Command([MailForward]);

それぞれのコマンドについては、ノーツのヘルプで確認して下さいネ。
---------------------------------------------
文書リンクがついたメールを作成する例
---------------------------------------------
Subject:="(メールのタイトル)";
SendTo:="(固定したノーツグループアドレス、リストも可)";
Remark:="(メールの本文に記入する文字列)";

@Command([FileSave]);
rem {文書リンクを作るには文書が保存されていなければならないので念のために…};

@Command([EditMakeDocLink]);
@Command([Co...続きを読む

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

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

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

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

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

Aベストアンサー

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














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

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

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

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

Qロータス・ノーツR5 メールの受信お知らせについて

お世話になってます。

ロータス・ノーツR5を使っていますが、
ノーツを開いた状態の時に新着メールを受信すると、「新着メールがあります」と表示されると思うのですが、
ノーツを開かない状態でメールを受信した時に、自動的に知らせてくれる機能はありますか?

大事なメールをいつも遅れて見てしまいます。わざわざノーツを開かずに、新着メールをチェックできる方法があるのなら、どなたかできるだけ簡単に(^^;)教えてください。よろしくお願いします。

Aベストアンサー

R5でしたら、「ノーツマインダー」というソフトがあるはずなので、それがお知らせしてくれます。スタート→プログラム

でも結局はのノーツを立ち上げておいて、ユーザー設定で「メールの到着を(**分おきに)知らせる」設定をするのが最良かと。

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 に、そういう機能があれば、また別ですが。

Qノーツとドミノについて

ノーツとドミノの違いはなんでしょうか?
ノーツはクライアント/サーバで、ドミノはWebアプリ、ユーザができることは同じぐらいにおもっておけばいいでしょうか?

Aベストアンサー

ノーツのサーバがドミノです。

元々、クライアントソフトがノーツクライアント、サーバソフトがノーツサーバと呼ばれていましたが、
R4.5からだったか、Webサーバ機能が統合されてサーバソフトの呼称をドミノと改めました。
今は、クライアントソフトがノーツ、サーバソフトがドミノです。

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ランキング