Ｐａｇｅ 294 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼選択して印刷 あおぎん 03/6/13(金) 15:19 ┗Re:選択して印刷 JAZZ兵衛 03/6/13(金) 15:44 ┗Re:選択して印刷 あおぎん 03/6/13(金) 17:51 ─────────────────────────────────────── ■題名 ： 選択して印刷 ■名前 ： あおぎん ■日付 ： 03/6/13(金) 15:19 -------------------------------------------------------------------------
| はじめまして。殆ど初心者なんですが。。。 コンボで選択した値によりプレビューするレポートを選択したいと思い、 Private Sub コマンド5_Click() On Error GoTo Err_コマンド5_Click Dim stDocName As String If Me!コンボ6 = Ａ Then stDocName = "Ａレポ" Else stDocName = "Ｂレポ" End If DoCmd.OpenReport stDocName, acPreview Exit_コマンド5_Click: Exit Sub Err_コマンド5_Click: MsgBox Err.Description Resume Exit_コマンド5_Click End Sub と作ってみたのですが、『コンボ6』で選択したのがＡにも関わらず、Ｂレポのプレビューが表示されます。 どこが間違ってるのか、教えてください。よろしくお願いします。 |
| If Me!コンボ6 = Ａ Then ↓ If Me!コンボ6 = "Ａ" Then で大丈夫なはず。 Ａが変数とみなされて、上記のIF文はelseの方に行ってしまいます。 質問とは少々離れてしまいますが、 変数は定義するクセは付けておいた方が良いですよ。 |
| 解決しました。 ありがとうございます。 ほんと初歩的なことで・・（汗） も少し勉強してからでないと質問するのも失礼ですね・・。 ほんとにありがとうございました！ |