サブフォームの作成が出来ません。

注文データをレポート印刷をしたいのですが
同日に2回注文が入ると(例えば自家用とギフト用など)
1つのヘッダーに対し2つの明細が表示されてしまいます

フィールド「顧客ID」が同一で尚且つ別のフィールド「注文番号」が
同一という2つの条件に合ったもののみサブフォームに表示
したいのですが、方法がわかりません。

質問の仕方もわかりにくくてすみませんが教えてください。

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

A 回答 (1件)

i-haradaです。



サブフォームの質問でしょうか?
それとも、レポートなんでしょうか?

どういう構造でどのようなものにしたいか、もう一寸詳しくおねがいします。
私ですと大変難しい質問だと回答に困るかもしれませんが、他にも沢山いらっしゃいますから、お答えいただけると思いますよ。

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

すみませんでした。
補足を書いたものを改めて質問いたしましたので
是非とも、ご指導ください。

よろしくお願い致します。

お礼日時:2001/08/12 20:20

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

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

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

QAUTOCADをPDF変換して印刷したいのですが

AUTOCADをPDFに変換して印刷たいのですが
PDFでPC上ちゃんと見える線が印刷するとその線だけ消えています。
ワイプアウトで一部隠れてるのが原因かと思ったのですが
ちゃんと出てる図面もあります。

PDFをどうにかして印刷できないでしょうか?

AUTOCAD2010でDWG to PDFでPDF変換してます。
Adobe® Acrobat® 8 Standard を使ってます。

よろしくおねがいします。

Aベストアンサー

AutoCAD2010より低いバージョンでの話になるので参考までに。

新規作成した時に最初にできる「0」というレイヤーは印刷のときに不具合をおこす場合があるようです。
(印刷時に印刷されない等)

一度「0」のレイヤー内のオブジェクトを新たに作ったレイヤーに移して見てください!

また、Adobe Acrobatがインストールされている場合は
DWG to PDFではなく、「印刷→Adobe PDF→ファイルへ出力にチェック」を試してください!こちらの方が線がきれいにでると思います。

以上。
健闘を祈ります!!

Qアクセス 正味の算出 フィールド1 オートID フィールド2 顧客No フィールド3 商品名 フィー

アクセス 正味の算出

フィールド1 オートID
フィールド2 顧客No
フィールド3 商品名
フィールド4 単価

このようなテーブル構成で、顧客Noでグループ化して、IDのカウントした結果が1、2となります。
その際、1の場合は1、2の場合は0.5と別フィールドに記載する方法を教えて下さい。

Aベストアンサー

>本当はIDのカウントが2以下なら1を3以上なら999(数値で0、1以外なら何でも良いです)

IIf([IDのカウントした結果のフィールド名]>=3,999,1)

Qillustrator10、印刷可能範囲だけPDFに変換できますか?

よろしくお願いします。

友達にweb上でチラシを見てもらおうとしてます。

pdfに変換してweb上にアップして、友達の自宅PCにて確認してもらおうとしてますが、
PDF変換すると、画像がある範囲すべてがPDF変換されてしまいます。

プリンタで印刷できる範囲のみだけにしたいのですが、イラレで表示されている印刷可能範囲の点線の内側のみをPDF変換することは可能でしょうか?

Aベストアンサー

色々やり方はあると思いますが、私なら・・・。

1)まず、元データを「複製を保存」か「別名で保存」で保存しておきます。

2)で、すべてのレイヤーを1つにまとめて、印刷範囲の白ベタを作って【最前面】に配置します。

3)そのまま、すべてを選択して「メニューバー→オブジェクト→クリッピングマスク」を実行します。

4)これで印刷範囲のデータ出来上がり。

5)「別名で保存」か「データの書き出し」でPDFデータを作って終わり。

QACCESS サブフォームのフィールドにカーソルをあてる

ACCESS2003で、VBAで簡単なプログラムを作っています。

