![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
'2465'指定した式で参照している'直線Aii'フィールドが見つかりません。
入力されたテキストDELTUKIをiiにセットして直線Aii~Ciiに反映させたいです。
DELTUKIには0~12までのどれかがセットされて、00の場合には未可視、それ以外は
該当月の直線Aii~Ciiを可視化させたいです。
ですが、上記エラーが発生します。
どなたかご指南頂きたくよろしくお願い致します。
※.メイン画面の画像添付参照願います。
※.vba vb6 winXP
SetLowerLine:
With objrep
!直線103.Visible = True
!直線104.Visible = True
!直線105.Visible = True
!直線106.Visible = True
!直線107.Visible = True
End With
'Reports(stdocname)!直線103.Visible = True
'Reports(stdocname)!直線104.Visible = True
'Reports(stdocname)!直線105.Visible = True
'Reports(stdocname)!直線106.Visible = True
'Reports(stdocname)!直線107.Visible = True
Format ("00")
ii = Forms!メイン画面![テキストDELTUKI]
If ii = "00" Then
Else
objrep.Controls("直線A" & "ii").Visible = True
objrep.Controls("直線B" & "ii").Visible = True
objrep.Controls("直線C" & "ii").Visible = True
End If
No.1ベストアンサー
- 回答日時:
すみません、先日のこちらのご質問での回答者です:
http://oshiete1.goo.ne.jp/qa5770608.html
前回の回答2への補足の件のうち、「(2)」と「(3)」については
結局私では対処法の見当をつけかねたままなのですが(汗)、
本件についてだけはどうにかなりそうなので、回答をつけさせて
戴きます。
・・・というか、前回「"」を外すことを指摘した際に気づいて
いればよかったのですが、これも見落としていました(汗)
以下の部分を、下記のように修正してください。
【現在】
Format ("00")
ii = Forms!メイン画面![テキストDELTUKI]
If ii = "00" Then
Else
objrep.Controls("直線A" & "ii").Visible = True
objrep.Controls("直線B" & "ii").Visible = True
objrep.Controls("直線C" & "ii").Visible = True
End If
【修正】
'変数「ii」に対して、Format関数で桁表示を指定
ii = Format(Forms!メイン画面![テキストDELTUKI], "00")
If ii = "00" Then
Else
'「ii」を変数として使用するため、「"」は外します
objrep.Controls("直線A" & ii).Visible = True
objrep.Controls("直線B" & ii).Visible = True
objrep.Controls("直線C" & ii).Visible = True
End If
・・・以上です。
これで、「テキストDELTUKI」に1桁の数字(「1」や「2」など)を
指定した場合も、「直線A01」や「直線A02」に処理が行われる
ようになると思います。
この回答への補足
msgboxにてstdocnameに'レポート名'が入っているのは分かっていますが、
#errorが表示されてしまうのは何故なのでしょうか?。
ありがとうございます。
'2465'のエラーはなくなりました。
(1)のエラーがなくなったせいか、(2)及び(3)は発生しなくなりました。
ただ、#errorは発生したままです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 2つのVBAを一緒にしたら機能しなくなりました(エクセル) 7 2022/06/02 12:41
- Visual Basic(VBA) EXCELのセル相互同期用のVBAでの不具合 3 2022/08/10 11:44
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/02/02 09:25
- Visual Basic(VBA) Worksheets メソッドは失敗しました。のエラー処理のやり方 4 2022/05/29 21:29
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/02/02 13:13
- その他(プログラミング・Web制作) VBSでExcelファイル起動時、重複しても開くのを止めたい 1 2022/10/01 23:20
- Visual Basic(VBA) [Excel VBA] このコードでは行の挿入や行の消去をすると13のエラーが出てしまう。 3 2022/12/09 00:29
- Visual Basic(VBA) エクセルVBA ダブルクリックしたら色反転を指定したセルのみにしたい 2 2022/04/06 12:52
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 6 2022/06/08 12:55
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2022/03/25 08:33
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
Access2002_メソッドまたはデータメンバが見つかりません
Access(アクセス)
-
accessVBA 「フォームが見つかりません」
その他(データベース)
-
アクセスVBAのMe!と[ ]
Access(アクセス)
-
-
4
ACCESSのフォーム、開くんですが、見えないようにするには
Access(アクセス)
-
5
親フォームからサブフォームのレコードソースを設定
Access(アクセス)
-
6
Accessフィールドのコントロールソース変更
Access(アクセス)
-
7
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
8
Access2013 レポートを印刷するために開いた、レポートビューをVBAで閉じる方法を教えて。
その他(Microsoft Office)
-
9
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
10
ACCESS97 実行時エラー '2455'に関して
Access(アクセス)
-
11
Accessでフィールド名を変数(文字列)で・・・
Access(アクセス)
-
12
ACCESSで値を代入できないとは?
Visual Basic(VBA)
-
13
Access・VBAで、Controlsを使用した条件式(書き方)
Access(アクセス)
-
14
ACCESS2003 でクエリの抽出条件に変数を代入したい。
その他(データベース)
-
15
VBAでループ内で使う変数名を可変にできないか。
Visual Basic(VBA)
-
16
ACCESSでコンボボックスにSQLで抽出した値を表示したい
その他(データベース)
-
17
vbaレポート名の指定が間違っている!。
Visual Basic(VBA)
-
18
Access2010 「演算子がありません」エラー
その他(データベース)
-
19
Accessで別テーブルの値をフォームに表示したい
その他(データベース)
-
20
Access VBA エラー2448について
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ACCESSフォームで、入力から一...
-
'2465'指定した式で参照してい...
-
POIでのテキストボックス作成に...
-
全てのテキストボックスをセル...
-
テキストエリア内の文字列にリ...
-
VBからPDFファイルの埋め込みテ...
-
VBSでMid関数を使ったらエラー...
-
VB.NET2005 DataGridViewでレコ...
-
テキストボックスの中身をリセ...
-
テキストフィールドの別のテキ...
-
テキストフィールドについてのA...
-
FLASH8にてテキストエリア内の...
-
VBAでホームページからコピーし...
-
文字をスクロールできるGIFアプリ
-
ワードプレスでアンカーテキス...
-
多言語を混在できるか。
-
テキストの内容を取り込んであ...
-
テキストボックスにセルの値を...
-
誰かこの写真の問題わかる方お...
-
VBScriptでMsgBoxのYesNoボック...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
テキストボックスの中身をリセ...
-
テキストボックスにセルの値を...
-
別のアプリケーションのテキス...
-
変数に256文字以上のテキストを...
-
改行含むテキストの表示の仕方
-
VB6.0 でメニューを作りたいん...
-
RPG(AS400)の本、サイトってあ...
-
'2465'指定した式で参照してい...
-
pdfのテキスト全文コピー、テキ...
-
HTMLのtextbox類に文字を残す
-
時計の:を点滅させたい
-
IP Address 入力フォームについて
-
全てのテキストボックスをセル...
-
フォームのテキストの入力数字...
-
VS2008 C# ボタンのテキストを...
-
2つのテキストファイルを比べて...
-
漢字入力した値のカタカナ変換...
-
空白で入力フォームのボタンを...
-
VBAからPDFのテキストフィールド
-
テキストエリア内の文字列にリ...
おすすめ情報