- ベストアンサー
AccessレポートのラベルをVBAでかきたい
事情があって、直接レポートには文字をかけません。 なのでVBAで…と思ったのですがわかりません。 線の引き方は Me.Line (8 * 567, 0)-(8 * 567, 2430) としています。 こんな感じで、VBAを使い、位置を指定しつつ、表示させる文字も指定して、文字を表示、というようなことはできないでしょうか?
- みんなの回答 (3)
- 専門家の回答
質問者が選んだベストアンサー
> えと、フォームではなくレポートに、なんですが、CreateControl は使えるんでしょうか? あれ?Access2000では、 CreateControl、CreateReportControl メソッド なんてのになってますね。 #自宅では、Access2003で確認しました。 構文についてはほとんど同じですね。 CreateReportControl(reportname, controltype[, section[, parent[, columnname[, left[, top[, width[, height]]]]]]]) 詳細はヘルプで確認してください。 > 最初にレポートは作成しておいて、移動のみをレポートオープン時(印刷時)に こちらの方法だと、各プロパティに値を代入することになると思います。 Me!コントロール名.Top = xxx とかのように。
その他の回答 (2)
- Gin_F
- ベストアンサー率63% (286/453)
> 現在手元にAccessがないので確かめられないのですが、 どのような手順で、やりたいのかがよく分からないので、コントロールを 作成する方法を案内しました。 構文は以下のとおりです。 CreateControl メソッド CreateControl(formname, controltype[, section[, parent[, columnname[, left[, top[, width[, height]]]]]]])
お礼
回答ありがとうございます。 えと、フォームではなくレポートに、なんですが、CreateControl は使えるんでしょうか? formnameとかいてあるもので。。 やりたいことは、レポートにラベルを書きたいが、自動で生成するか、もしくは、 最初にレポートは作成しておいて、移動のみをレポートオープン時(印刷時)に VBAを使って動作させる、ということがしたいのです。 おわかりいただけたでしょうか?
補足
移動させる場合のコードは レポート名.Label(使用者).Left = 5 * 5 こんな感じでしょうか?
- Gin_F
- ベストアンサー率63% (286/453)
いまいち、何のためになのかよく分かりませんが、 やるとしたら、 CreateControl メソッド かな?
お礼
回答ありがとうございます。 現在手元にAccessがないので確かめられないのですが、 VBAに CreateControl "***"←表示したい文字 とかってすればいいのでしょうか? 表示させる位置はどのように指定すればいいのでしょうか?
お礼
無事できました。 ありがとうございました。