VB6.0で開発を行っています。
DataReportでA4横長の帳票を作りたいのですが
フォーム上ではレイアウトが作れても
実行すると「レポートの幅が用紙の幅より大きく指定されています。」
というエラーが出て開けません。
各マージンを0にしたり、試行錯誤しているのですが
時間ばかりが過ぎていきます。
どなたかやり方を知っていたら是非教えてください。

A 回答 (2件)

DataReportの用紙設定を変更する場合、通常使うプリンタをAPIで直接


変更しなければなりません。

参考URLの「プリンタの設定を変更する」が参考になると思います。

参考URL:http://www.galliver.co.jp/writing/nikkei_tokushu …
    • good
    • 0
この回答へのお礼

参考URL、大変参考になりました。それにしても印刷方向くらい面倒な設定なく変更したいですね。もう少し使い勝手が良いレポートであればいいんですけど・・・。回答ありがとうございました。

お礼日時:2001/06/25 15:35

プリンタへA4横の設定をする必要があるんじゃないでしょうか?


LandScape(横長のこと)というキーワードでヘルプを検索すると何か出てくると思います。
VB6はインストールしてないので詳細はわかりません。
    • good
    • 0
この回答へのお礼

回答ありがとうございました。何とかAPIでプリンタ設定を変更して出力しました。
ヘルプはデータレポートのデザインしか見ていなかったので、これからは他のキーワードも利用して幅広くヘルプを参照しようと思います。

お礼日時:2001/06/25 15:38

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

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

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

QExcel VBAで、B列の幅を、既存のグラフの幅に設定したい。

VBA初心者です。
ワークシート上にグラフを作成した後(例えば「グラフ1」とします)、B列の幅を作成したグラフの幅と同じに設定するには、どのように記述すればよいのしょうか?

Columns("B").ColumnWidth = ActiveSheet.Shapes("グラフ1").Width

Columns("B").Width = ActiveSheet.Shapes("グラフ1").Width

Columns("B").ColumnWidth = ActiveSheet.Shapes("グラフ1").ColumnWidth

どれもうまくいきませんでした。よろしくお願いします。

Aベストアンサー

こんにちは。Wendy02です。

>ColumnWidthのヘルプによると
>解説
>・
>とのことです。

その書き方は、かなり手厳しく感じました。ヘルプで調べてから回答を書きなさい、ということですね。私の書き方がまずかったようですね。失礼しました。

 ただ、そのヘルプの内容は、若干、意味が曖昧です。仮に等幅フォントであっても、本当に、1文字の積み重ねが、列幅になるとお思いになっているのでしたら、それは違います。セル幅は、PIXEL値(Long型)に丸められて、それを逆算して、例えば「8.38」 という数字が出てきているのであって、決して、1文字のフォントの長さが、列幅にそのまま反映しているわけではありません。ロジックでいうと、「AはBによって作られているが、BはAには等しからず」ということになりますね。

変換率の出し方は、以下のようになりますが、Constの定数はやめ、ALPHAを変数にして、以下のようにすればよいはずです。

Dim Alpha As Double
Alpha = ActiveSheet.Cells(256).Width / ActiveSheet.StandardWidth

しょせん、理論値では不可能(だと思う)ですから、影響のないセルに対して、実測値を元に、変換値を出したにすぎませんが。

これで、問題なくできるはずです。

こんにちは。Wendy02です。

>ColumnWidthのヘルプによると
>解説
>・
>とのことです。

その書き方は、かなり手厳しく感じました。ヘルプで調べてから回答を書きなさい、ということですね。私の書き方がまずかったようですね。失礼しました。

 ただ、そのヘルプの内容は、若干、意味が曖昧です。仮に等幅フォントであっても、本当に、1文字の積み重ねが、列幅になるとお思いになっているのでしたら、それは違います。セル幅は、PIXEL値(Long型)に丸められて、それを逆算して、例えば「8.38」 ...続きを読む

Q帳票ツールを使わずに帳票出力が出来ますか?