<やっていること>
・フォームAからフォームBを開きます。
・そのときにフォームAの番号と一致するデータをフォームBに表示します。
・フォームBにはサブフォームCが埋め込んでいます。

このサブフォームCの中のフィールドDにカーソルが入っているようにしたいのですが、
Forms!サブフォームC!フィールドD.setfocus

としたら、「カレントレコードには、フィールドDという名前のフィールドはありません」というエラーがでます。

フィールドDというフィールドは存在しています。

このような場合、どのように記述するのがよろしいのでしょうか。

よろしくお願いします。

Aベストアンサー

次の方法でできるように思いますが。。。。。
VBAではなくてプロパティ利用の方法ですが・・・


・フォームBでのサブフォームCを埋める場所(項目)の
 プロパティで、「タブ移動順」を 0 にする
・フォームC(項目)の フィールドDの
 プロパティで、「タブ移動順」を 0 にする

--------------------------------------------------
参考までですが
サブフォーム内の項目指定は

[FORMS]![親フォーム名]![サブフォーム名].[FORM]![フィールド名]
 この後に必要なVBA命令を書く

ここでのサブフォーム名とは親フォーム内で定義した項目名を使う
で指名できると思います

Qコンビニword印刷、PDF変換でok

コンビニでusbに保存したwordをPDFにへんかんすればどこのコンビニからでも印刷できますでしょうか?

パソコンは今ネット環境がありません
なのでusbを使い、印刷するしか方法が無く印刷したいものが3枚ほどなので漫画喫茶は高くなるし困っています。
詳しい方教えてください
ちなみにPDF変換をしないとwordはどこのコンビニも印刷不可ということでしょうか?

Aベストアンサー

PDFであれば、多くのコンビニで備えているマルチコピー機を使って印刷できます。
Windowsのエクスプローラーのようにフォルダーが表示されるので、
フォルダー内のファイル(PDF)選択も簡単です。
wordの印刷機能はありません。

Qサブフォームのフィールドの幅を変更したい。

アクセス2003です。

画像の様に、コマンドボタンを押したら
サブフォームの列(フィールド)の幅を変更することは可能ですか?

エクセルvbaで例えたら
Columns("A:A").ColumnWidth = 30
から
Columns("A:A").ColumnWidth = 10
へしたいです。

ご教授よろしくお願い致します。

Aベストアンサー

Me.サブフォームコントロール名![出金].ColumnWidth = 1000
とか。

Access2003 ということなら
Me.サブフォームコントロール名![出金].ColumnWidth = -2
もありかも。

詳細は VBE のヘルプで「ColumnWidth」プロパティを調べてください。

Qイラストレータ→PDF変換で、必要な部分だけ印刷したい

イラストレータCSで作成したものを、
イラストレータがインストールされてないパソコンから印刷したいため、
PDFファイルに変換して印刷しようと思っています。
しかし設定用紙サイズの枠外まで絵を描いてしまったので
PDFファイルにするとその印刷部分外まで一緒に保存されてしまい、
希望の用紙サイズとは全く違うサイズになっていまいます。

トンボなどは設定できるようですが、画像サイズの設定をして
そこだけPDF保存、ということは出来るのでしょうか?
若しくは印刷段階で「真ん中のここだけ印刷」みたいなことは出来るのでしょうか?
スライスを使用したりして多少の悪あがきはしてみましたが…
これが限界のようです。
何か良い知恵があれば是非是非ご教授のほどお願いいたします。

また、PDFファイルに変換すると絵全体が白っぽくなるのですが…
これの回避の仕方などはあるのでしょうか?
過去の質問を見たのですがMacでの質問しか見つけられなかったので、
これも一緒に質問させていただきます。

因みにパソコンはWin2000(イラレ搭載)とWinXP(印刷用)、
使用してるのはAcrobat Reader 5.0になります。
他足りない情報があればご指摘くださればすぐに補足させて頂きます。
どうぞよろしくお願いいたします。

