質問するログイン新規登録

質問編集履歴

3

エラー画面の写真を貼付け

2020/10/15 02:58

投稿

kanda_ryuichi
kanda_ryuichi

スコア6

title CHANGED
File without changes
body CHANGED
@@ -21,6 +21,7 @@
21
21
  ### 発生している問題・エラーメッセージ
22
22
  実行時エラー2136
23
23
  このプロパティを設定するには、フォームまたはレポートをデザインビューで開きます。
24
+ ![エラー画面です。](8e73e462dd8fb4b09bbbe4820353198e.png)
24
25
 
25
26
  ### 該当のソースコード
26
27
  Private Sub Report_Page()

2

本文に追記。発生している問題・エラーメッセージ追記。ソースコート追記。

2020/10/15 02:58

投稿

kanda_ryuichi
kanda_ryuichi

スコア6

title CHANGED
File without changes
body CHANGED
@@ -14,8 +14,21 @@
14
14
  教えて下さい。
15
15
  宜しくお願いします。
16
16
 
17
+ 10/15 09:58追記
18
+ 改段プロパティがあることを教えていただき始めて知りました。
19
+ [箱のシール枚数]=2 の時に改段するvbaを書いてみましたが、使い方が正しくないようです。
17
20
 
18
21
  ### 発生している問題・エラーメッセージ
22
+ 実行時エラー2136
23
+ このプロパティを設定するには、フォームまたはレポートをデザインビューで開きます。
24
+
19
25
  ### 該当のソースコード
26
+ Private Sub Report_Page()
27
+ If [箱のシール枚数] = 2 Then
28
+ Me.Section(acDetail).NewRowOrCol = 0
29
+ End If
30
+ End Sub
31
+
32
+
20
33
  ### 試したこと
21
34
  ### 補足情報(FW/ツールのバージョンなど)

1

タグを追加しました。

2020/10/15 01:00

投稿

kanda_ryuichi
kanda_ryuichi

スコア6

title CHANGED
File without changes
body CHANGED
File without changes