![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
ExcelのVBAで以下の通り打ち込んだのですが、「行ラベルが定義されていません」となってしまいコンパイルエラーとなってしまいます。
急いでおります!どなたか助けてください!お願いいたします。
Sub nibun()
Const EPS As Single = 0.000001
Dim f As Single, x As Single, a As Single
Dim b As Single, xm As Single, y As Single
a = 0
b = 2
y = Equn01(a)
label:
xm = (a + b) / 2
If (y * Equn01(xm) > 0) Then
a = xm
Else
b = xm
End If
If (b - a > EPS) Then
GoTo label1
Else
MsgBox Format(xm, "x= 0.000000")
End If
End Sub
Function Equn01(x)
Equn01 = x * (x * x - 1) - 1
End Function
No.1ベストアンサー
- 回答日時:
単純な間違いをしているだけでは。
ラベル名が「label」と書いているのに、GoToステートメントで指定を
しているラベル名が「 label1」と余計な「1」を追加していますから。
http://excelvba.pc-users.net/fol6/6_7.html
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Visual Basic(VBA) EXCEL VBAにて動的にCheckBOXを複数作成し、同BOXにイベントを追加したい 1 2023/03/16 07:05
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) 数字が「0」の列を削除するため、下記のコードを実行しましたが、コンパイルエラーSubまたはFunct 3 2022/12/04 00:00
- Excel(エクセル) VBAの指示の内容 昨日こちらでご教示頂いたのですが初心者な為、一つ一つの指示が何をやっているのかわ 2 2022/10/25 18:08
- Visual Basic(VBA) VBAの繰り返し処理について教えてください。 3 2022/08/02 13:21
- Excel(エクセル) エクセルで同じ数字同士を自動で線で結ぶVBAを教えてください 6 2022/04/26 23:13
- Visual Basic(VBA) VBAでoutlook365が起動しません。 4 2022/08/25 13:31
- Visual Basic(VBA) Excel vbaについての質問 3 2023/04/18 16:14
- Visual Basic(VBA) パーソナルXLSBのfuctionを呼び出すと「Functionが定義されていません」のエラーになる 2 2022/08/22 22:51
このQ&Aを見た人はこんなQ&Aも見ています
-
「どうして捨てられないの?」前妻の物を捨てられない男性の心理って?
前妻の物を捨てられない理由に加え、捨てるための手段はあるのかを専門家に聞いてみた!
-
Access VBAで行ラベルが定義されていないというエラーが出ます
Access(アクセス)
-
VBAで別モジュールへの変数の受け渡し方法
Visual Basic(VBA)
-
Application.ScreenUpdating = Falseが効きません
Visual Basic(VBA)
-
-
4
【EXCEL】【VBA】空欄は飛ばして処理する方法を教えて下さい。
Excel(エクセル)
-
5
VBAコード記述に際して、コード全体を自動的にインデント付ける方法
Access(アクセス)
-
6
Accessで今日から5日後
その他(データベース)
-
7
Access レポートを開く時、2つの条件で昇順で並び替え
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
一点一葉とはどんな意味ですか?
-
ワードかエクセルで、KOKU...
-
ラベルの差込印刷で2ページ目以...
-
エクセル宛名ラベルが重複する
-
インデックスに印刷する方法
-
Excel VBAのフォーム_ラベルの...
-
ワード差し込み印刷:作成した...
-
Accessのレポートで複数列の見...
-
Wordで作った宛名ラベルを印刷...
-
ACCESSのレポートでラベルを中...
-
名札差し込みで「すべてのラベ...
-
Access レポート作成での四角い...
-
筆王
-
wordでラベル差込印刷時に右端...
-
ピボットテーブルのΣ値のタイト...
-
・Illustratorでラベル作成・・・
-
Wordのラベル印刷で空データが...
-
ラベル屋さんでひとつひとつの...
-
<excel> 差し込み印刷ヘッダー設定
-
wordの差込印刷(ラベル作成)...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ワードかエクセルで、KOKU...
-
一点一葉とはどんな意味ですか?
-
エクセル宛名ラベルが重複する
-
ラベルの差込印刷で2ページ目以...
-
インデックスに印刷する方法
-
筆王
-
宛名ラベル 2枚目以降が表示、...
-
ワード差込印刷 縦書き・横書き...
-
ワード差し込み印刷:作成した...
-
フラットファイルの背表紙部分...
-
ピボットテーブルのΣ値のタイト...
-
エクセルでマイタックラベルへ...
-
CDやDVDの表面へのラベル...
-
Accessのレポートで複数列の見...
-
wordでラベル差込印刷時に右端...
-
Wordで作った宛名ラベルを印刷...
-
CDラベル剥がれて透明CDに...
-
DVDのタイトルを変更したい
-
ワードで宛名ラベルのフォント...
-
ラベルマイティのipad版教えて...
おすすめ情報