イラストレータCSで作成したものを、
イラストレータがインストールされてないパソコンから印刷したいため、
PDFファイルに変換して印刷しようと思っています。
しかし設定用紙サイズの枠外まで絵を描いてしまったので
PDFファイルにするとその印刷部分外まで一緒に保存されてしまい、
希望の用紙サイズとは全く違うサイズになっていまいます。

トンボなどは設定できるようですが、画像サイズの設定をして
そこだけPDF保存、ということは出来るのでしょうか?
若しくは印刷段階で「真ん中のここだけ印刷...続きを読む

Aベストアンサー

「書類サイズ」が大きいのではないでしょうか。それを用紙サイズと同じにしてからpdfで保存すればその範囲のものしかできないと思います。
当方CSは使っていませんが同様では?違っていたらゴメンナサイ。

QAccess:サブフォームにクエリ表示⇒フィールドを絞り込みたい

Access2003 WinXP です。
フォームにサブフォームを置き、サブフォームのソースオブジェクトにクエリを参照しているデータシート形式のフォームを設定しています。
フォームに絞込み条件を選択するオプションボタン、表示するフィールドを選択するオプションボタンを配置し、
サブフォームへ表示するコマンドボタンを置いています。
この設定を選択した後コマンドボタンを押すと、クエリの中身を書き換えています。
で、実行すると、表示しない設定のフィールドには「Name?」という値が入ったフィールドがしっかり表示されてしまいます。
ソースオブジェクトにクエリ自体を設定すれば回避出来ますが、表示されたデータをダブルクリックするとその1レコードを表示する画面を更に開きたいと思っていますので、サブフォームにデータシート形式のフォームをセットするのがダブルクリックイベントを取得出来て良いかと思っています。
分かりにくい説明ですみません。
何か解決法を分かる方いらっしゃいましたら、お願いします。

Aベストアンサー

> データシート形式のフォームを

フォームでデータシート形式で表示する際には、テキストボックス名が項目となるようですので、
ベースのフォームを作る際にはフォームウィザードを使用し、表形式で作成すると、
テキストボックス名=フィールド名にしてくれます。
作る時には、全てのフィールドを表示するクエリから行います。

親フォームに配置したサブフォームコントロール名を「FSUB」と仮定します。
この「FSUB」に、自分(データシート形式のフォーム)が表示されているということにします。
データシート形式になると、制御はサブフォームコントロールのものとして扱います。
制御の中の ColumnHidden を使用します。

以下が処理例となります)

' 指定された名前が、レコードのフィールド名にあるか
' あれば False / なければ True
Private Function SetColumnVisible(sName As String) As Boolean
  Dim fld As Field

  SetColumnVisible = True
  For Each fld In Me.RecordsetClone.Fields
    If (fld.Name = sName) Then
      SetColumnVisible = False
      Exit For
    End If
  Next
End Function

' フォーム読み込み時
Private Sub Form_Load()
  Dim ctl As Control

  For Each ctl In Me.Section(acDetail).Controls
    Me.Parent.FSUB.Controls(ctl.Name).ColumnHidden _
      = SetColumnVisible(ctl.Name)
  Next
End Sub




フォームの「読み込み時」に、
詳細部分のコントロール名で、レコードのフィールド名にあるかチェックし、設定します。
Hidden と言っても、幅が0になるだけなので、
消えたと思った項目位置付近をいじると、ひょこひょこと出てきます。


Me.Parent.FSUB の記述は、自分の親のサブフォームコントロール名 としていますが、
Forms("親フォーム名").FSUB でも
Forms!親フォーム名.FSUB でも

※ テキストボックス名 <> コントロールソース名 なら
SetColumnVisible(ctl.Name) を SetColumnVisible(ctl.ControlSource) とすれば
対応できますが、データシートに表示される項目名は、テキストボックスの名前になります。

