こんばんは。
Access2000で納品書の発行を行っています。
OSはWindows98、ネットワーク環境で使用しています。
困ったことに、突然、レポートの余白設定がデフォルトに戻ってしまうのです。
プリンタはEpsonの720に設定してあり、それ以外のプリンタは使わないのに、
違うPCで使用する際はもちろんのこと、同じPCで作業していても
余白設定がもどっているときもあります。
このような状況を回避できる方法はないのでしょうか?
印刷時にモジュールで余白の設定をすることはできないのでしょうか。
やはりプリンタに依存するのでだめなのですか?
よろしくお願いいたします。

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

A 回答 (2件)

基本的にアクセスはおばかです。


 1.最適化をするとフォームが初期値に戻ったり
 2.Aのパソコンで作成したのをBのパソコンで印刷すると
   フォームが初期値に戻ったり
 
結論
 めんどくさいですが、フォームの設計はデフォルトで行いましょう。
    • good
    • 0
この回答へのお礼

ご解答ありがとうございました。
やはりダメなのですか。。。
確かにデフォルトで設計すればこの現象は回避できますね。
もう少しアクセスががんばってくれればいいのに。
ありがとうございました。

お礼日時:2001/09/20 23:08

OFFICEのSP1をあてましょう。

    • good
    • 0

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

関連するカテゴリからQ&Aを探す

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

QAccess97でのレポートの余白設定

こんにちは。

Access97でのレポートの余白設定についての質問です。
レポートの1枚目と、2枚目以降でレポート上部の余白サイズを変更したいと考えています。
方法をご存じの方、ご教授下さい。
OSはWin2000です。

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

Aベストアンサー

>レポートの1枚目と2枚目以降でレポート上部の余白サイズを変更したい
1枚目と2枚目以降の上部余白をどのようにサイズ変更したいのか書いてありませんが・・。
レポートヘッドを使って1枚目のページヘッダの位置の出力する位置を下げてやれば2枚目以降と余白サイズは変わりますが・・。

Qサブフォームに同一の納品日を自動的に入力したい

XP&ACCESS2003:
メインフォーム/サブフォーム形式のフォームで、受注番号で連結しています。
メインフォームが受注、サブフォームが受注明細です。(1対多)
メインフォームには「次のレコード」に進むボタンをつけ、クリックにより次のレコードが表示されます。(従って、サブフォームも次の受注の明細に移動します)
複数のレコードを持つサブフォームの納品日(受注明細の納品日フィールドに連結)の最初の一件に日付を入力し、メインフォームの「次のレコード」に進むボタンをクリックした時、1件前の受注明細の納品日を入力していない他の(2件目以降)のレコードにも同一の納品日を自動的に入力できる方法がわかりません。よろしくお願いします。

Aベストアンサー

納品日の既定値に最初の入力を反映させるには?という質問でしょうか?

納品日が更新された時に発生するイベントに

  If Len(Me.納品日 & "") <>0 Then
    Me.納品日.DefaultValue=Me.納品日
  End If

で宜しいかと!

Qエクセルで納品書を別シートでデーター化(リスト保存)したい

エクセルで納品書を作成しています。
毎回違う商品名や値段を記入しているのですが
そのデーター内容を自動で別シートにデーター管理(リスト管理)したいのですが可能でしょうか

条件 
シート1に記載したら自動的にシート2に1行ずつ下げて記載してほしい。



詳細
【シート1】
(1) B14  商品名(こちらはB14~B17まで記入することもあります)
(2) B25  名前
(3) B24  住所

これをシート2の
シート1の B14 を シート2の D70 に
シート1の B25 を シート2の H70 に
シート1の B24 を シート2の I70 に  

というふうに記載してほしい。


名前や住所等 購入品名等を別シートに毎回コピーしていたのですが
もっと簡単にデーター保存できればと思いましたので

Aベストアンサー

VBAでの処理
Sub 行転記()
  Dim ws As Worksheet '転送先シート
  Dim Lastline As Long '
  Set ws = Worksheets("シート2") '転送先シート
  Lastline = ws.Range("A" & Rows.Count).End(xlUp).Row + 1 '最後の行番号+1をLastlineに
  ws.Range("D" & Lastline).Value = Range("B14").Value
  ws.Range("H" & Lastline).Value = Range("B25").Value
  ws.Range("I" & Lastline).Value = Range("B24").Value
End Sub
で書いてあることはできると思います。
転記項目もこれだけではないでしょうが、増やすことも難しくないでしょう。(納品日、金額など)
ただ、納品書も複数行あるようですのでその部分は少し工夫が必要でしょうが
頑張ってください。

VBAでの処理
Sub 行転記()
  Dim ws As Worksheet '転送先シート
  Dim Lastline As Long '
  Set ws = Worksheets("シート2") '転送先シート
  Lastline = ws.Range("A" & Rows.Count).End(xlUp).Row + 1 '最後の行番号+1をLastlineに
  ws.Range("D" & Lastline).Value = Range("B14").Value
  ws.Range("H" & Lastline).Value = Range("B25").Value
  ws.Range("I" & Lastline).Value = Range("B24").Value
End Sub
で書いてあることはできると思います。
転記項目もこれだけではな...続きを読む

Q【続続】Access2002で連番のついた納品書を出力したい

1.
http://oshiete1.goo.ne.jp/qa5243829.html
2.
http://oshiete1.goo.ne.jp/qa5257035.html

上記のように、質問してまいりまして、後一歩まで参りました。


