FC2ブログ

スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

↑やる気アップにご協力をお願いします。わぁいヽ(∇⌒ヽ)(ノ⌒∇)ノわぁい♪

こんな記事もありますよ


サブフォーム内レコードの並び替えをしたい

本日のお悩みは、

フォームの中にフォームをつくる・・・アレ!
えっと・・・そうそう!! サブフォームってあるじゃないですか。
メインフォームに表示されているデータの詳細を表示してくれるような
便利(強調文?)なものです。

そのサブフォームで並び替えをしたいんですけれど…

つまり・・・

サブフォームで並び替えをしたい!!
ということですね。 (☆_☆)!!



・・・といっても、そんな難しく考えなくても
VBAのコマンドに
DoCmd.RunCommand acCmdSortAscending '昇順に並び替え
DoCmd.RunCommand acCmdSortDescending '降順に並び替え
が、あるじゃないですか・・・(ノ゚Д゚)八(゚Д゚ )ノ イエ~イ!

もしくは、
フォームのレコードソースのクエリで事前に並び替えを
しておけばいいじゃないですか・・・と思ってたのですが・・・

・・・できませんでした・・・orz

色々調べてみると、サブフォームが開かれるときに
勝手に、並び替えが出来ない状態・・・つまり
OrderByOn(並び替えの許可) が Falseになってしまっているようです。

ということは、メインフォームの読み込み時イベントなどで
me.サブフォーム名.Form.OrderByOn = True
と記述しておけば、その後は、

DoCmd.RunCommand acCmdSortAscending '昇順に並び替え
DoCmd.RunCommand acCmdSortDescending '降順に並び替え
を利用して並び替えが可能になるっちゅ~わけです。

あ!そうそう、上記の並び替えのコマンドを利用する場合には、
事前に並び替えの基準となるフィールド(項目)にフォーカスを移動させておく必要がありますので
注意してくらさい m(_ _)m

ちなみに、
Me.フィールド名.SetFocus
でフォーカスの移動が可能になります・・・。

え?そんなこと知ってる?余計なお世話? …(・・?)

・・・ですよね (T_T)

・・・いいんですよ・・・どうせおいらなんか・・・
(・_・)..(._.)..(..)..(_)..○..o..。

これで今日のお悩みは解決したと、とりあえずしておきましょう。

ではでは・・・(・・)/ シュタ 。。。タタタッ。ヘ(;・・)ノ
↑やる気アップにご協力をお願いします。わぁいヽ(∇⌒ヽ)(ノ⌒∇)ノわぁい♪

こんな記事もありますよ


コメントの投稿

非公開コメント

Author's Profile ~自己紹介~

Genzo

Author:Genzo
PCは一応自作できるレベル。
ワード・エクセルなら基本的に
扱えるレベル。
プログラム・・・?ん?
VBA・・・?ん?ん??
それって美味しいですか?


~ 当ブログについて ~

~ Mail2Genzo  ~

Calender&Search かれんだーと検索

07 | 2018/08 | 09
- - - 1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30 31 -

Access2Genzo内で検索

Category ~かてごりー~

Comments Tree ~こめんとつりー~


Link ~りんく~

ブロとも申請フォーム

Counter ~かうんた~

Since 2010/08/01:

Online:

タグクラウド

最新トラックバック

上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。