No.4ベストアンサー
- 回答日時:
Open_Form()プロシージャのどこでエラーとなっているのでしょうか?
それと、Accessのバージョンは??
自分もAccessのバージョンの違いで結構苦戦した経験がありますんで・・・。どちらかというと、OSの違いよりAccessのバージョンの違いのほうが気になります。
お礼が遅くなってすみません。何度もお答えありがとうございました。データをハードディスクにコピーし、マクロが止まってしまうフォームを名前を変えてコピーし直したら動くようになりました。ありがとうございました。
No.3
- 回答日時:
>実行時エラー'2501' OpenFormアクションの実行はキャンセルされまいた
ということは”入力フォーム”側の問題です。
”入力フォーム”の開くときにイベントに何か不適切な記述があるのだと思います。
それを貼ってもらえれば参考になるかと思います。
あと、OSの違いで制御がかわるというのはあまりないと思います。
この回答への補足
Form_入力フォームの一部です。
Option Compare Database
Private Sub Form_Close()
Me.Filter = ""
End Sub
Private Sub Form_Open(Cancel As Integer)
Dim Rs As Recordset
Set Rs = Me.Recordset.Clone
Rs.MoveFirst
Dim Fontsize_Table As Recordset
Set Fontsize_Table = CurrentDb.OpenRecordset("フォントサイズテーブル", dbOpenDynaset)
Fontsize_Table.MoveFirst
Fontsize_Table.FindFirst "番号=" & Rs("番号")
'rs.FindFirst "番号 =" & Me!選択キー.Value
'Me.Bookmark = rs.Bookmark
DoCmd.ApplyFilter , "番号 =" & Rs("番号")
以下……続く
どこかおかしいところがあれば教えてください。
No.1
- 回答日時:
>DoCmd.Close acForm, "初期画面", acSaveYes
は"初期画面"というFormを(セーブした上で)閉じるというコマンドです。
>DoCmd.OpenForm "入力フォーム", acNormal ←ここ
は、"入力フォーム"というFormを(通常ウィンドウで)開く、というコマンドです。
"入力フォーム"というFormが存在しないとかではないですか?フォームのウィンドウを確認して下さい。(間違って消してしまったとか。)また、実行時に何かしらエラーメッセージが出てませんか?
この回答への補足
入力フォーム"というFormは存在しています。そういえば、友達は自分のパソコンでやったときには確かに動いたと言っていました。(XP) 自分のはMeと98SEでどちらも動きません。そういうことってあるのですか。いろいろすみません。
補足日時:2005/08/20 08:58お礼が遅くなってすみません。データをハードディスクにコピーし、マクロが止まってしまうフォームを名前を変えてコピーし直したら動くようになりました。ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Access(アクセス) Access IF文でテーブルに存在しない場合の処理について 2 2022/10/10 18:09
- Excel(エクセル) 【マクロ】リボン、行列、数式・ステータスバを非表示に 4 2022/12/12 07:32
- Excel(エクセル) エクセルのイベントプロシージャーでF列の最終行のセルの入力をトリガーにしたいのですが 1 2022/10/14 09:36
- Visual Basic(VBA) excel2021で実行できないマクロ。どこを直したらいいのか 2 2022/03/28 03:40
- Excel(エクセル) エクセル VBA実行中のApplication.ScreenUpdatingについて 3 2023/07/13 21:06
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/08/10 14:24
- Excel(エクセル) 【マクロ】スクショ印刷がうまく動かない件 5 2022/12/06 17:37
- Visual Basic(VBA) Excel VBAのリストボックスの値を他のフォームに反映させる方法を教えてください。 2 2023/07/14 14:06
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
ACCESSレポートをPDFに出力したい
その他(OS)
-
ACCSESS2013VBA フォームのレコードソースを変更する
その他(データベース)
-
-
4
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
5
Accessのレポート上のテキストボックス値を設定したい
その他(データベース)
-
6
Accessでブレークポイントを設定してないのに一時停止してしまう
その他(データベース)
-
7
フォームを開くときに、コンボボックスの値を選択(アクセスVBA)
Visual Basic(VBA)
-
8
Access フォームのテキストボックスに半角英字のみで入力する設定は
Access(アクセス)
-
9
【ACCESS】フォーム名/コントロール名を文字列型変数で指定するには
Access(アクセス)
-
10
Access2010 「演算子がありません」エラー
その他(データベース)
-
11
フォームの高さを数値で指定したいのですが
Excel(エクセル)
-
12
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
13
Access VBAで行ラベルが定義されていないというエラーが出ます
Access(アクセス)
-
14
ACCESSでコントロールソースの変更
Access(アクセス)
-
15
新規レコード行を非表示にしたい
Access(アクセス)
-
16
Access VBAでタブコントロールで選択するタブをしていするには。
Access(アクセス)
-
17
どこにもフォーカスを当てたくない
Access(アクセス)
-
18
アクセス 壊れた? 「ファイルが見つかりません」
Access(アクセス)
-
19
Access2013の質問です
その他(データベース)
-
20
パラメータが少なすぎます。1を指定して下さい。""
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel-VBAでInputBox+Pulldown...
-
初歩的な事だと思います。 Sub...
-
エクセルVBA テキストボックス...
-
数字以外の入力をエラーにする...
-
テキストボックスの番号を使っ...
-
EXCEL VBA で指定した範囲に入...
-
DataGridView 列ごとの入力制限
-
複数行の入力を受け取る方法
-
accessで該当するレコードがな...
-
ExcelVBA No.を自動連番で設定...
-
TEXTAREA に入力時の位置
-
c#でTextBoxの入力制限
-
Loopの強制終了 マクロ Excel VBA
-
VBAでInputBoxの再入力をさせる...
-
ACCESS テキストボックスの入力...
-
excel vba でユーザーフォーム...
-
初心者です教えて下さい。
-
転記マクロ
-
VBA R1C1形式で変数の入力について
-
エディットボックスの入力制限...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBA テキストボックス...
-
数字以外の入力をエラーにする...
-
テキストボックスの番号を使っ...
-
初歩的な事だと思います。 Sub...
-
なんで
-
Excel-VBAでInputBox+Pulldown...
-
私、Paiza Cloudやっているのだ...
-
VBAでInputBoxの再入力をさせる...
-
TextBoxから数字が文字...
-
EXCEL VBA で指定した範囲に入...
-
excel vba でユーザーフォーム...
-
エディットボックスの入力制限...
-
c#でTextBoxの入力制限
-
DataGridViewの桁数制限に関して
-
入力フォームの値をQRコードで...
-
X(元Twitter)で問題があり、お...
-
アクセスのマクロ
-
DataGridView 列ごとの入力制限
-
「イ分」・・・フンという文字...
-
ACCESS テキストボックスの入力...
おすすめ情報