これまでの経緯は下記のとおりです。

1.複数の注文をまとめ、それにユニークな連番を振って納品書を作りたい(これが大元の要望でした)

2.上記質問の中でいただいた回答で、フォームを使って納品書番号をオートナンバーで振ることは成功(私の理解不足で回答者様を振り回してしまいましたが、思うような連番(納品書番号)を自動的に振ることに成功しました)

3.フォームのサブウィンドウ(?)を用いて、納品対象の注文を選択したい(ここでとまっています)

テーブルは下記のとおりです。(計4つ)

1.従業員マスタ(データ投入済み)
・従業員コード(テキスト)
・従業員名(テキスト)
・従業員名カナ(テキスト)

2.納品書番号(データはフォームから自動生成)
・納品書番号(オートナンバー)
・納品日付(日付)
・従業員コード(テキスト)

3.注文情報(データ投入済み)
・注文番号(テキスト)
・従業員コード(テキスト)
・商品ID(テキスト)
・数量(数値)
・納品書番号(数値)

4.商品マスタ(データ投入済み)
・商品ID(テキスト)
・商品名(テキスト)
・単価(数値)

以上の4つのテーブルでテストDBを作っています。

上述したとおり、フォームで、
1.新規レコードの作製
2.納品日付入力
3.コンボボックス(従業員名、カナ)をコンボボックスで選択
という手順を踏み、納品書番号が自動的に振られるフォームまで作成できました。(画像添付)

次の段階ですが、フォームの中にサブフォーム(?)を作成し、「どの注文で発生した商品を」納品するのか、注文情報テーブルから選択し、レポートにして打ち出したいのです。

納品書の基本単位は従業員ごとですが、納品がバラバラに行なわれることが多く(例:Aさんが1、2、3と注文したとしても、2、だけ先に納品され、1、3が別の日に納品される)、注文情報から「注文番号」で選択できれば。。。と思っています。

前の質問でもお答えはいただいたのですが、私の知識不足でうまく実現できませんでした。

他に、必要な情報がございましたら提示いたしますので、よろしくお願いします。

何卒よろしくお願いします。

1.
http://oshiete1.goo.ne.jp/qa5243829.html
2.
http://oshiete1.goo.ne.jp/qa5257035.html

上記のように、質問してまいりまして、後一歩まで参りました。


これまでの経緯は下記のとおりです。

1.複数の注文をまとめ、それにユニークな連番を振って納品書を作りたい(これが大元の要望でした)

2.上記質問の中でいただいた回答で、フォームを使って納品書番号をオートナンバーで振ることは成功(私の理解不足で回答者様を振り回してしまいましたが、思うような連番(納品書番号)を自動的に振...続きを読む

Aベストアンサー

だんだん回答することに疲れてきました。もう少し解決するための努力をして欲しいです。当方に依存してばかりでは技術者(プログラマー)として自立できません。
と、これだけでもなんなので。
問題をできるだけ切り分ける(以前にも書いたはず)

1.当該SQL文からクエリを作成し、直接実行する
2.変化がない(0件のレコードが更新されます)ならば、選択クエリに変更して、なぜ0件なるかしらべる
3.クエリが有効ならばVBAが確実に実行されているか、ブレークポイントを設けたり、ステップインで実行してみる

QACCESSのモジュールエラー?

昨日まで普通に起動していたのですが、
今日になり「モジュールがありません!」
というメッセージが表示されます。

で、OKを押すとVBAの画面が表示されます。

具体的にどこをどう確認すればなおるのかわかりません。

どなたかアドバイスお願いします。

Aベストアンサー

mdbが破損した確立が高いです。
どこが破損しているのか不明ですが
>OKを押すとVBAの画面が表示されます。
とのことなのでプロジェクトレベルの破損とも考えられます。
>具体的にどこをどう確認すればなおるのか
まずツールのデータベースユーティリティで修復をしてみる。
VisualBasicEditorを開きデバッグでデータベースのコンパイルをしてみる。
それでもメッセージが出るようならデコンパイルしてみる。
デコンパイルはAccessを終了して[スタート]→[ファイル名を指定して実行]でAccessのexeフルパスとコマンドを入力しOKボタンで実行してみてください。
バージョンが質問からでは分かりませんがAccessのexeはAccess2003の場合はC:\Program Files\Microsoft Office\OFFICE11にAccessのexeがあります(確認してください)ので下記のように入力してコピぺでも良いです。
デコンパイルは
"C:\Program Files\Microsoft Office\OFFICE11\MSACCESS.EXE" "C:\フルパス\ファイル名.mdb" /decompile
でデコンパイルできます。
VB関連が損傷しているならこれで直るはずなのですが・・。
それでもメッセージが表示される場合は修復不可という事で・・。
新しいmdbを作って問題のmdbのオブジェクトを新しいmdbへインポートするしかなくなってしまいます。

mdbが破損した確立が高いです。
どこが破損しているのか不明ですが
>OKを押すとVBAの画面が表示されます。
とのことなのでプロジェクトレベルの破損とも考えられます。
>具体的にどこをどう確認すればなおるのか
まずツールのデータベースユーティリティで修復をしてみる。
VisualBasicEditorを開きデバッグでデータベースのコンパイルをしてみる。
それでもメッセージが出るようならデコンパイルしてみる。
デコンパイルはAccessを終了して[スタート]→[ファイル名を指定して実行]でAccessのexeフルパス...続きを読む


人気Q&Aランキング

おすすめ情報