VB6を使って開発しています。
帳票ツールを使わずに帳票出力が出来ないものかと考えております。
まぁそれが出来ればツールなんて必要ないじゃないかとも思うのですが(^^;
よろしくお願いします。

Aベストアンサー

回答ではないのですが、経験です。
みなさん同じような悩みを持ってたりするものですね。
私も先日までコーディングのみで帳票にデータを出力するルーチンを作成していましたが、本当に大変です。
VBでの単位がTwipで物理的な紙はやはりmmやcmの単位ですから大変です。
1Twip=1mm ならまったく問題はないのですが、そうではないので気が狂いそうになってコーディングしていました。
とにかく、出力する帳票がかなり無駄になります。(テスト出力の度に・・)
でも、コツを覚えると簡単ですので、一度気が狂いそうになるまでコーディングしてみるのはいかがですか?

printer.currentx=1000
printer.currenty=1000
printer.print "気が狂いそう"

上のコードだけでシステムにデフォルトで設定されているプリンターに出力されます。
なんて単純なコードでしょう・・・
コードが単純なだけにx,yの設定が大変でした。

Q【Excel2007】折れ線グラフの線幅をデフォルトで変更する方法??

【Excel2007】折れ線グラフの線幅をデフォルトで変更する方法??


 今日は、質問させていただきます。どうぞよろしくお願いいたします。
 Excel2007で折れ線グラフ(50本前後がまとまったもの)を作成いたしますと
線幅が太く(デフォルト)見づらいので、毎回2003と同じような最も細いもの
(1pix程度)に1本ずつ設定しなおしておりますが、手間がかかります。。orz
 今はVBAで行っておりますが、やはり毎回手間がかかっております^^;

 折れ線グラフ作成時に最初から、グラフ線幅を1番細いものに
設定できる方法ってあるのでございましょうか??
もしくはグラフ中の折れ線グラフすべての太さを同時に変えられるような
方法などございましたら、お教えいただきたくお願いいたします。

 もしお詳しい方がいらっしゃいましたら,どうぞよろしくお願いいたします。

Aベストアンサー

取り合えず簡単な表を作っておきます
例えばA列の【A2】セルから『A,B,C,D』などセル【A5】まで入力します
次にB列のセル【B1】に『あ』とか入力して【B2】から【B5】まで適当に数値を入力しておきます
・・・・・↑ここまではテンプレートとして作る仮の表です↑・・・・・

次に折線グラフを作り「系列」の線を選択→右クリックして「データ系列の書式設定」を選択→「線のスタイル」を選択→「幅」を「1Pt」に変更して「データ系列の書式設定」画面を閉じます

グラフエリアを選択されている状態で「デザイン」タブの左側2番目位に「テンプレートして保存」がありますのでそれをクリック→保存先フォルダ名が「Charts」になっている事を確認後、ファイル名に適当な名前を入力して保存します
・・・・・↑テンプレートとして保存された状態になります↑・・・・・

保存されたテンプレートは「挿入」タブの「グラフ」グループの右下にある小さい四角い所をクリックすると(ランチャーといいます)「グラフの挿入」画面が出てきますので一番上の「テンプレート」を選択すると先程保存されたグラフのテンプレートが格納されています

次に、実際の表で、まず折れ線グラフを作っておき、グラフエリアを選択している状態で作ったテンプレートをクリックしてあげると実際の表に反映されます

お試し下さい 彡O┓ペコリ

取り合えず簡単な表を作っておきます
例えばA列の【A2】セルから『A,B,C,D』などセル【A5】まで入力します
次にB列のセル【B1】に『あ』とか入力して【B2】から【B5】まで適当に数値を入力しておきます
・・・・・↑ここまではテンプレートとして作る仮の表です↑・・・・・

次に折線グラフを作り「系列」の線を選択→右クリックして「データ系列の書式設定」を選択→「線のスタイル」を選択→「幅」を「1Pt」に変更して「データ系列の書式設定」画面を閉じます

グラフエリアを選択されている状態で「デザイン」タブ...続きを読む

QDataGridViewの各セル幅を自由に決め、その幅で固定したい

いつもお世話になっとります。

表示する文字列の長さに応じてセル幅を変えるのは

DataGridView1.AutoSizeColumnsMode =
DataGridViewAutoSizeColumnsMode.AllCells

これで可能ですよね。

DataGridViewの各セルの表示内容を、文字列の長さに関わらず、予め決められた幅で表示したいのですがどのように書けばいいのでしょうか。

.NET環境です。

Aベストアンサー

デザイン時にDataGridViewのcolumnsのコレクションの列のwidthで設定する。

DataGridView1.Columns(?).Width = *** で設定する。
?は0からの番号か列名

Q【EXCEL】グラフの値の幅が広すぎて見やすいグラフが作成出来ません

エクセル初心者なので、見やすいグラフの作成方法について、ご教授ください。

作成したいグラフは、月別の売り上げを顧客ごとに表すものですが、値の幅が広すぎて見やすいグラフを作成することが出来ません。

最大値が2万で最小値が、217と値に幅があります。
しかも、1000前後に値が集中しており、2万前後の値は1顧客だけです。

どうやったら見やすいグラフが作成出来ますでしょうか?

当方初心者なので、どのようなグラフの形式を用いて、設定を行なえば見やすいグラフが出来るか教えていただけると大変助かります。

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

Aベストアンサー

>しかも、1000前後に値が集中しており、2万前後の値は1顧客だけです。
方法1.縦軸を対数にする
縦軸の書式設定で目盛りを対数にする

方法2.二つのグラフを重ねて表示にする
下のグラフは、目盛り間隔を500位で最大値を制限して作成
上のグラフは、目盛り間隔を3000位で最小値を制限して作成
この最大値と最小値を同じ値にして作成すればできます。

QActiveReportでこんな帳票できますか?

ご質問させていただきます。
ActiveReportでこんな帳票作れるでしょうか。

1ページ目
 1年1組
  名前1
  名前2
  ・・・
  名前30

2ページ目
 1年2組
  名前1
  名前2
  ・・・
  名前23

3ページ目
 1年3組
  名前1
  名前2
  ・・・
  名前30

4ページ目
 1年3組
  名前31
  ・・・
  名前35


という風に

見出し:○年○組
中身:名前

といった組ごとのページ(入りきらない場合は複数ページ)を
表示させる帳票(?)です。実際は、違うデータで使うのですが、上記のようなレイアウトは可能でしょうか。

失礼致します。

Aベストアンサー

データをグループ化することで簡単に作れます。
レポートにGroupHeaderを挿入して、
そのDataFieldを「組」を表すフィールドに設定します。
NewPageを「Before」に設定すると、組ごとに改ページされます。

Q折れ線グラフで横軸の1時間の幅を均等にしたい。

折れ線グラフで横軸の1時間の幅を均等にしたい。

Excel 2003で、1日24時間の気温の変化を横軸に時刻、縦軸に気温を取って折れ線グラフにしました。
気温測定時刻はほぼ1時間に1回なのですが、いつも00分とかいった固定された時刻ではなく、3:15分に測って、次は4:32分に測って、5時台は飛んで、次は6:03分に測って、...という風にまちまちです。

横軸は、横方向のグラフの幅の全体を24等分したものを1時間にしたい(つまり、1時間の幅をどの1時間も同じにしたい)のですが、

時刻  気温
3:15  36.1
4:32  35.9
6:03  34.2

のような表を作ってこれをグラフにすると、横軸に3:15、4:32、5:03が等間隔にプロットされてしまい、1時間の幅が同じになりません。

横軸の1時間の幅をどの1時間も同じにして、その目盛の上に上記のような測定値を正しくその時刻の位置に(つまり、例えば3:15の測定値は正しく3:15分の位置に)プロットするにはどうしたらいいのでしょうか。

Aベストアンサー

ご希望のグラフを作成するには以下のような設定をします。

まずグラフウィザードで折れ線グラフではなく散布図の折れ線を選択します。

作成されたグラフの横軸の部分を右クリックして「軸の書式設定」の目盛タブで最小値を「0」、最大値を「1」、目盛間隔を「0.04166666666」にして、表示形式タブで、ユーザー定義にして、たとえば「[h]」にして「OK」してください。

QVBで帳票するサンプル

Visual Studio Express 2012 for Windows DesktopでVBを使って帳票のプログラムを作ろうとしています。

サンプルソースがあればご紹介ください。

できれば、外部ツールを使わずに、追加費用が発生しない範疇で制作したいです。

Aベストアンサー

とりあえず、自力で文字を印刷する方法です。(ツールは一切使わない)
URLの「印刷する」や「文字列を印刷する」を見てください。

参考URL:http://dobon.net/vb/dotnet/graphics/index.html

Qエクセル セルの幅を変えてもグラフの幅は固定

セルの幅を変えてもその上に描かれたグラフの幅は固定しておきたいのですが、どうすれば良いですか?

Aベストアンサー

グラフを選んで書式設定を選択
プロパティタブの中から「セルにあわせて移動やサイズ変更をしない」をチェックでよろしいかと思います。

Qメッセージボックスの中止/再試行/無視を変更したいです

メッセージボックスの中止/再試行/無視の3択のボタンの
表示の文字を変更したいのですが、そういうことは出来るでしょうか。
もし出来るようであれば、どのような方法があるか教えて欲しいです。
お願いいたします。

Aベストアンサー

>表示の文字を変更したいのですが
この意味があいまい。
(1)文字サイズ、色、フォント、地の色などを変更したい
VBAの世界では、難しいとおもう。必要なら、フォームにボタン追加で逃げるとかします。
(2)中止、再試行、無視と3つですが2つとかにしたい
   他の組み合わせで出したい
http://homepage1.nifty.com/rucio/main/technique/MsgBox.htm
の表に載っているものを、
「任意に組み合わせたい」
ということなら、「+」で2つ以上つなげて記述すればよい。
16ビットの各ビットに1つのボタン表示を割り当てているようなので、「+」すなわち、ビットのAND演算をさせれば、指定位置のビットが追加で立つようになる仕組みと思います。


人気Q&Aランキング

おすすめ情報