※ 表形式で作成したものでなければ、詳細部分にラベルが存在することがあるので、
処理対象のテキストボックスを識別するための工夫はしてみてください。
プロパティの タグ を使用するとか、、、

例えば、
連結しているテキストボックスを全部選択してから、タグ部分に REC と文字を入れて
これで判別すると、

Private Sub Form_Load()
  Dim ctl As Control

  For Each ctl In Me.Controls
    If (ctl.Tag = "REC") Then
      Me.Parent.FSUB.Controls(ctl.Name).ColumnHidden _
        = SetColumnVisible(ctl.Name)
    End If
  Next
End Sub

判別する範囲を、フォーム全体(In Me.Controls)に広げても対応できます。
前の書き方 In Me.Section(acDetail).Controls は、詳細部分にあるものになります。

動かなかったら、ドンドン修正してください。

> データシート形式のフォームを

フォームでデータシート形式で表示する際には、テキストボックス名が項目となるようですので、
ベースのフォームを作る際にはフォームウィザードを使用し、表形式で作成すると、
テキストボックス名=フィールド名にしてくれます。
作る時には、全てのフィールドを表示するクエリから行います。

親フォームに配置したサブフォームコントロール名を「FSUB」と仮定します。
この「FSUB」に、自分(データシート形式のフォーム)が表示されているということにします。
デ...続きを読む

Qエクセルファイルを印刷のところからPDFに変換

こんにちは。
会社で私が使ってるパソコンだけが、ファイルメニューの印刷を選んで、出てきた印刷ウインドウの中にプリンターの名前と一緒にAdobe PDF とあるので、それを選択すると簡単にPDFファイルに変換出来ます。
これは他のパソコンには入っていないようです。他の人が同じようにしてくれと言ってきますが、私もどうしてこうなっているのか記憶にありません。何かのプラグインが入っているのでしょうか?

ウインドウズXP で オフィス2000です。

よろしくお願いします。

Aベストアンサー

Adobe Acrobat が導入されていると考えるのが普通でしょう。
http://www.kit-systems.co.jp/webkcore/maketemplate9/maketemplate9-2.htm

http://dopub.jp/aboutpdf.php
でそう表示されています。

ちなみに「CubePDF」ではAdobe PDFとは表示されず、CubePDFと表示されます。
http://www.atmarkit.co.jp/fwin2k/win2ktips/1331cubepdf/cubepdf.html

Q別シートのフィールドから同一値検索、隣フィールド値取得の関数を教えてください。

■シート1
----------------
□分類□名 称□
----------------
|果物|りんご|
----------------
|果物|バナナ|
----------------
|果物|みかん|
----------------
|野菜|トマト|
----------------
|野菜|セロリ|
----------------
|野菜|レタス|
----------------

■シート2
----------------
□名 称□分類□
----------------
|りんご|  |
----------------
|トマト|  |
----------------
|バナナ|  |
----------------
|セロリ|  |
----------------
|みかん|  |
----------------
|レタス|  |
----------------

シート2の名称にてシート1の名称を検索して、シート2に分類を取得することは可能でしょうか。
よろしくお願いします。

■シート1
----------------
□分類□名 称□
----------------
|果物|りんご|
----------------
|果物|バナナ|
----------------
|果物|みかん|
----------------
|野菜|トマト|
----------------
|野菜|セロリ|
----------------
|野菜|レタス|
----------------

■シート2
----------------
□名 称□分類□
----------------
|りんご|  |
----------------
|トマト|  |
----------------
|バナナ|  |
----------------
|セロリ|  |
---------...続きを読む

Aベストアンサー

シート2のB2セルに次の式を入力して下方にオートフィルドラッグします。
=IF(OR(A2="",COUNTIF(Sheet1!B:B,A2)=0),"",INDEX(Sheet1!A:B,MATCH(A2,Sheet1!B:B,0),1))


人気Q&Aランキング